(1)在名称为Form1的窗体上建立两个主菜单,其标题分别为“文件”和“帮助”,名称分别为vbFile和vbHelp,“文件”菜单下有三个子菜单项,标题分别为“新建”、“打开”和“存盘”,名称分别为vbNew、vbOpen和vbSave。要求程序运行后,如

admin2012-10-09  36

问题 (1)在名称为Form1的窗体上建立两个主菜单,其标题分别为“文件”和“帮助”,名称分别为vbFile和vbHelp,“文件”菜单下有三个子菜单项,标题分别为“新建”、“打开”和“存盘”,名称分别为vbNew、vbOpen和vbSave。要求程序运行后,如果选中“文件”下的某个菜单项,则通过MsgBox对话框显示该菜单项的标题,如图47—4所示。
    注意:保存时必须存放在考生文件夹下,窗体文件名为sj3.frm,工程文件名为sj3.vbp。
    (2)在考生文件夹中有一个工程文件sj4.vbp,相应的窗体文件为sj4.frm。在名为Form1的窗体上有一个命令按钮(名称为Cmdl,标题为“求和”),其功能是产生30个0~1000的随机整数,放入一个数组中,然后输出它们的和。程序运行后,单击命令按钮,即可求出其和,并在窗体上显示出来,如图47—5所示。

    本程序不完整,请补充完整,并能正确运行。
    注意:去掉程序中的注释符“’”,把程序中的问号“?”改为正确的内容,使其实现上述功能,但不得修改程序的其他部分。最后,按原文件名并在原文件夹中保存修改后的文件。

选项

答案(1)本题主要考查菜单编辑器的使用。在Visual Basic中,菜单项通过菜单编辑器来建立;选择菜单则是触发其Click事件。MsgBox函数在对话框中显示消息,等待用户单击按钮,并返回一个Integer告诉用户单击哪一个按钮。 语法:MsgBox(prompt[’buttons][,title][,helpfile,context]) MsgBox函数的语法具有以下几个命名参数: prompt:必需参数;字符串表达式,作为显示在对话框中的消息。 buttons:可选参数;数值表达式是值的总和,指定显示按钮的数目及形式。 title:可选参数;在对话框标题栏中显示的字符串表达式。如果省略title,则将应用程序名放在标题栏中。 helpfile:可选参数;字符串表达式,识别用来向对话框提供上下文相关帮助的帮助文件。 context:可选参数;数值表达式,通过帮助文件的作者指定给适当的帮助主题的上下文编号。 ①建立菜单项;程序中用到的菜单项及其属性见下表: [*] ②为各个菜单项编写事件处理程序。 参考代码如下: Private Sub vbNew_Click() MsgBox"新建" End Sub Private Sub vbOpen_Click() MsgBox"打开" End Sub Private Sub v bSave Click() MsgBox"保存" End Sub ③调试并运行程序。 ④按题目要求存盘。 (2)①打开题目所给工程文件。 ②将注释语句改为: arrN(i)=Int(Rnd*1000) Min=arrN(1) Sum=arrN(i)+Sum ③按要求保存文件即完成本题。

解析
转载请注明原文地址:https://kaotiyun.com/show/lChp777K
0

最新回复(0)