第四章 基本的结构.docVIP

基本的控制结构 4.1 顺序结构 一. 赋值语句 形式: [LET]变量名＝表达式 作用: 将表达式的值赋值给变量名. 一般用于给变量赋值或对控件设定属性值. 注：赋值号不同于数学中的等号 如X Y2 ≡Y2 X X≠X+1 未经赋值且用DIM定义的变量自动赋以初值0（数值型）、空串（字符型）、False（布尔型） 1、格式：〈变量名〉 对象.属性值 功能：获取对象当前的属性值 2、格式：对象.属性值 〈变量名〉 功能：设置对象的属性值 3、对象变量的赋值 格式：Set 对象变量名＝对象 功能：将对象赋予对象变量 如：把窗体Form1赋给一个窗体变量Win1可用语句：Set Win1 form1 无论何时，只要希望对象变量引用对象，就需可使用Set语句给对象变量赋值。 例：DIM X%，Y%，Z% X Y Z PRINT X，Y，Z 例: sRate! 0.1 Text1.Text ＝ 欢迎使用Visual Basic 6.0” 当表达式的类型与变量的类型不一致时,强制转换成左边的精度 iA% 10 / 3 iA中的结果为3 注意：虽然赋值号与关系运算符等于号都用“ ”表示，VB系统会根据所处的位置自动判断是何种意义的符号。 二. 与用户交互函数和过程 1．MsgBox函数 格式：MsgBox 〈提示〉[, 〈按钮类型〉] [,〈标题〉] [, 〈帮助文件名〉, 〈帮助号〉] 功能：生成一对话框，并在对话框内显示信息，等待用户选择按钮。 ·提示（必选）：字符串表达式，给出在对话框内显示的信息，不超过1024个字符。 ·按钮类型（可选）：数值表达式，用于确定对话框内显示按钮或图标的类型和对话框的显示模式（缺省为0） 格式：C1+C2+C3+C4 C1取值：描述了对话框中显示的按钮的类型与数目 常数 值 描述 vbOKOnly 0 只显示 OK 按钮。 VbOKCancel 1 显示 OK 及 Cancel 按钮。 VbAbortRetryIgnore 2 显示 Abort、Retry 及 Ignore 按钮。 VbYesNoCancel 3 显示 Yes、No 及 Cancel 按钮。 VbYesNo 4 显示 Yes 及 No 按钮。 VbRetryCancel 5 显示 Retry 及 Cancel 按钮。 C2取值：描述了图标的样式 VbCritical 16 显示 Critical Message 图标。 VbQuestion 32 显示 Warning Query 图标。 VbExclamation 48 显示 Warning Message 图标。 VbInformation 64 显示 Information Message 图标。 C3取值：说明哪一个按钮是缺省值 VbDefaultButton1 0 第一个按钮是缺省值。 VbDefaultButton2 256 第二个按钮 是缺省值。 VbDefaultButton3 512 第三个按钮是缺省值。 C4取值：决定消息框的强制返回性 VbApplicationModal 0 应用程序强制返回；应用程序一直被挂起，直到用户对消息框作出响应才继续工作。 VbSystemModal 4096 系统强制返回；全部应用程序都被挂起，直到用 户对消息框作出响应才继续工作。 注意：常数是 Visual Basic for Applications VBA 指定的。因此，可以在程序代码中随时使用这些常数名称，而不必使用实际数值。 ·标题（可选）：字符串表达式，为对话框的标题栏 ·帮助文件名（可选）：字符串表达式，确定帮助文件名 ·帮助号（可选）：数值表达式，帮助主题的代码 MsgBox函数返回值： 常数 值 描述 vbOK 1 OK vbCancel 2 Cancel vbAbort 3 Abort vbRetry 4 Retry vbIgnore 5 Ignore vbYes 6 Yes vbNo 7 No 注意 ：如果要省略某些位置上的参数，则必须加入相应的逗号。 例：Dim Msg, Style, Title, Response, MyString Msg 口令错!请重新输入! 定义信息框中的信息。 Style vbOKOnly + vbCritical + vbApplicationModal 定义按钮。 Title ”出错信息” ‘信息框的标题 MsgBox Msg, Style, Title 2．InputBox函数 格式：InputBox 〈提示〉[, 〈标题〉] [,〈缺省值〉] [, 〈帮助文件名〉, 〈帮助号〉] 功能：显示对话框及其上的提示信息，等待用