则最后得到的字符串是:( )
If I=1 Then
X=X+1
Else
X=X*2
End If
它的基本结构属于( ).
Dim i As Integer, Sum As Integer
Dim a(1 To 11) As Integer
Sum = 6
a(11) = 49
For i = 10 To 1 Step -1
a(i) = a(i + 1) - 1
If a(i) Mod 3 = 0 Then Sum = Sum + a(i)
Next i
Text1.Text = Str(Sum)
该程序段运行后,文本框text1中显示的内容是( )
Dim n As Integer , I As Integer
Dim s As String , ch As String
s=text1.Text
n=Len(s) '⑴
For I = 1 To n '⑵
ch=Mid(s,i,1)
If Asc(ch) >= 65 and Asc(ch) <= 97 Then
ch=Chr(Asc(ch)+32)
End If
Label1.Caption=Label1.Caption+ch
Next i
已知字母“A”的ASCII码65,字母“a”ASCII码97。若在Text1中输入“Happy2018”,则Label1中应显示( )
S=0
For i=1 To 3
s=s+2
Next i
Print s
PRIVATE SUB FORM__CLICK( )
S=0
FOR A = 1 TO 5
FOR B= 1 TO 3
S=S+1
NEXT B
NEXT A
PRINT S
END SUB
Private Sub Command1_Click( )
Dim i As Integer, n As Integer, s As Integer
n = val(Text1. Text)
s = 0:1 = 1
Do While i < n
s = s + i
i = 1 + 2
Loop
Text2. Text = str(s)
End sub
该程序运行后,在文本框Text中输入10,单击按钮 Command1后,在文本框Text2中显示的内容是( )
执行该流程图,输出变量 s 的值是( )
①输入m,n
②以m为被除数,n为除数,r为m除以n的余数
③判断r的值
若r=0,输出公约数n
若r≠0,则n将赋值给m,再将r赋值给n,转为执行步骤②