计算机VB实验报告与习题指导全稿..doc

  1. 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
  2. 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  3. 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)

d47fv82b5hI + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档