实验三VB基础

《实验三VB基础》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、姓名：学号：专业：实验内容：实验地点：实验时间：所用软件：实验成绩：教师签名：实验三VB基础一、实验目的：1、掌握VB中基木的数据类型的使用方法。2、掌握常用的运算符和表达式的使用。3、熟悉VB中常用的内部函数。二、实验准备：1、计算机基本操作练习。2、VisualBasic软件使用预习。3、设计出下面问题的程序。三、实验步骤及内容：1、完成如下程序。［提示］:(1)本程序中需要定义3个标签，3个文本输入框和4个按钮。(2)并为每个按钮添加适当的代码，完成相应的功能。代码如下:PrivateSubConin

2、iandl_Click()Text3.Text=Vai(Text1.Text)+Vai(Text2.Text)EndSubPrivateSubCommand2_Click()Text3.Text=Vai(Textl.Text)-Vai(Text2.Text)EndSubPrivateSubCommand3_Click()Text3.Text=Vai(Textl.Text)*Vai(Text2.Text)EndSubPrivateSubComniand4Click()Text3.Text=Vai(Textl.

3、Text)/Vai(Text2.Text)EndSub(1)思考：如果操作数1和操作数2为0的时候，点击除会如何？2、列出VB中常用的数据类型，并举例说明如何定义。例如：定义整型变量：DimxAsInteger符号常量PI的定义：定义一个字符串变量str,str的内容是”HelloWorld"运义一个单精度的变量x3、新建工程，在窗体上添加一个文木框Textl,保证输入焦点在文木框最右侧;在用户输入的同时，将用户输入字母一律转换为小写字母。例如，输入“VisualBasicProgramming”就会显示如

4、卜图所示的效果。参考代码如下：PrivateSubTextlChange()Textl.SelStart=Len(Textl.Text)Textl.Text二LCase(Textl.Text)EndSub4、口算Print5/4*65的结果，然后用VB验证。正确结果是：5、产生如图所示的消息对话框的语句为：参考代码如下：MsgBox〃提示：对文件更名可能导致文年不可用〃&Chr仃0)&〃对文件更名吗?“，vbExclamation+vbOKCancel,〃提示〃自己试一试：将自己产生的消息框截图如下，并将

5、标题“提示”改为“警告”，截图如下：6、执行以下程序瓠Foral口回冈Commandl双击按钮，输入如下代码：DimAgeAsIntegerAge=Val(InputBoxCz请输入您的年龄:，z,用户输入"))MsgBox"您的年龄是：〃&Str(Age),vbOKOnly,提示〃然后将运行结果截图：7、实验的感受及体会。