以下VB代码运行后，在文本框Text1中输入1，则选择语句Ifk<=9Thenk=k+i执行的次数为（）k=k+i执行的次数为PrivateSubT_刷题宝

题干

以下VB代码运行后，在文本框Text1中输入1，则选择语句If k<=9 Then k=k+i执行的次数为（）
k=k+i执行的次数为
Private Sub Text1_Changeo()

Dim k As Integer, i As Integer

k=Val(Text1.Text)

For i=1 To 3

If k<=9 Then k=k+i

Next i

Text1.Text=Str(k)

End sub

A．3

B．5

C．6

D．9

上一题下一题 0.99难度选择题更新时间:2020-03-30 11:10:13

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

同类题1

下列程序执行后变量 m 的值为（）
s = "369akXdUq" m = 0
For i = 1 To Len(s)

ch = Mid(s, i, 1)

If ch >= "a" And ch <= "z" Then

End If

同类题2

有如下VB程序段：
Private Sub Text1_Change()
Dim a, i As Integer
a= Val(Text1.Text)
For i = 2 To 6 Step 2
If a<= 15 Then a = a + i
Next i
Text1.Text = Str(a)
End Sub
若在文本框 Text1 中输入2，执行该程序段，For语句的循环次数为（）

同类题3

在VB中，如果要在标签Lab上显示文字“高中信息技术考试”，则下列语句正确的是（）

A．Label.Caption=“高中信息技术考试”

B．Lab.Text=“高中信息技术考试”

C．Lab.Caption=“高中信息技术考试”

D．Label.Width=“高中信息技术考试”

同类题4

某算法流程图如图所示，执行该算法后，“s←s+i”共被执行的次数是（）

同类题5

下列VB程序运行时，单击命令按钮Command1后，文本框Text1中显示的内容是：____________________ 。
Private Sub Command1 Click
Dim x As Integer, m As Integer
m = 3
For x = 1 To 5
If m > 3 Then m = m + 2 Else m = m - 1
Next x
Text1.Text = Str(m)
End Sub

相关知识点