vb程序计算机实验,vb计算机实验报告.doc

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.创建如图所示的应用程序，要求：单击“放大”按钮后，将文本中显示的字符串放大２--３倍；若单击按钮“还原”按钮。则将文本框显示的字符串大小返原。 用户界面：

实验代码：

Dim x Dim y

Pri