有哪些信誉好的足球投注网站- 1、本文档共4页，可阅读全部内容。
- 2、有哪些信誉好的足球投注网站（book118）网站文档一经付费（服务费），不意味着购买了该文档的版权，仅供个人/单位学习、研究之用，不得用于商业用途，未经授权，严禁复制、发行、汇编、翻译或者网络传播等，侵权必究。
- 3、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。如您付费，意味着您自己接受本站规则且自行承担风险，本站不退款、不进行额外附加服务；查看《如何避免下载的几个坑》。如果您已付费下载过本站文档，您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等，请点击“版权申诉”（推荐），也可以打举报电话：400-050-0827(电话支持时间：9:00-18:30)。
VisualBasic程序设计
VisualBasic程序设计
实验（训）报告
学号：姓名：班级：09225实验时间：2011-03-23
实验编号
VB01
实验名称
对象、属性、事件与方法的使用
实验目的和要求
掌握对象属性的设置。
掌握对象方法的使用
实验内容
1.print、cls方法的作用。
2.seltext、sellength等文本框属性的使用。
3.change事件的使用。
一、实验题目
1.窗体背景颜色为淡蓝色，二个按钮,按钮背景色为蓝色，单击按钮一(cmdprint)时，窗体中出现“HELLOWORLD！”，字体为二号字，红色，当单击按钮二(cmddel)时，窗体中的内容清除。（根据要求设计界面，编写程序）
（1）属性设置：
控件名
属性名
属性值
窗体
Backcolor
淡蓝色
font
二号
Forecolor
红色
按钮一
Name
cmdprint
Style
1
Backcolor
蓝色
Caption
按钮一
按钮二
Name
cmddel
Style
1
Backcolor
蓝色
Caption
按钮二
（2）代码编写：
PrivateSubcmddel_Click()
Cls
EndSub
PrivateSubcmdprint_Click()
Form1.PrintHELLOWORLD！
EndSub
（3）运行结果截图
2.一个文本框（名为：txtext），二个按钮控件(cmdone、cmdtwo)，二个标签(L1、L2)，运行程序后，在文本框1中任意输入字符，并选择部分字符，单击按钮一，在标签1中显示所选的内容，单击按钮二，在标签2中显示所选字符的个数。（根据要求设计界面，编写程序，标签要带边框）
（1）属性设置：
控件名
属性名
属性值
文本框
Name
txtext
按钮一
Name
cmdone
Caption
按钮一
按钮二
Name
cmdtwo
Caption
按钮二
标签一
Name
L1
borderstyle
1
标签二
Name
L2
borderstyle
1
（2）代码编写：
PrivateSubcmdone_Click()
L1.Caption=txtext.SelText
EndSub
PrivateSubcmdtwo_Click()
L2.Caption=txtext.SelLength
EndSub
（3）运行结果截图
3.在窗体上有三个文本框，程序运行时向文本框一中输入任意英文大小字母，文本框二中显示相应的字母且所有字母都是小写，文本框三中显示相应的字母且都是大写字母。
（1）代码编写
PrivateSubText1_Change()
Text2.Text=LCase(Text1.Text)
Text3.Text=UCase(Text1.Text)
EndSub
（2）运行结果截图
二、实验感受(包括上机过程中遇到的问题和如何解决的问题、通过上机实践学到了些什么知识、对上机的意见等)。
第一次上机，给我的感受是老师所讲的这些VB的小程序，都对我们很实用，为以后学习VB打下良好的基础了。
遇到的问题是第二题，刚开始是调试了半天，始终没有调试出来，程序的代码是对的，就是调不出来，后来在老师的指引下，才知道我把txtext写成了text，导致了结果始终读不出来。在老师的指导，我一改以前的那种不看题目的作风，终于把第二题会做了。
关于上机的意见，我觉得这次上机应该还是蛮适应的，希望以后会更加适应老师的步骤和节奏。
文档评论（0）