.执行下面程序,单击窗体后,窗体上显示的第一行结果是,第三行结果是.PrivateSubFormClick0DimMystrAsStringDimMystr1AsStringDimMystr2AsStringMystr1=“B”Fori=1To3Mystr2=LCase(M

Question

.执行下面程序,单击窗体后,窗体上显示的第一行结果是 ,第三行结果是 .
Private Sub Form_Click0
Dim Mystr As String
Dim Mystr1 As String
Dim Mystr2 As String
Mystr1= “B”
Fori=1 To 3
Mystr2=LCase(Mystr1)
Mystr1= Mystr1 ＆ Mystr2
Mystr= Mystr ＆ Mystr1
Print Mystr
Mystr1=Chr(Asc(Mystr1)+i )
Next
End Sub

Answer 1

程序代码有错误.