页眉内容
上海立信会计学院本科实验报告
班级： 学号： 姓名： 指导教师： 系部： 专业： 实验时间：
实验1 VB环境及常用控件、编程基础
一、 实验目的
1． 熟悉VB环境及可视化程序开发方法。 2． 掌握常用控件的使用。 3． 掌握编程基础。
二、实验要求
1． 在C:\\下建立子文件夹“VB实验1”，按照题目要求，在该文件夹下为各题保存相应的
文件，如本实验中的第一题，需保存的文件有：工程文件(11.vbp)、窗体文件(11.frm) 及可执行文件（11.exe），本实验中的第二题，需保存的文件有：工程文件(12.vbp)、窗体文件(12.frm) 及可执行文件（12.exe），其余实验依此类推。
2． 撰写实验过程中出现了哪些问题、错误，你是如何解决的，做一个小结。
三、 实验内容：
1、建立窗体，要求（没有特殊说明，所有控件的字体和大小均为默认值）
1） 在屏幕上用标签控件Label1显示“欢迎学习VisualBasic”，字号为二号，字体为
隶书；
2） 用标签控件Label2显示“请输入你的姓名”（字体为楷体，有下划线），标签后的
文本框Text1中输入姓名；
3） 单击“你输入的姓名是”按钮，在Label3标签中显示在文本框Text1中输入的姓
名。
运行效果如图1-1所示：
图1-1
页脚内容
页眉内容
Private Sub Command1_Click() Label3.Caption = Text1.Text End Sub
2、制作窗体和编写事件代码，在文本框中统计在该窗口上鼠标单击的次数，实验中标签框、文本框的字体、字号、格式均为宋体、三号、粗体。效果如图1-2所示：
图1-2
Private Sub Form_Click() Text1 = Val(Text1) + 1 End Sub
3、建立窗体和编写代码，完成通过命令按钮改变字体、字号和复制内容及字体、字号格式的练习，初始状态所有控件中文字为宋体、常规、小五。 要求：
1）单击“隶书25磅”按钮，使得Text1中初始输入文本的字体和字号根据按钮上显示要求发生改变；
2）单击“复制=>”按钮，将Text1选中的内容及其字体、字号格式，复制到Text2复制效果文本框中；
控件的属性和最终效果如图1-3所示：
图1-3
Private Sub Command1_Click() Text1.FontName = \隶书\页脚内容
页眉内容
Text1.FontSize = 25 End Sub
Private Sub Command2_Click() Text2.Text = Text1.SelText
Text2.FontName = Text1.FontName Text2.FontSize = Text1.FontSize End Sub
4、参考教材例2-2对窗体三个事件过程（Load、Click、DbClick）编程，要求：将鼠标指针改为如KEY04.ICO图标文件样式，设置窗体具有最大化和最小化按钮，程序运行后立即在窗体中装入图片“WINDOW.JPG”，单击窗体后装入图片“COVER01.BMP”，双击窗体后去除图片，每项事件结束后窗体标题均发生变化。 最终效果如图1-4（a）、（b）、（c）所示：
图1-4（a）
页脚内容