题目详情
当前位置:首页 > 职业培训考试
题目详情:
发布时间:2023-10-10 19:18:44

[单项选择]在窗体上添加一个命令按钮(名为Command1),然后编写如下事件过程:

Private Sub Command1_Click( )

For i=1 To 4

x=4

For j=1 To 3

x=3

Fork=1 To 2

x=x+6

Next k

Next j

Next i

MsgBox x

End Sub

打开窗体后,单击命令按钮,消息框的输出结果是( )。
A. 7
B. 15
C. 157
D. 528

更多"在窗体上添加一个命令按钮(名为Command1),然后编写如下事件过程"的相关试题:

[填空题]在窗体上添加一个命令按钮Command1,然后编写如下代码:
Private Sub Command1_Click( )
sum=0
For i=3 To 7
sum=i+2
Next i
MsgBox sum+i
End Sub
打开窗体后,单击命令按钮,消息框的输出结果是______。
[填空题]在窗体上添加一个命令按钮Command1,然后编写如下事件过程。
Private Sub Command1_Click( )
Dim b,k
For k=1 To 6
b=23+k
Next k
MsgBox k+b
End Sub
打开窗体后,单击命令按钮,消息框数据的结果是______。
[填空题]在窗体上添加一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click( ) sum=0 For i=3 To 7 sum=i+2 Next i MsgBox sum+i End Sub 打开窗体后,单击命令按钮,消息框的输出结果是______。
[填空题]在窗体上添加一个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click( )
Sum =0
For i=3 T0 7
Sum =i+2
Next i
MsgBox sum+i
End Sub
打开窗体后,单击命令按钮,消息框的输出结果是______。
[填空题]在窗体上添加一个命令按钮,名称为Command1,然后编写如下程序:
Private Sub Command1 Click( )
sum=0
For i1 To 100 step 2
sum=sum+i
Next i
MsgBox sum
End Sub
打开窗体运行后,单击命令按钮,则消息框的输出结果为______。
[单项选择]在窗体上添加一个命令按钮(名为Command1,然后编写如下事件过程:
Private Sub Command1_Click( )
For i=1 To 4
x=4
For j=1 To 3
x=3
For k=1 To 2
x=x+6
Next k
Next j
Next i
MsgBox x
End Sub
打开窗体后,单击命令按钮,消息框的输出结果是______。
A. 7
B. 15
C. 157
D. 538
[填空题]在窗体上添加一个命令按钮(名为Command1),然后编写如下事件过程: Private Sub Command1_Click( ) Dim b,k Fork=1 to 6 b=23+k Next k MsgBoxb+k End Sub 打开窗体后,单击命令按钮,消息框的输出结果是 【15】
[填空题]在窗体上添加十个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click( )
sum=0
For i=3 To 7
sum=i+2
Next i
MsgBox sum+i
End Sub
打开窗体后,单击命令按钮,消息框的输出结果是______。
[单项选择]在窗体上有一个命令按钮Command1,编写如下程序:
Private Sub Command1_Click( )
Print pp1(3, 7)
End Sub
Public Function pp1(x As Single, n As Integer) As Single
If n = 0 Then
pp1 = 1
Else
If n Mod 2=1 Then
pp1=x*x+n
Else
pp1=x*x-n
End If
End If
End Function
程序运行后,单击该命令按钮,屏幕上显示的是( )。
A. 2
B. 1
C. 0
D. 16
[单项选择]在窗体上有一个命令按钮Command1,编写下列程序:

Private Sub Command1_Click( )

Print pp1(3,7)

End Sub

Public Function pp1(x As Single,n As Integer)As Single

If n=0 Then

pp1=1

Else

If n Mod 2=1 Then

pp1=x*x+n

Else

pp1=x*x-n

End If

End If

End Function

程序运行后,单击该命令按钮,屏幕上显示的是( )。
A. 2
B. 1
C. 0
D. 16
[单项选择]在窗体上画一个命令按钮Command1,然后编写如下代码:
Private Sub Command1_Click( )
Dim Arr1(10) As Integer, Arr2(10)As Integer
n=3
For i = 1 To 5
Arr1 (i)=i
Arr2(n)=2 * n+i
Next i
Print Arr2(n); Art1 (n)
End Sub
运行程序后,单击命令按钮,输出结果是( )。
A. 11 3
B. 3 11
C. 13 3
D. 3 13

我来回答:

购买搜题卡查看答案
[会员特权] 开通VIP, 查看 全部题目答案
[会员特权] 享免全部广告特权
推荐91天
¥36.8
¥80元
31天
¥20.8
¥40元
365天
¥88.8
¥188元
请选择支付方式
  • 微信支付
  • 支付宝支付
点击支付即表示同意并接受了《购买须知》
立即支付 系统将自动为您注册账号
请使用微信扫码支付

订单号:

截图扫码使用小程序[完全免费查看答案]
请不要关闭本页面,支付完成后请点击【支付完成】按钮
恭喜您,购买搜题卡成功
重要提示:请拍照或截图保存账号密码!
我要搜题网官网:https://www.woyaosouti.com
我已记住账号密码