[VB程序设计实验要求及报告1.docVIP

上海立信会计学院本科实验报告 班级： 学号： 姓名： 指导教师： 系部： 专业： 实验时间： 实验1 VB环境及常用控件、编程基础 实验目的 熟悉VB环境及可视化程序开发方法。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） 图1-4（b） 图1-4（c） Private Sub Form_Click() Form1.Caption = 鼠标单击 Form1.Picture = LoadPicture(App.Path + \COVER01.BMP) End Sub Private Sub Form_DblClick() Form1.Caption = 鼠标双击 Form1.Picture = LoadPicture() End Sub Private Sub Form_Load() Form1.Caption = 装入载体 Form1.Picture = LoadPicture(App.Path + \WINDOW.JPG) End Sub 实验过程中的问题、错误，解决方法，总结、体会、建议。