【简答题】下列程序段运行后 , 单击窗体时显示的结果是 _______ 。 Private Sub Form_Click( Dim a As String, b As String, s As String a=”ABCDEFG”: b=”12345” S=Fn1(a)+ Fn1(b) Print Fn1(Fnl(Fn1(s))) End Sub Function Fn1(x As String) As S...
【单选题】在窗体下画两个文本框Text1和Text2,一个命令按钮Command1,请阅读下列程序段: Private Sub Command1_Click() x=0 Do Until x>=50 x=(x+4)*(x+3) n=n+1 Loop Text1.Text=Str(n) Text2.Text=Str(x) End Sub 运行程序后,单击命令按钮,在两个文本框中显示的值分别为( )。
【单选题】在窗体上画两个文本框Text1和Text2,一个命令按钮Command1,请阅读下列程序段: Private Sub Command1_Click() x=0 Do Until x>=50 X=(x+4)﹡(x+3) N=n+1 Loop Text1.Text=Str(n) Text2.Text=str(x) End Sub运行程序后,单击命令按钮,在两个文本框中显示的值分别为
【单选题】下列程序段运行后,单击窗体时显示的结果是()。 Private Function fn(m As String) As String k = Len(m) fn = Mid(m, 2, k - 2) End Function Private Sub Command1_Click() Dim a As String, b As String, s As String a = "grand": b =...