vb计算机实验报告

vb计算机实验报告

篇一:vb实验报告范本.doc

福建农林大学计算机与信息学院

课程名称:姓 名:系:专 业:年 级:学 号:指导教师:职 称:(程序设计类课程)

实验报告

Visual Basic程序设计教程 洪景泉

计算机与信息学院

计算机应用技术 05级 051893067 黄红兵 讲师 2007年 6月 2 日

实验项目列表

系: 计算机与信息学院专业:计算机应用技术 年级: 05级 姓名: 洪景泉 学号:051893067 计算机号 67 实验时间: 2007、3、28 实验地点: 综南附307 指导教师签字: 黄红兵

实验一 Visual Basic环境和程序设计的初步

一、实验目的和要求

1、 了解Visual Basic系统对计算机软件、硬件的要求。 2、 掌握启动与退出Visual Basic的方法。 3、 熟悉Visual Basic的集成开发环境(IDE)。 4、 掌握在窗体上添加控件的各种方法。

5、 掌握建立、编辑、运行和保存一个简单的Visual Basic应用程序的全过程。

二、实验内容和原理

1、 熟悉工具箱上的标准控件以及窗体设计器和工程管理器窗口、属性窗口、代码窗口的

功能、组成以及它们各种不同的打开方法。

2、 在窗体上画一文本框个一个命令按钮,在文本框中显示“VB程序设计”,然后执行如

下操作:

(1) 编写适当事件过程,当单击命令按钮时,文本框内容消失。

(2) 单击“文件”—“生成工程”并退出。在windows环境下运行该工程。 用户界面:

实验代码:

Private Sub Command1_Click() Text1.Text = End Sub

3、 创建一个“标准EXE”类型的应用程序。要求:程序运行时在屏幕上显示“欢迎您的

到来!”,并输入您的名字。当按回车键时弹出对话框如下所示: 用户界面:

代码:

Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then

MsgBox 欢迎 + Text1.Text + 的到来 End If End Sub

4、 创建如图所示的应用程序,要求:单击“确定”按钮后,第一个文本框显示系统日期,

第二个文本框显示星期。单击“退出”按钮则退出应用程序。 用户界面:

实验代码:

Private Sub Command1_Click() Dim sum As Integer sum = Weekday(Now) Text1.Text = Date Select Case sum Ca
se 1
Text2.Text = 日 Case 2
Text2.Text = 一 Case 3
Text2.Text = 二 Case 4
Text2.Text = 三 Case 5
Text2.Text = 四 Case 6
Text2.Text = 五 Case 7
Text2.Text = 六 End Select
End Sub
Private Sub Command2_Click() End End Sub

三、总结

通过本次实验熟悉了Visual Basic的集成开发环境(IDE)。掌握在窗体上添加控件的各种方法。掌握建立、编辑、运行和保存一个简单的Visual Basic应用程序的全过程。

系: 计算机与信息学院专业:计算机应用技术 年级: 05级 姓名: 洪景泉 学号:051893067 计算机号 67 实验时间: 2007、4、4 实验地点: 综南附307 指导教师签字: 黄红兵

实验二 顺序程序设计

一、实验目的和要求

1.掌握常用内部函数的使用

2.掌握表达式 赋值语句的正确书写规则 3.掌握InpueBox和MsgBox的使用

二、实验内容和原理

1.创建如图所示的应用程序,要求:单击窗体显示如图所示的图形。 用户界面:

Dim i As Integer
Dim j As Integer For i = 1 To 9For j = 1 To i
If i = 9 Or j = 1 Or i = j Then Print ※; Else
Print Spc(2); End If Next j
Print

实验代码: Next i Private Sub Form_click() End Sub

2.创建如图所示的应用程序,要求:单击“放大”按钮后,将文本中显示的字符串放大2--3倍;若单击按钮“还原”按钮。则将文本框显示的字符串大小返原。 用户界面:

实验代码:

Dim x Dim y
Pri