- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
计算机VB实验报告与习题指导全稿.
第一部分 实验指导与实验报告
实验一 第一个VB程序
一、实验目的
1.熟悉VB集成环境,掌握集成环境的各种操作。
2.熟练掌握VB工程创建、窗体和控件属性设置、代码编写方法。
3.能够设计一个简单VB程序。
4.了解外接程序使用方法,掌握制作应用程序安装盘的方法。
二、实验内容
1.“good morning”程序设计。
2.使用一个类似于Word字处理软件的外接程序。
3.制作”good morning”程序安装盘
三、实验指导
1.Good Morning程序
⑴ 启动VB,创建一个新工程,窗体设置如下图所示:
图1.1 窗体外观
各控件主要属性如下表:
表1.1 控件属性表
控件 (名字) Caption text 窗体 frmmain My First Program 文本框 Text1 “ “ 标签 Label1 请输入自己的姓名 命令按钮 Okbutton 完成 命令按钮 Exitbutton 退出
⑵ 双击窗体或控件,打开代码窗口,在相应的事件过程中输入如下代码:
Private Sub OKBUTTON_Click( )
If Val(Time$) 0 And Val(Time$) 12 Then
Label1.Caption = Good Morning + Text1.Text
ElseIf Val(Time$) = 12 And Val(Time$) 18 Then
Label1.Caption = Good Afternoon + Text1.Text
Else
Label1.Caption = Good Evening + Text1.Text
End If
End Sub
Private Sub EXITBUTTON_Click()
End
End Sub
Private Sub Form_Load()
Label1.Caption = 请输入你的名字
Text1.Text =
End Sub
⑶ 运行并测试程序。
⑷ 按照自己的喜好,修改Text框和Label的各种属性,增强显示效果。
2.使用外接程序
⑴ 单击菜单“外接程序”的“外接程序管理器”命令项,打开外接程序管理器对话框。在对话框中选择“应用程序向导”并选中“加载”,如图1.2所示。
图1.2 外接程序管理器
⑵ 在“外接程序”菜单中,单击启动“应用程序向导”,在“界面类型”对话框中选择“多文档界面”,为应用程序取名“Word”,如图1.3所示。单击下一步。
图1.3 界面类型
⑶ 在“菜单”、“自定义工具栏”和“Internet联接”对话框中,使用默认设置。在“标准窗体”中选中“关于”对话框,单击完成,即生成一个类似于“Word”的字处理应用程序。如图1.4所示。
图1.4 字处理应用程序
3.创建应用程序安装盘
按照2.10节的步骤,制作“Good Morning”应用程序安装盘
实 验 报 告
实验一 第一个VB程序
学 号: 姓名: 成绩:
学院(系): 专业: 班级:
一、实验目的
1.熟悉VB集成环境,掌握集成环境各种操作。
2.熟练掌握VB工程创建、窗体和控件属性设置、代码编写方法。
3.能够设计一个简单VB程序。
4.了解外接程序使用方法,掌握制作应用程序安装盘的方法。
二、实验内容
1.“good morning”程序设计。
2.生成一个类似于Word字处理软件的外接程序。
3.制作”good morning”程序安装盘。
三、问题和要求
1.“good morning”程序设计。
2.使用一个类似于Word字处理软件的外接程序。
3.制作”good morning”程序安装盘
实验二 数据类型、运算符与函数的应用
一、实验目的
1、熟悉VB的基本数据类型
2、熟练掌握常量和变量的基本应用
3、掌握运算符与表达式的灵活应用
4、掌握函数的灵活应用
二、实验内容
1、验证实验一;
2、验证实验二;
3、验证实验三;
4、验证实验四。
三、实验指导
1、验证实验一。
(1)在窗体的Click()事件中输入下列程序,观察运行结果。
a = 考试Visual Basic Programming
b = 计算机
c$ = b 等级 UCase( Mid( a, 10, 5 ))
Print c
(2)在窗体的Click()事件中输入下列程
原创力文档


文档评论(0)