(填:選擇/循環)結構. Private Sub Command1_Click ( ) Dim k As Integer,n As Integer n=Val(Text1.Text) k=n Mod 10 If n=k*k Then Text2.Text=Str(k) Else Text2.Text=Str(n) End Sub.
3.有程序代碼如下,輸入某數據后,輸出結果為“B”。那么輸入的數據可能是( ) Dim score As Integer score=Val(InputBox(“score:“)) If score>89 Then Print“A“ Else If score>59 Then Print“B“ Else Print“C“ End If End If