刷题首页
题库
高中信息
题干
有一个VB程序,其程序界面中有一个按钮Command1及一个文本框Text1,并且其程序代码如下:
当点击Command1后,Text1中将显示( )
A.3
B.4
C.5
D.6
上一题
下一题
0.99难度 选择题 更新时间:2017-03-02 10:25:08
答案(点此获取答案解析)
同类题1
某算法要实现0到100的偶数之和,流程图如图所示。则ißi+2被执行的次数是
A.50
B.51
C.100
D.101
同类题2
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Dim n As Integer
Dim m As Integer
m = 0
For n =" 1" To 20
If n Mod 3 <> 0 Then m =" m" + n \ 3
Next n
Text1.text = Str(m)
End Sub
程序运行后,如果单击命令按钮,则文本框Text1中显示的内容是 ( )
A.15
B.18
C.42
D.24
同类题3
某Visual Basic程序如下:
Private Sub Command1_Click()
Dim x As Integer, y As Integer ,a As Integer ,b As Integer
X="0"
y=0
For a="1" To 3
x=x+1
For b="2" to 4
y=y+1
Next b
Next a
Text1.text=str(a)
Text2.text=str(b)
End Sub
单击Command1按钮后,Text1显示
①
,Text2显示
②
。
同类题4
某 VB 程序代码如下:
n=Val(Text1.Text)
sum=n
k=4
Do While n\k>0
sum=sum+n\k
n=n\k+n mod k
Loop
Text2.Text=Str(sum)
在文本框 Text1中输入10,执行该程序段后,文本框 Text2中显示的值是( )
A.12
B.13
C.14
D.16
同类题5
有VB程序段如下:
s="2019.06 Visual Basic6.0":n=0
For i=1 To Len(s)
ch=Mid(s,i,1)
If ch>="0" And ch<="9"Then
m=Asc(ch)-Asc("0")+1
a(m)=a(m)+1
End If
Next i
For i=1 To 10
If a(i)>1Then n=n+i
Next i
数组a各元素的初始值都为0,执行该程序段后,则变量n的值为( )
A.2
B.4
C.8
D.10
相关知识点
算法理论
面向对象程序设计 VB开发工具
循环语句