设窗体上有一个文本框Text1和一个命令按钮Command1,并有以下事件过程:Private Sub Command1_Click()Dim s As String,ch As Strings=""For k=1 To Len(Text1)ch=Mid(Text1,k,1)s=ch+sNext kText1.Text=sEnd Sub程序执行时,在文本框中输入“B
单选题
设窗体上有一个文本框Text1和一个命令按钮Command1,并有以下事件过程:Private Sub Command1_Click()Dim s As String,ch As Strings=""For k=1 To Len(Text1)ch=Mid(Text1,k,1)s=ch+sNext kText1.Text=sEnd Sub程序执行时,在文本框中输入“B