|
(7)在菜单编辑器中建立一个菜单，其主菜单项的名称为nmuEdit，Visible属性为False。 程序运行后，如果用鼠标右键单击窗体，则弹出与mnuEdit对应的菜单。以下是实现上述功能的程序，请填空。
Private Sub Form_ 【7】 (Button As Integer,Shift As Integer,X As Single,Y As
Single)
If Button=2 Then
【8】 mnuEdit
End If
End Sub
答案：【7】MouseDown
【8】PopupMenu
评析：PopupMenu方法的使用形式如下：[对象]．PopupMenu菜单名，标志，x，y。其中：x，y：是快捷菜单显示的位置。标志：指定快捷菜单的行为。当标志为0时，快捷菜单中的项只能对鼠标左键起反应。当标志为1时，快捷菜单中的项对鼠标左键和右键都反应。标志为2时，PopupMenu方法只能用在MouseDown事件过程。 (8)与数学表达式COS2(a+b)／3x+5对应的Visual Basic表达式是 【9】 。
答案：【9】(cos(a+b))^2／(3*x)+5
评析：在Visual Basic中，^表示指数运算，+表示乘法，／表示除法。乘法运算符不能象数学表达式那样省略。 (9)在窗体上画一个名称为Text1的文本框，然后画三个单选按钮，并用这三个单选按钮建立一个控件数组，名称为Option1。程序运行后，如果单击某个单选按钮，则文本框中的字体将根据所选择的单选按钮切换。请填空。 Private Sub Option1_Click(Index As Integer)
Select Case 【10】
Case 0
a="宋体"
Case l
a="黑体"
Case 2
a="楷体GB2312"
End Select
Textl． 【11】 =a
End Sub
答案：【10】Index
【11】Font
评析：本题中Optionl为控件数组名称，故Optionl_Click事件过程中的参数Index代表被单击的控件在数组中的下标值；TextBox控件Textl的Font属性用于设置文本框中显示的文字的字体名称。 (10)在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click()
n=5
f=1
s=0
For i=l TO n
f= 【12】
s=s+f
Next
Print s
End Sub
该事件过程的功能是寸算s=l+1/2!1/3!+．．．+1/n!去的值。请填空。
答案：【12】f／i
评析：本题程序的功能是求和S=1+1/2!+1/3!+…+1/n!，而代码中有语句s=s+f。故变量f中存储的应为1/n!(n=1..2…5)。即f=f*(1／i)。
相关资料
| 
