【单选题】运行下列程序,单击窗体后输出的结果是( ) Function f(ByVal x As Integer) Static z z = z + 1 x = x + z f = x + z End Function Private Sub Form_Click() Dim a%, i% a = 2 For i = 1 To 3 Print f(a), Next i End Sub
【单选题】设有如下通用过程: Public Function Fun(sStr As String) As String Dim tStr As String,strL As Integer tStr="" strL=Len(xStr) i=1 Do While i<=strL/2 tStr=tStr & Mid(xStr,i,1) & Mid(xStr,strL-i+1,) i=i+1 Loop Fun=...
【简答题】The Smiths are very busy. Mr. Smith is 60 and he has a lot of jobs. He is a postman, a car driver, a school-bus driver, a boatman, a salesman(售货员), a cook and a milkman. Also he and Margaret have a sh...
【单选题】Ed Smiths loves tennis, ________ he doesn’t play it. It’s difficult for him.
【单选题】设有如下的Sub过程:Sub S(x As Single, y As Single) t = x x = t / y y = t Mod yEnd Sub在窗体上画一个命令按钮Cmd1,然后编写如下事件过程:Private Sub Cmd1_Click() Dim a As Single, b As Single a = 5 : b = 4 S a, b Print a, bEnd Sub程序运行...
【单选题】在窗体上画一个命令按钮Cmd1,然后编写下列代码:Private Sub Cmd1_Click() Dim a1(10) As Integer, a2(10) As Integer n = 3 For i = 1 To 5 a1(i) = i a2(n) = 2 * n + i Next i Print a2(n); a1(n)End Sub程序运行后,单击命令按钮,输出的结果是 ...
【简答题】设有如下通用过程: Private
Function Fun1(s As String) As String Dim st As String For i = 1 To Len(s) st = Chr(Asc(Mid(s, i, 1)) + 1) &
st Next i Fun1 = st End
Function 在窗体上画一个命令按钮 Command1 和两个文本框 Text1 、 Text2...
【简答题】阅读理解。 The Smiths are from America. Mr. Smith works in a car factory in Shanghai. He is an engineer. H e is a quiet man, and in his spare time he likes going fishing in the park. His wife Helen is a te...
【单选题】What is the man' s opinion about Smiths' investment?
A.
He feels they have done a wise thing.
B.
He doesn' t think they should move.
C.
He thinks it is better to invest later.
D.
He thinks it is unwise to buy stocks.