浙江大学城市学院实验报告
课程名称 VB程序设计基础与实验 实验项目名称实验一、程序设计初步 实验成绩指导老师（签名）日期
一. 实验目的和要求
1. 2. 3. 4.
熟悉VB开发环境，掌握VB程序设计步骤。
理解基本概念：工程、窗体、属性、事件、方法。 熟悉立即窗口的使用。
掌握Print、赋值语句的正确书写规则。
二. 实验内容和原理
【练习1-1】新建一个工程，单击窗体时，在窗体上显示“这是我的第一个VB实验”；双击窗体时，清除窗体上显示的所有信息。研究下面的代码段，考虑应填入什么内容？
Private Sub Form_Click
Print”这是我的第一个VB实验” End Sub
Private Sub Form_DblClick Cls End Sub 上机实践
调试运行以上程序，在同一文件夹下保存工程MyProject.vbp和窗体文件MyProject.frm。
【练习1-2】设计一个程序，窗体上有一个文本框、两个命令按钮，命令按钮的标题是“隶书”和“黑体”，当程序运行后，在文本框中输入“欢迎光临VB世界”，是用粗体、18号、宋体、红色字显示(通过窗体加载事件完成)；单击“隶书”按钮文本框中显示内容的字体是隶书，单击“黑体”按钮文本框中显示内容的字体是黑体。文本框属性的设置在Form_load事件中设置，研究下面的代码段，考虑应填入什么内容？
1
练习 1-2 运行界面
Private Sub Form_Load()
Text1.FontName = \宋体\Text1.FontBold = True Text1.FontSize = 18 Text1.ForeColor = vbRed End Sub
Private Sub Command1_Click() Text1.FontName =__”隶书”_____ End Sub
Private Sub Command2_Click()
Text1.FontName =”黑体”__________________ End Sub 上机实践
调试运行以上程序。 请你思考
文本框属性的设置如改在属性窗口中设置，以上代码会怎样？
【练习1-3】编程，窗体界面设计如下图1，分别有三个命令按钮command1、command2、command3，命令按钮的Caption属性分别为“改变位置”、“还原”和“退出”。窗体加载后，运行Form_Load 事件，使窗体定位在（2000，2000）坐标值上，运行效果如下图2。
图1
图2
Private Sub Form_Load()
Form1.Left = 2000
2
Form1.Top = 2000
Command2.Enabled = False End Sub
点击命令按钮command1后，使窗体定位在（100，100）坐标值上，运行效果如图3：
图 3
Private Sub Command1_Click()
Form1.Left = 100 Form1.Top = 100
Command1.Enabled = False Command2.Enabled = True End Sub
点击命令按钮command2，窗体又重回图2的情况。请写出另外两个命令按钮事件的内容。 Private Sub Command2_Click() Form1.Left = 2000 Form1.Top = 2000
Command1.Enabled = True Command2.Enabled = False End Sub
Private Sub Command3_Click() End End Sub
上机实践
调试运行以上程序。 请你思考
怎样用move方法来改变窗体位置，完成此题？
【练习1-4】在窗体上建立5个命令按钮Command1、Command2、Command3、Command4和Command5，运行界面如下图。 要求： （1）命令按钮的Caption属性分别为“窗体变大”、“窗体变小”、“窗体左移”、“窗体右移”和“关闭窗体”。
（2）每单击Command1按钮和Command2按钮一次，窗体变大或变小1/4倍。 （3）单击Command3按钮和Command4按钮一次，窗体左移或右移200缇。 （4）单击Command5按钮退出。
3