[问答题] 注意：下面出现的“考生文件夹”均为c:wexam25160001。 (1)在名称为Form1的窗体上建立两个主菜单，其标题分别为“文件”和“帮助”，名称分别为vbFile和vbHelp，在

19 查阅

[问答题] 注意：下面出现的“考生文件夹”均为c:wexam25160001。 (1)在名称为Form1的窗体上建立两个主菜单，其标题分别为“文件”和“帮助”，名称分别为vbFile和vbHelp，在“文件”菜单下有3个子菜单项，标题分别为“新建”、“打开”和“存盘”，名称分别为 vbNew、vbOpen和vbSave。要求程序运行后，如果选中“文件”下的某个菜单项，则通过MsgBox对话框显示该菜单项的标题，如图3-3所示。注意：保存时必须存放在考生文件夹下，窗体文件名为sjt3.frm，工程文件名为sjt3.vbp。 (2)在窗体上建立一个名称为Text1的文本框，再建立一个名称为Cmd1，标题为“计算”的命令按钮，如图3-4所示。要求程序运行后，单击命令按钮，将计算100-200之间所有素数之和，在文本框中显示结果，同时把结果存入文件out.txt中。 (在考生文件夹中有标准模块mode.bas,其中的putdata过程可以把结果存入文件，而isprime函数可以判断整数x是否为素数，如果是素数，则函数返回True，否则返回 False，考生可以把该模块文件添加到自己的工程中。) 注意：保存时必须存放在考生文件夹下，窗体文件名为sjt4.frm，工程文件名为sjt4.vbp，结果存入out.txt文件。

参考答案:

第二步：编写程序代码。参考代码： Private Sub vbNew_Click() MsgBox“新建”，vbOKOnly End Sub Private Sub vbOpen_Click() MsgBox“打开”，vbOKOnly End Sub Private Sub vbSave_Click() MsgBox“存盘”，vbOKOnly End Sub 第三步：调试并运行程序。第四步：按题目要求存盘。 (2)在窗体上建立好控件后，先设置控件的属性值，再编写事件过程。文本框中显示的内

在Visual Basic中，菜单项通过菜单编辑器来建立；选择菜单则是触发其Click事件。 MsgBox函数在对话框中显示消息，等待用户单击按钮，并返回1个Integer告诉用户单击哪一个按钮。语法：MsgBox(prompt[，buttons][，title][，helpfile，context]) MsgBox函数的语法具有以下几个命名参数： Prompt必需的。字符串表达式，作为显示在对话框中的消息。 Buttons可选的。数值表达式是值的总和，指定显示按钮的数目及形式。 Title可选的。在对话框标题栏中显示的字符串表达式。如果省略title，则将应用程序名放在标题栏中。 Helpfile可选的。字符串表达式，识别用来向对话框提供上下文相关帮助的帮助文件。 Context可选的。数值表达式，由帮助文件的作者指定给适当的帮助主题的帮助上下文编号。解题步骤：第一步：建立菜单项。程序中用到的菜单项及其属性见表3-2。

计算机考试