第七章 vb实验答案.doc

  1. 1、本文档共30页,可阅读全部内容。
  2. 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
实验一? Visual Basic环境和简单程序设计   一、实验目的 1.掌握Visual Basic启动和退出的方法。 2.熟悉Visual Basic的集成开发环境。 3.掌握Visual Basic程序设计的基本步骤。 4.掌握基本控件(标签、命令按钮和文本框)的基本使用方法。 二、实验内容 1 启动Visual Basic,然后创建一个“标准 EXE”工程。了解Visual Basic集成开发环境下各组成部分及其作用。 【要求】 (1)在集成开发环境中分别寻找“窗体窗口”、“属性窗口”、“工程资源管理器”、“窗体布局窗口”、“工具箱窗口”,熟悉它们的默认位置。 (2)在“视图”或“工程资源管理器”中切换显示“代码窗口”和“窗体窗口”。 (3)在“视图”菜单中点击“立即窗口”,观察刚刚显示出来的“立即窗口”。 (4)尝试分别将各部分关闭,然后再用“视图”菜单中对应的菜单命令将其显示。 ? 2 编写一个简单的应用程序。要求窗体的标题为“简单VB实验”;窗体中有一个标题为“显示”的按钮;单击该按钮后在窗体上显示红色的“广西师范学院”。 【步骤】 (1)设计应用程序的界面:在窗体上创建一个命令按钮Command1、一个标签Label1。 (2)设置对象的属性 对象名称 属性名称 属性值 Form1 Caption 简单VB实验 Label1 ForeColor 红色 Command1 Caption 显示 (3)编写事件代码: Private Sub Command1_Click() ? Label1.Caption = 广西师范学院 End Sub (4)程序的运行及保存。 【提示】 在窗体上显示“广西师范学院”有两种方法: (1)用Print方法:设置窗体的前景色为红色。 (2)用一个标签控件:设置标签控件的前景色为红色。 【思考】为什么在以上两种方法中在颜色的设置问题上有所不同? ? 3 通过编程修改控件的属性。 【要求】 (1)进入程序设计的界面如图1-1(a)。 (2)点击“单击此处”按钮后程序运行的界面如图1-1(b)。 【步骤】 (1)在窗体中创建一个标签Label1、一个命令按钮Command1。 (2)在属性窗口中设置对象的属性: 对象名称 属性名称 属性值 Form1 Caption 设计界面 Label1 Caption 请留意此处 Command1 Caption 单击此处 (3)在Command1的Click事件中编写程序代码: Private Sub Command1_Click() ? Form1.Caption = 编程后界面 ? Label1.Caption = 欢迎您使用VB 6.0 ? Command1.Caption = 运行结果 End Sub 【提示】 ?可以通过两种方法设置对象的属性: (1)在程序设计状态,通过属性窗口对该属性进行修改或设置。 (2)在程序运行状态,通过程序中的语句动态地更改对象的属性。修改对象属性的语句格式: ???? ??????????对象名.属性名称=新设置属性值 ? 实验二? 顺序结构程序设计   一、实验目的 1.掌握常量和变量、表达式的基本概念和正确书写格式。 2.掌握赋值语句和常用函数的正确使用方法。 3.掌握输入、输出对话框(InputBox和MsgBox)的基本使用方法。 二、实验内容 1 假设有变量a=2,b=5,c=4,d=3,e=6,编写程序,计算表达式a+bc and d*a=e的值,将结果打印在窗体上。 【提示】 注意复合表达式的运算顺序。 【思考】复合表达式按什么样的顺序运算? ? 2? 编写程序,界面如图2-1所示。使得单击一次按钮可以产生一个[60,90]之间的随机数并显示在标签Label1上,再求出该数的正弦值,将结果写在标签Label2上。 【步骤】 (1)设计应用程序的界面:在窗体上创建一个命令按钮Command1、两个标签Label1和Label2。 (2)设置对象的属性 对象名称 属性名称 属性值 Form1 Caption 随机数的正弦值 Command1 Caption 下一个随机数 Label1 Caption ? Label2 Caption ? (3)编写事件代码: Private Sub Command1_Click() ? Dim x!, y! ? Randomize ? x = Rnd * 31 + 60 ? y = Sin(x) ? Label1.Caption = 随机数(60-90): Str(x) ? Label2.Caption = 正弦值???????? : Str(y) End Sub (4)程序的运行及保存。 【提示】 (1)使用Rnd函数产生随机数,注意,为了防止两次运行程序的

文档评论(0)

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

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

1亿VIP精品文档

相关文档