题目详情
当前位置:首页 > 职业培训考试
题目详情:
发布时间:2023-10-29 07:17:46

[单项选择]以下程序运行时,单击窗体后,在窗体上输出的结果是 ______。 Private SubForm_Click( ) Dim a As Integer,b As Integer a=10 :b=20 Call ff(a,B) Print a,b End Sub Private Sub ff(x As Integer,y As Integer) x=x+y y=x+y End Sub
A. 30 50
B. 30 30
C. 20 20
D. 10 20

更多"以下程序运行时,单击窗体后,在窗体上输出的结果是 ______。 P"的相关试题:

[单项选择]下面程序运行时,单击窗体后,窗体上显示的结果是( )。 Private Sub Form_Click( ) Dim I As Integer Dim sum As Long sum=0 For I=10 To 16 If I Mod 3=0 OrI Mod 5=0 Then sum=sum+I End If Next I Print sum End Sub
A. 10
B. 12
C. 37
D. 22
[单项选择]下列程序运行时,两次单击窗体后,显示的结果是( )。 Private Sub Form_Click( ) Dim b As Integer Static c As Integer b=b+2 c=c+2 Print "b=";b;"c=";c End Sub
A. b=2 c=2 b=2 c=2
B. b=2 c=2 b=4 c=4
C. b=2 c=2 b=2 c=4
D. b=2 c=2 b=4 c=2
[单项选择]以下程序运行时,输入3和4后输出的结果是______。 Private Sub Command1_Click( ) a=InputBox(“请输入a的值”) b=InputBox(“请输入b的值”) Print a+b End Sub
A. 3+4
B. 7
C. 34
D. 12
[单项选择]下列程序运行时输出的结果是 Option Base 1 Private Sub Form_Click( ) Dim x(10) As Integer,y(5) As Integer For i=1 to 10 x(i) =10-i+1 Next For i=1 to 5 y(i)=x(2*i-1)+x(2*i) Next For i=1 to 5 Print y(i) Next End Sub
A. 3 7 11 45 19
B. 19 15 11 7 3
C. 1 3 5 7 9
D. 不确定的值
[单项选择]下列程序运行时输出的结果是 Private Sub Form_Click( ) Dim x x=Array(“天天向上”,“清华大学”,“天上人间”,“程序设计”) For i=LBound(a,1)to UBound(a,1) If Left(a(i),1)=“天”Then Print a(i); Next End Sub
A. 天天向上
B. 天天向上天上人间
C. 出错信息
D. 天天向上清华大学天上人间程序设计
[单项选择]下列程序运行时输出的结果是( )。 Option Base 1 Private Sub Form_Click( ) Dimx(10) ForI=1 to 10 x(i)=10-I+1 Next I ForI=10 to 1 step-2 Printx(i); NextI End Sub
A. 1 3579
B. 975 3 1
C. 1234567 89 10
D. 1098765432 1
[单项选择]下面的程序运行时,为了在窗体上输出“VB6.0”,应在窗体上执行的操作是( )。 Private Sub Form_MouseDown(BuRon As Integer,shift As Integer,x As Single,Y As Single)  If Button And 3=3 then   Print"VB 6.0"  End If End Sub
A. 只能按下右键
B. 只能按下左键
C. 应同时按下左、右键
D. 按下左、右键之一
[单项选择]下列程序运行时输出的结果是( )。 Private Sub Form_Click( ) Dima a=Array("天天向上","清华大学","天上人间","程序设计") forI=Lbound(a,1) to Ubound(a,1) ifleft(a(i),1)="天"then print a(i); nextI End Sub
A. 天天向上
B. 天天向上天上人间
C. 出错信息
D. 天天向上清华大学天上人间程序设计
[单项选择]

下面程序运行时,若输入395,则输出结果是()
  Private Sub Comand1_Click( )
  Dim x%
  x=InputBox("请输入一个3位整数")
  Print x Mod 10,x/100,(x Mod 100)/10
  End Sub


A. 3 9 5
B. 5 3 9
C. 5 9 3
D. 3 5 9
[单项选择]

若看到程序中有以下事件过程,则可以肯定的是,当程序运行时()
  Private Sub Click_MouseDown(Button As Integer,_Shift As Integer,X As Single,Y As Single)
  Print “VB Program”
  End Sub


A. 用鼠标左键单击名称为“Command1”的命令按钮时,执行此过程
B. 用鼠标左键单击名称为“MouseDown”的命令按钮时,执行此过程
C. 用鼠标左键单击名称为“MouseDown”的控件时,执行此过程
D. 用鼠标左键或右键单击名称为“Click”的控件时,执行此过程
[单项选择]下列程序段,运行后窗体上输出结果是( )。 Private Sub Command1_Click( ) a=5:b=4:c=3:d=2 x=3>2*b Or a=c And b<>c Or c>d Printx End Sub
A. 1
B. True
C. False
D. 2
[单项选择]下列事件过程运行时,信息框中出现的结果是______。 Private Sub Command1_Click( ) MsgBox Str(123+123) End Sub
A. 123+123
B. 123
C. 246
D. 显示出错信息
[单项选择]窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出结果是 Private Sub Command1_Click( ) Dim a a = Array(1,2,3,4,5) For k = 1 To4 s=s+a(k) Next Print S End Sub
A. 10
B. 14
C. 15
D. 120
[单项选择]假定编写了如下4个窗体事件的事件过程,对运行应用程序并显示窗体后,已经执行的事件过程是()。
A. Load
B. Click
C. lostfocus
D. Keypress

我来回答:

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

订单号:

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