VB第四章赋值与输入输出.pptVIP

4.1 赋值语句 1．“=” 是一个赋值运算符，叫做赋值号 2．变量赋值后，新值代替旧值 3．变量初值： （1）数值型变量初值为 0 （2）字符型变量初值为空，即 4．赋值时，强制转换成左边精度 如: Dim a% = 10 / 3 则a结果为3 7． 不要将“＝”理解为数学上的等号： A = A + 1 表示将A的值加１后再放回到A中 1. InputBox函数：字符串类型 变量名＝InputBox（提示[，标题][，默认值] [，xpos][，ypos]） 例 从输入框中输入圆的半径，计算圆的周长和面积 (1)创建应用程序的用户界面和设置对象属性 (2)编写程序代码 Private Sub Command1_Click() Dim r As Single, k As Single, s As Single r = Val(InputBox(请输入圆的半径, 计算圆的周长和面积)) k = 2 * 3.14159 * r s = 3.14159 * r * r Text1.Text = k Text2.Text = s MsgBox 计算已完成, , 例 End Sub Private Sub Command2_Click() End End Sub 4.3.MsgBox函数和MsgBox过程 提示：必选项。显示多行，可用vbCrLf 对话框标题： 在对话框标题栏显示的信息文本。 对话框类型： 按钮形式、图标。是一整型表达式 MsgBox所选按钮返回值 4.4 加载对象语句Load 语法格式：Load 对象名 功能：把对象名代表的窗体对象、控件数组元素等加载到内存中。 说明：使用Load语句可以加载窗体，但不显示窗体。当VB加载窗体对象时，先把窗体属性设置为初始值，再执行Load事件过程。 例如 Load Forml ′加载窗体Forml Load Option(2) ′加载控件数组中的一个元素 4.5 卸载语句Unload 格式：Unload 对象名 功能：从内存中卸载指定窗体或控件。 如果卸载的对象是程序惟一的窗体，则将终止程序的执行 例如 Private Sub Command1_Click() Unload Me ′卸载当前窗体 End Sub  Me是系统关键字，用来代表当前窗体 4.6 结束语句End 格式：End 功能：结束程序的运行。 也可以单击工具栏上的“结束”按钮  4.7 暂停语句Stop 格式：Stop 功能：暂停程序的运行。可用于调试程序(设置断点) 也可以通过单击工具栏上的“中断”按钮来实现 使用Ctrl + Break组合键 4.8 使用Print方法输出数据 Print方法 用于显示(输出)文本 格式：［对象名.］Print ［表达式列表］ 说明：(1)使用的对象可以是窗体等 Print “程序设计” ′在当前窗体上输出 Picture1.Print “程序设计” ′在图片框上输出 (2)表达式列表是一个或多个表达式，如果省略，则输出一个空行 (3)当输出多个表达式时，各表达式之间用分号“；”(紧凑格式)或逗号“，”(按区格式)隔开。 注：Print方法的显示格式有分区格式和紧凑格式两种。当各表达式用逗号作为分隔符时，按分区格式显示数据，每隔14列开始一个打印分区，每列的宽度是选字体磅值大小的所有字符的平均宽度；当表达式用分号隔开时，其输出格式为紧凑格式，此时将在每个数据后面增加一个空格，如果是正数，将把正号显示为空格。 例：Private Sub Form_Click() a = 2 b = VB Print 50 * a 计算并输出表达式的值 Print b