首页 > 计算机等级考试

题目内容（请给出正确答案）

[主观题]

当发生Form_Click事件时，下列程序的输出结果是（)。Private m As Integer,n As IntegerPrivate Sub

当发生Form_Click事件时，下列程序的输出结果是()。 Private m As Integer,n As Integer Private Sub Form_Click() Dim k As Integer，p As Integer k=6：p=60 Call sub1(k,p) Print m,n,m,k,p Call sub1(k,p) Print m,n,k,p End Sub Private Sub Form_Load() m=7 n=70 End Sub Public Sub sub1(x As Integer,ByVal y As Integer) Dim m As Integer n=n+5 m=n+x+y x=x+y y=x+y End Sub

A．7 75 66 60 7 80 126 60

B．7 75 66 60 7 75 126 60

C．7 75 66 60 7 80 66 60

D．7 75 66 60 7 75 66 60

查看答案

如果结果不匹配，请联系老师获取答案

您可能会需要：

重置密码查看订单联系客服

安装优题宝APP，拍照搜题省时又省心！

更多“当发生Form_Click事件时，下列程序的输出结果是（)。…”相关的问题

第1题

当发生窗体的单击事件时，输出的第二行为（)。Private Sub Form_click（)Dim N1 As Integer,N2 As In

当发生窗体的单击事件时，输出的第二行为()。 Private Sub Form_click() Dim N1 As Integer,N2 As Integer,N3 As Integer N1=1:N2=1 Print N1;N2 Do N3=N1+N2 Print N3； N1=N2:N2=N3 Loop Until N3＞=5 End Sub

A．1 1 1

B．2 3 5

C．2 5 7

D．2 3 4

点击查看答案

第2题

当Form_Click;事件发生时,窗体上显示的第三行是 ______。 Private Sub Form_Click（)Dim i As Inte

当Form_Click;事件发生时,窗体上显示的第三行是 ______。 Private Sub Form_Click() Dim i As Integer, j As Integer, k As Integer Dim x(5, 5) As Integer For i = 1 To 5 k = 1 For j = 1 To 5 If i ＜= j Then x(i, j) = k + 1 k=k+2 Else x(i, j) = k + 1 End If Next j Next i For i = 1 To 5 For j = 1 To 5 Print x(i, j) Next j Print Next i End Sub

A．22135

B．21357

C．22213

D．13579

点击查看答案

第3题

当发生Form_Click事件时，窗体上显示的第三行是（)。Option Base 1Private Sub Form_Click（) Dim i

当发生Form_Click事件时，窗体上显示的第三行是()。 Option Base 1 Private Sub Form_Click() Dim i As Integer，j As Integer，k As Integer Dim a(5，5)As Integer For i=1 To 5 k=1 For i=1 To 5 If(i＜=j)Then a(i,j)=k k=k+2 Else a(i,j)=k+1 End If Next j Next i For i=1 To 5 For j=1 To 5 Print a(i,j)； Next j Print Next i End Sub

A．1 3 5 7 9

B．2 1 3 5 7

C．2 2 2 1 3

D．2 2 1 3 5

点击查看答案

第4题

程序段如下，当发生Form_Click事件时，窗体上输出的结果是（)。Option ExplicitPrivate x As Integer

程序段如下，当发生Form_Click事件时，窗体上输出的结果是()。 Option Explicit Private x As Integer Public y As Integer Sub Test() Dim y as integer x=2：y=2 Print"x1=";x;"y1=";y End Sub Private Sub Form_Click() x=1：y=1 Test Print "X2="；x；"y2="；y End Sub

A．x1=2 y1=2 x2=2 y2=1

B．x1=2 y1=2 x2=2 y2=2

C．x1=2 y1=1 x2=2 y2=2

D．x1=2 y1=1 x2=2 y2=1

点击查看答案

第5题

当Form1_Click事件发生时，写出在窗体上显示的第二行和第三行是（)。Private a As Integer,c As Int

当Form1_Click事件发生时，写出在窗体上显示的第二行和第三行是()。 Private a As Integer,c As Integer Private Sub Form_Click() Dim a As Integer,b As Integer a=10：b=10：c=10 Print a,b,c Call test1(a,B)Print a,b,c End Sub Private Sub test1(m As Integer,ByVal n As Integer) Dim c As Integer m=5：n=5：c=5 Print m,n,c End Sub

A．5 5 5 5 10 10

B．5 5 5 5 5 10

C．5 5 10 5 10 10

D．5 5 5 10 10 10

点击查看答案

第6题

下列程序，当单击窗体时s的值是（)Private Sub Form_Click（)s = 11 \ 3 ＋ 11 Mod 3Print sEnd

下列程序，当单击窗体时s的值是()

Private Sub Form_Click()

s = 11 \ 3 + 11 Mod 3

Print s

End Sub

A.3

B.4

C.5

D.6

点击查看答案

第7题

当运行程序时,系统自动启动窗体的事件过程是().(Enabled是否失效，Visible是否可见)

A.Load

B.Click

C.UnLoad(关闭窗体时启动)

D.GotFocus

点击查看答案

第8题

（25 ）下列关于对象 “ 更新前 ” 事件的叙述中，正确的是A ）在控件或记录的数据变化后发生的事件B

（25 ）下列关于对象 “ 更新前 ” 事件的叙述中，正确的是

A ）在控件或记录的数据变化后发生的事件

B ）在控件或记录的数据变化前发生的事件

C ）当窗体或控件接收到焦点时发生的事件

D ）当窗体或控件失去了焦点时发生的事件

点击查看答案

第9题

有下列的窗体事件过程：Private Sub Form_Click（)a="MicrosoftVisual Basic"b=Right（a,5)c=Mid（a,1,9)MsgBox a,34,b,c,5End Sub程序运行后，单击窗体，则在弹出的信息框的标题栏中显示的信息是（)。

A.Microsoft Visual

B.Microsoft

C.Basic

D.5

点击查看答案

第10题

当电力系统发生下列哪些事件时相量测量装置应能建立事件标识？（)

A.频率越限及频率变化率越限

B.幅值越上限和越下限

C.线路功率振荡

D.同步时钟信号丢失、异常

点击查看答案

长沙正则教育科技有限公司版权所有 ©2024

湘ICP备20014704号-1 营业执照

违法和不良信息举报电话：400-118-7898

举报/反馈/投诉邮箱：deng＃ujigu.com（请将＃替换成@）