1、Visual Basic 程序设计实验指导廊坊职业技术学院计算机科学与工程系实验 1 Visual Basic 操作基础一、主要内容及目的 掌握 Visual Basic 6.0 的安装和启动。 了解添加、删除 Visual Basic 6.0 的组件 了解 VB 的菜单系统、工具 栏和各种基本窗体。 理解 Visual Basic 6.0 开发应用程序的步骤。二、实验内容1启动与退出 VB6.02VB6.0 的可视化编程环境(1) VB 集成开发环境 (2)控件工具箱(3)工程窗口 (4)属性窗口(5)窗体设计窗口 (6)代码窗口(7)立即窗口 (8)窗体布局窗口(9)菜单栏 (10)标准工
2、具栏3VB6.0 可视化编程的步骤(1)新建一个工程 (2)添加控件(3)设置属性 (4)编写代码(5)运行工程 (6)修改工程(7)保存工程 (8)工程的编译(9)工程的打开 （10）生成可执行文件4VB6.0 控件的画法(1)各种控件的画法 (2)控件的缩放与移动(3)控件的复制与删除 (4)控件的布局(5)ActiveX 控件的加载5新建一个工程，在属性窗口中设置如下属性：width-6000height-2000caption-练习属性窗口left-1800top-300backcolor-蓝色在设置过程中注意观察窗体外观有什么变化？运行工程后窗体外观又有什么变化实验 2 Visual
3、 Basic 语言基础一、主要内容及目的 掌握常量、变量的定义方法。 掌握各种运算符的使用方法。 掌握常用函数的功能及使用方法。二、实验内容1常量的定义方法 （1） 打开 vb，新建工程（2） 双击窗体（3） 定义常量（如下图）2变量定义(1) 打开 vb，新建工程(2) 双击窗体(3) 定义变量（如下图）3运算符的使用（1） 算术运算符(+、-、*、/、mod、)（2） 关系运算符(、=、=)（3） 逻辑运算符(and、or、not)（4） 字符串连接符(&、+)4.常用函数的使用（1） 绝对值函数（2） 平方根函数（3） 取整函数（4） 随机函数（5） 字符串长度函数（6） 删除字符串空格
4、函数（7） 子串检索函数（8） 取子串函数（9） 日期函数（10） 时间函数（11） 格式输出函数（12） 求 ASC 码函数（13） 字符串转换为数值函数（14） 数值转换为字符串函数实验 3 命令按钮、文本框和标签一、实验目的 掌握命令按钮、文本框和 标签常用属性值的设置方法。 学会使用命令按钮、文本框和 标签在窗体上建立用户界面的方法。 掌握命令按钮的主要事件的使用。二、实验内容使用命令按钮、文本框和标签判断密码是否正确。三、实验步骤与指导1设计界面在窗体上添加两个标签、一个文本框和两个命令按钮。初始界面如下图所示。2. 设置属性如下表进行设置:对象 属性 属性值Label1 Capti
5、on 请输入密码：Command1 Caption 登陆Command2 Caption 退出Label2 Caption Label2 BorderStyle 1-Fixed SingleText1 Text Text1 MaxLength 16Text1 PasswordChar *Form1 Caption 登陆界面3. 编写程序代码Private Sub Command1_Click()If Text1.Text=“goodbaby” ThenLabel2.Caption=“欢迎使用本系统！”ElseLabel2.Caption=“密码错误！请重新输入密码！”End IfEnd Sub
6、Private Sub Command2_Click()EndEnd Sub4运行程序(1)在文本框中输入“goodbaby”，然后单击“登录”命令按钮，则在标签 Label2 中显示“欢迎使用本系统！”。运行结果如下图。(2)在文本框中输入“abc”，然后单击“登录”命令按钮，则在标签 Label2 中显示“密码错误！请重新输入密码！”。运行结果如下图。实验 4 选择结构程序设计一、主要内容及目的 理解选择结构程序设计的特点。 掌握 IF 语句的各种形式的语法、特点及应用。 掌握 IIF 函数、SELECT CASE 语句的使用方法。 掌握时钟、选项按钮和复 选框的有关属性、方法和事件。 掌
7、握常用简单算法。二、操作步骤及工作要点1单条件选择语句 IF (1) 单行结构条件语句 IFTHENELSE 操作 1：输入 x，计算 y 的值。其中：设计步骤如下：1) 建立应用程序用户界面与设置对象属性。2) 编写程序代码。写出命令按钮 Command1 的单击（Click）事件代码为(2) 使用 IIF 函数 使用 IIf 语句改写上面的代码。(3) 块结构条件语句 IFTHENELSEEND IF 使用 IIf 语句改写上面的代码。2IF 语句的嵌套 操作 2：某百货公司为了促销，采用购物打折扣的优惠办法：每位顾客一次购物(1) 在 1000 元以上者，按九五折优惠；(2) 在 200
8、0 元以上者，按九折优惠；(3) 在 3000 元以上者，按八五折优惠；(4) 在 5000 元以上者，按八折优惠。设计步骤如下：(1) 建立应用程序用户界面与设置对象属性。(2) 编写程序代码。)0(2y写出命令按钮 Command1 的单击（Click）事件代码。3多分支条件选择语句 SELECT CASE 使用 Select Case 语句来计算优惠价，改写命令按钮 Command1 的单击（Click）事件代码。4使用计时器控件 操作 3：设计一个电子表 在窗体上设计一个数字时钟，如图 4-15 所示。 设计步骤如下：建立应用程序用户界面。 设置对象属性。编写计时器控件 Timer1
9、的 Timer 事件代码。编写命令按钮 Command1 的 Click 事件代码：操作 4：设计一个流动字幕板为一个应用系统设计流动字幕板，如图 4-19 所示，标题“欲穷千里目，更上一层楼”在窗体中自右至左地反复移动。设计步骤如下：建立应用程序用户界面与设置对象属性 编写命令按钮 Command1 的 Click 事件代码。实验 5 循环结构程序设计一、主要内容及目的 理解循环结构程序设计的特点。 熟练掌握各种循环语句的使用方法。 掌握循环退出语句的使用与应用。 掌握列表框与组合框的使用方法 掌握一些简单算法。二、操作步骤及工作要点1前测型 DoLoop 循环操作 1：求累加和 1 + 2 + 3 + 100编写计算按钮的代码。2后测型 DoLoop 循环操作 2：输入两个正整数，求它们的最大公约数。窗体界面的设计如图所示：编写命令按钮的 Click 事件代码。3For.Next 语句操作 3：利用 For 循环结构显示 1000 以内的所有能被 37 整除的自然数（如图5-13 所示） 。 编写命令按钮的 Click 事件代码。三、思考题
