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

[单项选择]单击一次命令按钮后,下列程序的执行结果是( )。   Private Sub Command1_Click( )    s=P(1) +P(2) +P(3) +P(4)    Print s   End Sub   Public Function P(N As Integer)    Static Sum    For i=1 To N    Sum=Sum+i    Next i    P=Sum   End Function
A. 15
B. 25
C. 35
D. 45

更多"单击一次命令按钮后,下列程序的执行结果是( )。   Priva"的相关试题:

[单项选择]单击一次命令按钮后,下列程序的执行结果是  Private Sub Command1_Click( )    s=P(1) +P(2) +P(3) +P(4)    Print s   End Sub   Public Function P(N As Integer)    Static Sum    For i=1 To N    Sum=Sum+i    Next i    P=Sum   End Function
A. 15
B. 25
C. 35
D. 45
[单项选择]单击一次命令按钮后,下列程序的执行结果是( )。   Private Sub Command1_Click( )    s=P(1) +P(2) +P(3) +P(4)    Print s   End Sub   Public Function P(N As Integer)    Static Sum    For i=1 To N    Sum=Sum+i    Next i    P=Sum   End Function
[单项选择]单击一次命令按钮之后,下列程序代码的执行结果为 private Sub Command1_Click( ) S=P(1) +P(1)+P(2)+P(3)+P(4) Print S: End Sub Public Function P(N As Integer) Static Sum For I=1 To n Sum=Sum+I Next 1 P=Sum End Function
A. 20
B. 35
C. 115
D. 135
[单项选择]单击一次命令按钮后,下列程序的执行结果是( )。 Private Sub Commandl_Click( ) s=P(1)+P(2)+P(3)+P(4) Print s End Sub Public FunctionP(N As Integer) Static Sum Fori=1To N Sum=Sum+i Nexti P=Sum End Function
A. 15
B. 25
C. 35
D. 45
[单项选择]单击一次命令按钮之后,窗体中的输出结果为______ 。 Private Sub Command1_ Click( ) Dim a As Single Dim b As Single a = 10 b = 20 Call Num(a, b) Print a, b End Sub Sub Num(a, b) t = a a = b / t b = t End Sub
A. 20 10
B. 10 20
C. 2 10
D. 10 10
[单项选择]设有命令按钮 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
[单项选择]假定有如下的命令按扭(名称为 Command1)事件过程: Private Sub Command1_Click( ) x=InputBox("输入:","输入整数")MsgBox "输入的数据是:",,"输入数据:"+x End Sub 程序运行后,单击命名按扭,所果从键盘上输入整数10,则以下叙述中错误的是______。
A. x的值是数值10
B. 输入对话框的标题是“输入整数”
C. 信息框的标题是“输入数据:10”
D. 信息框中显示的“输入的数据是:”
[单项选择]单击命令按钮,下列事件过程的执行结果为   Private Sub Command1_Click( )    Dim x As Integer, y As Integer    x=40:y=72    Call PtoP(x, y)    Print x; y   End Sub   Public Sub PtoP(Byval n AS Integer, ByVal m Aa Integer)    n = n / 10+2    m = m / 10+2   End Sub
A. 0 8
B. 40 72
C. 4 50
D. 78 50
[单项选择]单击命令按钮时,下列的执行结果为  Private Sub Command1_Click( )    Dim x As Integer,y As Integer    x=86:y=29    Call Proc(x,y)    Print x;y  End Sub  Public Sub Proc(n As Integer,ByVal m As Integer)    n=n Mod 10    m=m Mod 10  End Sub
A. 12 32
B. 6 29
C. 2 3
D. 12 3

我来回答:

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

订单号:

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