![](https://lstatic.shangxueba.com/sxbzda/h5/images/m_q_title.png)
设已经在菜单编辑器中设计了窗体的快捷菜单,其顶级菜单为Bt,取消其“可见”属性,运行时,在以下事件过程中,可以使快捷菜单相应鼠标右键菜单的是()。
A.a+=a-=(b=4) * (a=3)
B. a=a * 3+2
C. x%(-3)
D. y=float i
![](https://lstatic.shangxueba.com/sxbzda/h5/images/tips_org.png)
A.a+=a-=(b=4) * (a=3)
B. a=a * 3+2
C. x%(-3)
D. y=float i
第1题
设已经在菜单编辑器中设计了窗体的快捷菜单,某顶级菜单为a1,且取消其“可见”属性。运行时,以下()事件过程可以使快捷菜单的菜单项响应鼠标左键单击和右键单击。
A.Private Sub Form_Mouse Down(Button As Integer,Shift As Integer,_X As Single,Y As Single) If Button=2 Then PopupMenu a1,2 End Sub
B.Private Sub Form. Mouse Down(Button As Integer,Shift As Integer,_X As Single,Y As Single) PopupMenu a1,0 End Sub
C.Private Sub Form_Mouse Down(Button As Imeger,Shift As Integer,_X As Single,Y As Single) PopupMenu a1 End Sub
D.Private Sub Form_Mouse Down(Button As Integer,Shift As Integer,_X As Single,Y As Single) If (Button=vbLetfButton)Or(Button=vbRightButton)Then PopupMenu a1 End Sub
第3题
A.Private Sub Form_MouseDown(Button As Integer, Shift As Integer,_ X As Single, Y As Single) If Button=2 Then PopupMenu Bt, 2 End Sub
B.Private Sub Form_MouseDown(Button As Integer, Shift As Integer, _ X As Single, Y As Single) PopupMenu Bt End Suh
C.Private Sub Form. MouseDown(Button As Integer, Shift As Integer, _ X As Single, Y As Single) PopupMenu Bt,0 End Sub
D.Private Sub Form_MouseDown(Button As Integer, Shift As Integer, _ X As Single, Y As Single) If (Button=vbLeftButton) Or (Button=vbRightButton) Then PopupMenu Bt End Sub
第4题
A.Private Sub Form_MouseDown(Button As Integer, Shift As Integer,_X As Single,Y As Single) If Button=2 Then PopupMenu Bs, 2 End Sub
B.Private Sub Form_MouseDown(Button As Integer, Shift As Integer,_X As Single,Y As Single) PopupMenu Bs End Sub
C.Private Sub Form_MouseDown(Button As Integer, Shift As Integer,_X As Single,Y As Single) PopupMenu Bs,0 End Sub
D.Private Sub Form_MouseDown(Button As Integer, Shift As Integer,_X As Single,Y As Single) If (Button=vbLeftButton) Or (Button=vbRightButton) Then PopupMenu Bs End Sub
第5题
A.Private Sub Form_MouseDown(Button As Integer,Shift As Integer,_X As Single,Y As Single) If Button=2 Then PopupMenu Bs,2 End Sub
B.Private Sub Form_MouseDown(Button As Integer,Shift As Integer,_X As Single,Y As Single) PopupMenu Bs End Sub
C.Private Sub Form_MouseDown(Button As Integer,Shift As Integer,_X As Single,Y As Single) PopupMenu Bs,0 End Sub
D.Private Sub Form_MouseDown(Button As Integer,Shift As Integer,_X As Single,Y AS Single) If(Button=vbLeftButton)Or(Button=vbRightButton)Then PopupMenu Bs End Sub
第6题
A.Private Sub Form_MouseDown(Button As Integer,Shift As Integer, X As Single,Y As Single) If Button=2 Then PopupMenu Bs,2 End Sub
B.Private Sub Form_Mouse Down(Button As Integer,Shift As Integer, X As Single,Y As Single) PopupMenu Bs End Sub
C.Private Sub Form_MouseDown(Button As Integer,Shift As Integer,_ X As Single,Y As Single) PopupMenu Bs,0 End Sub
D.Private Sub Form_MouseDown(Button As Integer,Shift As Integer,_ X As Single,Y As Single) If(Button=VbLeftBuaon)Or(Button=VbRighButton)Then PopupMenu Bs End Sub
第7题
A.Private Sub Form_Mouse Down(Button As Integer,Shift As Integer,- X As Single,Y As Single) If Button=2 Then PopupMenu Bs,2 End Sub
B.Private Sub Form_MouseDown(Button As Integer,Shift As Integer,- X As Single,Y As Single) PopupMenu Bs End Sub
C.Private Sub FOrm_MouseDown(Button As Integer,Shift As Integer,- X As Single,Y As Single) PopupMenu Bs,0 End Sub
D.Private Sub Form_MouseDown(Button As Integer,Shin As Integer,- X As Single,Y As Single) If(Button=vbLeftButton)Or(Button=vbRightButton)Then PopupMenu Bs End Sub
第8题
A.输出语句错误.应改为:Print”a”,”b”
B.过程的形式参数有错,应改为:swap(ByRef a As Integer,ByRef b As Integer)
C.swap中3条赋值语句的顺序是错误的,应改为a=b:b=c:c=a
第9题
A.Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single) If Button=2 Then PopupMenu a1,2 End Sub
B.Private Sub Form_MouseDown(ButtonAsInteger,ShiftAsInteger,X As Single,Y As Single) PopupMenu a1,0 End Sub
C.Private Sub Form_Mouse Down(Button As Integer,Shift As Integer,X As Single,Y As Single) PopupMenu a1 End Sub
D.Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single) If(Button=vbLetfButton) Or (Button=vbRightButton) Then PopupMenu a1 End Sub
为了保护您的账号安全,请在“上学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!