执行下列命令后的显示结果是______。YA=10YB=20YC=30N="A"M="Y&N"?&M
A.10
B.20
C.YA
D.Y&N
A.10
B.20
C.YA
D.Y&N
A.A
B.B
C.C
D.D
运行下列程序:
Private Sub Command1_Click()
Dim s1 As String * 1
Dim s2 As String
s1 = "a"
For i = Asc(s1) To Asc(s1) + 4
s2 = s2 & Chr(i)
Next i
Print s2
End Sub
单击Command1命令按钮后,则在窗体上显示的结果是()。
A.a
B.abcde
C.aaaa
D.s2
运行下列程序:
Private Sub Command1_Click()
s$ = "abcdefabcdefabcdef"
k = InStr(s$, "c")
Do While k > 0
n = n + 1
s$ = Mid(s$, k + 1)
k = InStr(s$, "c")
Loop
Print n
End Sub
单击Command1命令按钮后,则在窗体上显示的结果是()。
A.1
B.2
C.3
D.4
执行下面的程序,击窗体后在窗体上显示的第一行结果是(),第三行结果是()。
Private Sub Form_click()
Dim mystr, mystr1, mysrr2 As String
mystr1 = "B"
For i = 1 To 3
mystr2 = LCase(mystr1)
mystr1 = mystr1 & mystr2
mystr = mysre & mystr1
Print mystr
mystr1 = Chr(Asc(mystr1) + i)
Next i
End Sub