Private Sub Cmd1_Click()
Dim i As Integer, j As Integer, ans As Integer
Dim ch As String, s As String
s = Text1.Text
ans = 0
j = 1
For i = 1 To Len(s)
If ch = "," Then
ans =
j = i + 1
End If
Next i
Label1.Caption = "计算结果是:" +Str(ans)
End Sub
![]()
下列描述中正确的是( )
i = 1:j = 8:s = ""
key = Text1. Text
Do While i <= j
m = (i +j)\2
If key = a(m) Then
s = s+ "M"
Exit Do
ElseIf key <a(m) Then
j = m -1:s = s+ "L"
Else
i = m+1:s = s + "R"
End If
Loop
Text1. Text = s
数组元素a(1)到a(8)的值依次为“4,22,27,32,35,44,56,59”,该程序段执行后,文本框Text1中显示的内容不可能是( )

a=int(2.9)
print(a)
s=0
For i=1 To 6
s=s+i
Next i
Label1.Caption=Str(s)
该程序段运行后,标签Label1上显示的内容是( )