填空题
在菜单编辑器中建立一个菜单,其主菜单项的名称为nmuEdit,Visible属性为False。程序运行后,如果用鼠标右键单击窗体,则弹出与mnvEdit对应的菜单。以下是实现上述功能的程序,请填空。
Private Sub Form
【2】
(Button As Integer, Shift As Integer,
X As Single, Y As Single)
If Button = 2 Then
【3】
mnuEdit
End If
End Sub
【参考答案】
MouseDown PopupMenu
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
在窗体上画一个命令按钮,名称为Command1。然后编写如下程序: Private Sub Command1_Click() Dim a As Integer,b As Integer,c As Integer If a=0 Then x=x-1 Else If b<>0 Then End If End If If c<>0 Then x=3 Else x=4 End If Print x End Sub 程序运行后,单击命令按钮,其输出结果为 ______。
A.34
B.4
C.35
D.3
点击查看答案&解析
单项选择题
在窗体画一个命令按钮,然后编写如下过程,程序运行后,单击命令按钮,在输入对话框中输入234,输出结果为 ______。 Function Fun(ByVal num As Long)As Long Dim k As Long k=1 num=Abs(num) Do While num k=k* (num Mod 10) num=num 10 Loop fun=k End Function Private Sub Command1_Click() Dim n As Long Dim r As Long n=In put Box( 请输入一个数 ) n=CLng(n) r=Fun(n) Print r End Sub
A.20
B.24
C.9
D.28
点击查看答案&解析
相关试题
在窗体(Name属性为Form1)上画两个文本框...
下面的程序用“冒泡”法将数组a中的10个...
下列程序的功能是求出所有的1-100之间...
阅读以下程序: Private Sub Form_clic...
以下程序段执行后y的值是 【1】 。 x=...