假定有如下事件过程: Private Sub Form_MouseDown(Button as Integer,Shift as Integer, X as Single,Y as Single) If Button=2 Then PopupMenu PopForm End Sub 则以下描述中错误的是( )。A、该过程的功能是弹出一个菜单B、popForm是在菜单编辑器中定义的弹出式菜单的名称C、参数X、Y指明鼠标的当前位置D、Button=2表示按下的是鼠标左键

假定有如下事件过程: Private Sub Form_MouseDown(Button as Integer,Shift as Integer, X as Single,Y as Single) If Button=2 Then PopupMenu PopForm End Sub 则以下描述中错误的是( )。

  • A、该过程的功能是弹出一个菜单
  • B、popForm是在菜单编辑器中定义的弹出式菜单的名称
  • C、参数X、Y指明鼠标的当前位置
  • D、Button=2表示按下的是鼠标左键

相关考题:

有一过程如下:Sub Sub1(m As Integer,total As Long)Dim i As Integertotal=1For i=1 To mtotal=total*iNextEnd Sub调用它的事件过程如下:Private Sub Command1_Click()Dim tot As Long,a As Integera=Val(InputBox("请输入数据"))Call Sub1(a,tot)Print totEnd Sub则输入数据5,运行结果为【 】。

假定有如下的窗体事件过程:Private Sub Form_Click()a$ = "Microsoft Visual Basic"b$ = Right(a$, 5)c$ = Mid(a$, 1, 9)MsgBox a$, 34, b$, c$, 5End Sub程序运行后,单击窗体,则在弹出的信息框的标题栏中显示的信息是( )。A.Microsoft VisualB.MicrosoftC.BasicD.5

假定有如下的Sub过程:Sub sfun(x As Single,y As Single)t=xx=t/yy=t Mod yEnd Sub在窗体上添加一个命令按钮(名为Command1),然后编写如下事件过程:Private Sub Command1_Click()Dim a as singleDim b as singlea=5b=4sfun a,bMsgBox a chr(10)+chr(13) bEnd Sub打开窗体运行后,单击命令按钮,消息框的两行输出内容分别为A.1和1B.1.25和1C.1.25和4D.5和4

有弹出式菜单的结构如下表,程序运行时,单击窗体则弹出如下图所示的菜单。下面的事件过程中能正确实现这一功能的是( )。A.Private Sub Form_Click() PopupMenu cut End SubB.Private Sub Command1_Click() PopupMenu edit End SubC.Private Sub Form_Click() PopupMenu edit End SubD.Private Sub Form_Click() PopupMenu cut End Sub

假定有如下事件过程:Private Sub Form_Click()Dim x As Integer, n As Integerx = 1n = 0Do While x 28x = x * 3n = n + 1LoopPrint x, nEnd Sub程序运行后,单击窗体,输出结果是( )。A.81 4B.56 3C.28 1D.243 5

假定有下表所列的菜单结构:━━━━━━━━━━━━━━━━━━━━标题 名称 层次────────────────────显示 appear 1(主菜单)大图标 bigicon 2(子菜单)小图标 smallicon 2(子菜单)━━━━━━━━━━━━━━━━━━━━要求程序运行后,如果单击菜单项“大图标”,则在该菜单项前添加一个“?”。以下正确的事件过程是( )。A.Private Sub bigicon_Click()bigicon.Checked = FalseEnd SubB.Private Sub bigicon_Click()Me.appear.bigicon.Checked = TrueEnd SubC.Private Sub bigicon_Click()bigicon.Checked = TrueEnd SubD.Private Sub bigicon_Click()appear.bigicon.Checked = TrueEnd Sub

有如下SUB过程:Sub s(x As Single,y As Single)t=xx=t / yy=t Mod yEnd Sub在窗体上添加一个命令按钮,然后编写如下事件过程:Private Sub Form_Click()Dim a As SingleDim b As Singlea=5b=4s a,bPrint a,bEnd Sub则程序运行后,单击命令按钮,输出的结果为【 】 。

