题目详情
当前位置:首页 > 职业培训考试
题目详情:
发布时间:2024-04-25 21:00:29

[单项选择]

设有一个命令按钮Commsand1的事件过程以及一个函数过程。程序如下:
Private Sub Command1_Click(0
Static x As Integer
x=f(x+5)
Cls
Print x
End Sub
Private Funtion f(x As integer)As Integer
F=x+x
End Funtion
连续单击命令按钮3次,第3次单击命令按钮后,窗体上显示的计算结果是()。


A. 10
B. 30
C. 60
D. 70

更多"设有一个命令按钮Commsand1的事件过程以及一个函数过程。程序如下"的相关试题:

[单项选择]窗体上有一个命令按钮,命令按钮的单击事件过程如下:
Private Sub Command1_Click( )
Dim a
  a=Array(1,2,3,4,5)
  For k=1 To 4
    s=s+a(k)
  Next
  Print S
End Sub
运行程序后,单击命令按钮,输出结果是
A. 10
B. 14
C. 15
D. 120
[单项选择]设有命令按钮Commandl的单击事件过程,代码如下: Private Sub Commandl_Click( ) Dima(3,3)As Integer Fori=1 To 3 Forj=1 To 3 a(i,j)=i*j+i Next j Nexti Sum=0 Fori=1 To 3 Sum=Sum+a(i,4-i) Next i Print Sum End Sub 运行程序,单击命令按钮,输出结果是( )。
A. 20
B. 7
C. 16
D. 17
[单项选择]设有命令按钮Command1的单击事件过程,代码如下:
Private Sub Command1_Click( )
Dim a[3,3) As Integer
For i=1 To 3
For j=1 To 3
a(i,j):i*j+i
Next j
Next i
Sum=0
For i=1 To 3
Sum=Sum+a(i,4-i)
Next i
Print Sum
End Sub
运行程序,单击命令按钮,输出结果是( )。
A. 20
B. 7
C. 16
D. 17
[单项选择]在窗体中画一个命令按钮,然后编写以下事件过程:     
Private Sub Command1_Click(  )
       For X=5 To 2.5 Step-6
Next X
Print X
End Sub
程序运行后,输出的结果是
A. 2.2
B. 2.5
C. 2.9
D. -1
[单项选择]在窗体中画一个命令按钮,然后编写以下事件过程:      Private Sub Command1_Click(  )        For X=5 To 2.5 Step-6 Next X Print X End Sub 程序运行后,输出的结果是
A. 2.2
B. 2.5
C. 2.9
D. -1
[单项选择]在窗体中有一个命令按钮Command1,编写事件代码如下。
Private Sub Command1_Click( )
Dim s As Integer
s=P(1)+P(2)+P(3)+P(4)
debugPrint s
End Sub
Public Function P(N As Integer)
Dim Sum As Integer
Sum=0
For i=1 To N
Sum=Sum+i
Next i
P=Sum
End Function
打开窗体运行后,单击命令按钮,输出结果是( )。
A. 15
B. 20
C. 25
D. 35
[单项选择]在窗体上有一个命令按钮Command1,编写事件代码如下:
Prirate Sub Command1_Click( )
Dim d1 AS Date
Dim d2 As Date
d1=#12/25/2009#
d2=#1/5/2010#
MsgBox DateDiff("ww",d1,d2)
End Sub
打开窗体运行后,单击命令按钮,消息框中输出的结果是
A. 1
B. 2
C. 10
D. 11
[单项选择]在窗体中有一个命令按钮command1,编写事件代码如下:
Private Sub Command1_Click( )
Dim s As Integer
s=P(1)+P(2)+P(3)+P(4)
Debug.Print s
End Sub
Public Function P(N As Integer)
Dim Sum As Integer
Sum=0
For i=1 To N
Sum=Sum+1
Next i
P=Sum
End Function
打开窗体运行后,单击命令按钮,输出的结果是
A. 15
B. 20
C. 25
D. 35
[单项选择]在窗体上画一个命令按钮,然后编写如下事件过程:
Private Sub Commandl Click( )
Dim a( )
a=Array(1,3,5,7)
s=0
For i=1 To 3
S=S*10+a(i)
Next i
Print s
End Sub
程序运行后,输出结果为( )。
A. 135
B. 357
C. 531
D. 753
[单项选择]在窗体上画一个命令按钮,然后编写如下事件过程:
Private Sub Commandl Click( )
Dim a( )
a=Array(1,3,5,7)
s=O
For i=1 TO 3
S=S*10十a(i)
Next i
PrInt S
End Sub
程序运行后,输出结果为( )。
A. 135
B. 357
C. 531
D. 753
[单项选择]在窗体上画一个命令按钮,然后编写如下事件过程:
Private Sub Commandl—Click( )
x=InputBox(“请输入一个整数”)
Print x+345
End Sub
程序运行后,单击命令按钮,在输入对话框中输入123,则在窗体上输出的内容为( )
A. 123345
B. 468
C. 123
D. 345
[单项选择]窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出结果是( )。
Private Sub Command1_Click( )
Dim a
a=Array(1,2,3,4,5)
For k=1 To 4
S=S+a(k)
Next k
Print S
End Sub
A. 10
B. 14
C. 15
D. 120

我来回答:

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

订单号:

请不要关闭本页面,支付完成后请点击【支付完成】按钮
恭喜您,购买搜题卡成功
重要提示:请拍照或截图保存账号密码!
我要搜题网官网:https://www.woyaosouti.com
我已记住账号密码