第五章节与用户对话s.pptVIP

第5章 与用户对话;5.1 输入对话框（1） ;5.1 输入对话框（2） ;5.1 输入对话框（3） ;Private Sub Command1_Click() Dim a, b, t Cls a = Val(InputBox(请输入 a :, 输入数字)) b = Val(InputBox(请输入 b :, 输入数字)) Print 交换前: a =; a; , b =; b t = a: a = b: b = t 交换 Print 交换后: a =; a; , b =; b End Sub 运行结果如图5.1所示，左图为InputBox函数生成的对话框，右图为窗体显示结果。 ;5.2 消息对话框 ;5.2.1 MsgBox函数 ;表5.1 “按钮”参数的设置值及意义 ; “按钮”参数由上面四类数值相加组成，其组成原则是：从每一类中选择一个值，把这几个值加在一起就是该参数的值。若省略某类数值，则默认该类数值为0。不同的组合会得到不同的结果，如果省略“按钮”参数，则只显示【确定】按钮且无图标。例如，“按钮”参数被设为以下三种组合时，将显示图5.3所示的效果。 ; MsgBox函数可以通过返回值判断用户选择了哪一个按钮，对应情况如表5.2所示。该返回值用来作为程序