某VisualBasic程序如下：PrivateSubCommand1_Click()DimaAsString,bAsStringa="up"b="look"+_刷题宝

题干

某Visual Basic程序如下：
Private Sub Command1_Click()
Dim a As String, b As String
a = "up "
b ="look "+" "+a
Label1.Caption = b
End Sub
运行程序，单击命令按钮Command1后弹出如下图所示的出错信息提示，此时程序正执行的语句是（）

A．Dim a As String, b A s String	B．a = "up "
C．b = "look "+" "+a	D．Label1.Caption = b

上一题下一题 0.99难度选择题更新时间:2019-05-07 08:40:07

答案(点此获取答案解析）

同类题1

某VB的事件过程如下：
Private Sub Command1_Click()
Dim a As Integer
a = Val(Text1.Text)
a =" 2" * a + 1
Text1.Text = Str(a)
End Sub
程序运行时，在文本框Text1中输入1，连续两次单击命令按钮Command1后，Text1中显示的内容是（）

同类题2

某VB程序代码如下：
Dim n As Integer，s As String
n = 64 :s = ""
Do While n > 0
s = Str(n Mod 7) + s
n = n \ 7
Loop
执行该程序段后，变量s的值是（）

同类题3

把虚框内流程图写代码（4’）

同类题4

某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显示 ② 。

同类题5

在Visual Basic中，有整型变量a=5，b=3，要在标签控件中显示结果为8，则执行下列语句能正确显示结果的是：（）

A．Label1.Caption=Str(a+b)

B．Text1.Text=Len(a)+Val(b)

C．Text1.Text= Sqr(a+b)

D．Label1.Caption=" Str(a)+" Str(b)

相关知识点