VB程序设计第6章 对话框的设计.pptVIP

答案：（1）a = MsgBox(程序出现严重错误！, vbInformation + _ vbAbortRetryIgnore, 警告) 或a = MsgBox(程序出现严重错误！, 66, 警告) （2）b = MsgBox(你好，欢迎使用Visual Basic！ Chr(13) Chr(10) _想要退出吗？, vbQuestion + vbYesNoCancel + vbDefaultButton2, 提示) 或b = MsgBox(你好，欢迎使用Visual Basic！ Chr(13) Chr(10) _想要退出吗？, 291, 提示) （3）c = InputBox(请输入你所在城市的电话区号号码：, 输入, 0419) 3、简述“通用对话框”控件的使用方法，使用“通用对话框”控件可以显示哪些对话框，它们分别通过什么方法来实现。 答案：要使用“通用对话框（Common Dialog）”，必须先把该控件添加到工具箱中。具体方法为：①从“工程”菜单中选“部件”命令；②在“部件”对话框的“控件”选项卡中，查找“Microsoft Common Dialog Control 6.0”并将其选中，然后单击“确定”按钮。然后就可以象使用其他控件一样式样该控件了。 使用“通用对话框”控件可以显示“打开”对话框、“保存”对话框、“颜色”对话框、“字体”对话框、“打印”对话框和Windows帮助引擎对话框。它们分别通过ShowOpen、 ShowSave、 ShowColor、 ShowFont、 ShowPrinter 和ShowHelp方法来实现。 4、模式对话框和无模式对话框的区别是什么？ 答案：模式对话框是在继续操作应用程序的其他部分之前必须被关闭的。而无模式对话框允许在对话框与其他窗体之间转移焦点而不必关闭对话框。当对话框正在工作时，可以在当前应用程序的其他地方继续工作。 5、为什么要使用自定义对话框？ 答案：自定义对话框与使用函数或通过“通用对话框”控件创建的对话框相比，内容和功能都可以有更多的发挥余地。使用函数创建的对话框一般都很简单且功能单一，通常只是用来做简单的输入和提示。 Continue… 通过“通用对话框”控件只能创建的标准的对话框。而自定义对话框则相对灵活且功能强大，通常会满足用户为应用程序的继续运行而提供数据的需要。 第6章 对话框的设计 6.1 知识要点 6.2 习题与解答 6.3 实训指导 6.4 测验题 6.3实训指导 6.3.1技能训练目的 ☆ 掌握InputBox函数的使用方法 ☆ 掌握MsgBox函数的使用方法 ☆ 掌握“通用对话框”的使用方法 ☆ 掌握“自定义对话框”的创建和使用方法 6.3.2技能训练内容 【实训6.1】设计程序，窗体见 图6-4。单击“输入”按钮，则通过输入对话框分别输入十个整数并显示在“输入数据”后面的文本框中。单击“排序”按钮，十个整数从小到大排序后显示在“排序后”后面的文本框中。单击“清除”按钮，两个文本框全部清控。单击“退出”，程序结束。 图6-4 提示： 在窗体上添加两个标签控件（Label1和Label2），它们的Caption属性分别是“输入数据：”和“排序后：”；再添加两个标签控件（Label3和Label4），它们的Caption属性均为空，BorderStyle属性均设为1；添加四个命令按钮（Command1 、Command2、 Command3和Command4），它们的Caption属性分别为“输入”、“排序”、“清除”和“退出”。 参考代码： Option Explicit Dim a(9) As Integer Private Sub Command1_Click() Dim i As Integer, s As String For i = 0 To 9 s = InputBox(请输入一个整数, 输入) a(i) = Val(s) Label3.Caption = Label3.Caption + + s Next i End Sub Private Sub Command2_Click() Dim i As Integer, j As Integer, t As Integer For i = 0 To 8 For j = i + 1 To 9 If a(j) a(i) Then t = a(i) a(i) = a(j) a