【单选题】执行下面的程序,输出的结果是 ______ 。 Private Sub Command1_Click() ch $ = 'Welcome to China!' n = Len(ch $ ) For i =1 To n-1 s$ =Mid(ch$ ,i,1) If s$ ='o' Then m=m + 1 Next i Print m End Sub
【简答题】执行下面的程序,消息框里显示的结果是( )。 Private Sub Form_Click() Dim Str As String,S As String,k As Integer S=Str For k=Len(Str) To 1 Step -1 S=S & (Mid(Str,k,1) Next k End Sub