填空题

在菜单编辑器中建立一个菜单，其主菜单项的名称为mnuEdit，Visible属性为False，程序运行后，如果用鼠标右键单击窗体，则弹出与mnuEdit相应的菜单。以下是实现上述功能的程序，请填空。　　Private Sub Form__________(Button As Integer, Shift As Integer, X As Single, Y As Single)　　If Button=2 Then　　　　【３】　mnuEdit 　　End If 　End Sub

【参考答案】

mousedown\popupmenu
<上一题 目录 下一题>
热门 试题

填空题
在窗体上画一个名称为Command1的命令按钮，然后编写如下程序： Option Base 1 Private Sub Command1_Click() Dim a(10) As Integer For i = 1 To 10 a(i) = i Next Call swap（ 【13】 ） For i = 1 To 10 Print a(i); Next End Sub Sub swap(b() As Integer) n = 【14】 For i = 1 To n 2 t = b(i) b(i) = b(n) b(n) = t 【15】 Next End Sub 上述程序的功能是，通过调用过程swap，调换数组中数值的存放位置，即a(1)与a(10)的值互换，a(2)与a(9)的值互换，……，a(5)与a(6)的值互换。请填空。
填空题
阅读程序： Option Base1 Private Sub Form_Click( ) Dim a(3)As Integer Print“输入的数据是：”； For i＝1 To 3 a(i)=InputBox(“输人数据”) Print a(i)； Next Print If a(1) t=a(1) a(1)=a(2) a(2)= 【8】 End If If a(2)>a(3) Then m=a(2) Else If a(1)>a(3)Then m= 【9】 Else m= 【10】 End If Print“中间数是：”；m End Sub 程序运行后，单击窗体，在输入对话框中分别输人三个整数，程序将输出三个数中的中间数，如图所示。请填空。
相关试题