设程序中有如下数组定义和过程调用语句: Dim a(10)As Integer … Call D(a) 如下过程定义巾,正确的是( )。A.Private Sub p(a As Integer)B.Private Sub p(a( )As Integer)C.Private Sub p(a(10)As Integer)D.Private Sub p(a(n)As Integer)

假定有如下的Sub过程: Sub sfun(x As Single,y As Single) t=x x=t/y y=t Mod y End Sub 在窗体上添加一个命令按钮(名为Command1),然后编写如下事件过程: Private Sub Command1 Click() Dim a as single Dim b as single a=5 b=4 sfun a,b MsgBox a chr(10)+chr(13)b End Sub 打开窗体运行后,单击命令按钮,消息框的两行输出内容分别为( )。A.1n1B.1.25和1C.1.25和4D.5和4

窗体Form1上有一个名称为Command1的命令按钮,以下对应窗体单击事件的事件过程是( )。A.Private Sub Form1 Click( )End Sub···B.Private Sub Form1. Click( )End Sub···C.Private Sub Command1 click( )End Sub···D.Private Sub Command Click( )End Sub···

有如下过程:Sub SS(ByVal X,ByRef Y,Z)X=X + 1Y=Y + 1Z=Z + 1End Sub执行该过程的事件过程如下:Private Sub Command1_Click()A = 1B = 2C = 3Call SS(A,B,C) Print A;B;CEnd Sub则该程序的执行结果是【 】。

窗体Forml上有一个名称为Commandl的命令按钮,以下对应窗体单击事件的事件过程是A.Private Sub Forml_Click() … End SubB.Private Sub Form_Click() … End SubC.Private Sub Commandl_Click() … End SubD.Private Sub Command_Click() … End Sub

假定有如下的Sub过程: Sub Func(x As Single, y As Single) t=x x=t/y y=t Mod y End Sub 在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim a As Single Dim b As Single a=6 b=5 Func(a, B) Print a, b End Sub 程序运行后,单击命令按钮,输出结果为 ______。A.6 5B.1 1C.1.2 5D.1.2 1

假定有如下的Sub过程: Sub S(x As Single,y As Single) t=x x=t/y y=t Mod y End Sub 在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim a As Single Dim b As Single a=5 b=2 S a,b print a,b End Sub 程序运行后,单击命令按钮,输出结果是( )。A.5 2B.1 1C.1.25 4D.2.5 1

假定有如下的Sub过程: Sub sfun(x As Single,y As SinglE)t=x x=t/y y=t Mod y End Sub 在窗体上添加一个命令按钮(名为Command1),然后编写如下事件过程: Private Sub Command1_Click( ) Dim a as single Dim b as single a=5 b=4 sfun a,b MsgBox a char(10A.1和1B. 1.25和1C. 1.25和4D. 5和4

假定有下表所列的菜单结构:要求程序运行后,如果单击菜单项“大图标”,则在该菜单项前添加一个“√”。以下正确的事件过程是______。A. Private Sub bigicon_Click() bigicon.Checked=False End SubB.Pfivate Sub bigicon_Click() Me.appear.bigicon.Checked=True End SubC.Private Sub bigicon_Click() bigicon.Checked=Tree End SubD.Private Sub bigicon_Click() appear.bigicon.Checked=Tree End Sub

设程序中有如下数组定义和过程调用语句:Dim a(10) as integer……Call p(a)如下过程定义中,正确的是A)Private Sub p(a as integer)B)Private Sub p(a() as integer)C)Private Sub p(a(10) as integer)D)Private Sub p(a(n) as integer)

假定有如下的Sub过程:Sub Sub1(x As Single,y As single)t=xx=t/yy=t Mod yEnd Sub在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_click()Dim a As SingleDim b As Singlea=5b=4Sub1 a,bPrint a;bEnd Sub程序运行后,单击命令按钮,输出结果为A.B.C.D.

