浙江大学城市学院实验报告

课程名称 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