假定有如下的Sub过程:Sub Sub1(x As Single, y As single)t=xx=t / yy=t Mod yEnd Sub在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim a As SingleDim b As Singlea=5b=4Sub1 a,bPrint a;bEnd Sub程序运行后,单击命令按钮,输出结果为A.54B.] 1]]1C.] 1.2]]5.4D.] 1.25]]1

假定有如下的Sub过程:Sub Sub1 (x As Single, y As Single) t=x x = t/y y = t Mod yEnd Sub 在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_ Click() Dim a As Single Dim b As Single a = 5 b = 4 Sub1 a, b Print a; b End Sub 程序运行后,单击命令按钮,输出结果为______。A.5 4B.1 1C.1.2 5.4D.1.25 1

假定有如下的Sub过程: Sub sfun(X As Single,Y As Single)t=Xx=t/yY=tModYEnd Sub在窗体上添加一个命令按钮(名为Commandl),然后编写如下事件过程: Private Sub Commandl_Click() Dim aAs singleDimbAs singlea=5b=4sfun a,bMsgBox a&chr(10)+chr(131&bEndSub打开窗体运行后,单击命令按钮,消息框的两行输出内容分别为( )。A.1和1B.1.25和1C.1.25和4D.5和4

有弹出式菜单的结构如右表,程序运行时,单击窗体则弹出如下图所示的菜单。下面的事件过程中能正确实现这一功能的是( )。A.Private Sub Vorm Click( ) PopupMenu cut End SubB.Private Sub Command1 Click( ) PopupMenu edit End SubC.Private Sub Form. Click( ) PopupMenu edit End SubD.Private Sub Form. Click( ) PopupMenu cut PopupMenu paste End Sub

假定有下表所列的菜单结构: (表格) 要求程序运行后,如果单击菜单项“大图标”,则在该菜单项前添加一个“√”。以下正确的事件过程是______。A.Private Sub bigicon_Click() bigicon.Checked=False End SubB.Private Sub bigicon_Click0 ME.appear.bigicon.Checked=True End SubC.Private Sub bigicon_Click() bigicon.Checked=True End SubD.Private Sub bigicon_Click0 appear.bigicon.Checked=True End Sub

有如下Sub过程: Sub Sun(x As Single, y As Single) t=x x=t/y y=t Mod y End Sub 在窗体上的命令按钮Command1中,编写如下事件过程,执行该事件过程调用Sun过程,结果为( )。 Private Sub Command1_Click() Dim a As Single Dim b As Single a=5 b=4 Sun a, b Print a; b End SubA.1.25 1B.5 4C.4 5D.1 1.25

假定有下表所列的菜单结构:要求程序运行后,如果单击菜单项“大图标”,则在该菜单项前添加一个“√”。以下正确的事件过程是A.Private Sub bigicon_Click( ) bigicon. Checked = False End SubB.Private Sub bigicon_Click( ) Me. appear, bigicon. Checked = True End SubC.Private Sub bigicon_Click() bigicon.Checked=True End SubD.Private Sub bigicon_Click() appear.bigicon.Checked=True End Sub

有如下Sub过程:Sub ind(a As Integer)Static x As Integerx= x + aPrint x:End Sub以下是调用它的事件过程,程序运行后,单击命令按纽Command1三次,输出结果为【 】。Private Sub Command1_Click()Ind 2End Sub

窗体Form. 1上有一个名称为Command 1的命令按钮,以下对应窗体单击事件的事件过程是A)Private Sub Form. 1_Click() B)Private Sub Form. _Click()End Sub End SubC)Private Sub Commandl_Click() D)Private Sub Command_ Click()End Sub End Sub

单选题假定有如下的Sub过程: SubS (x As Single, y As Single) t = x x = t / y y = t Mod y End Sub 在窗体上添加一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click( ) Dim a As Single Dim b As Singlea = 5: b = 4 S a, b Print a, b End Sub 程序运行时,单击命令按钮得到的结果()。A54B11C1.254D1.251