题目内容

有如下过程代码: Sub var_dim() Static numa As Integer Dim numb As Integer numa=numa+2:numb=numb+1 print numa;mumb End Sub 连续3次调用vat dim过程,第3次调用时的输出是______。

A. 2 1
B. 2 3
C. 6 1
D. 6 3

查看答案
更多问题

假定有以下函数过程: Function Fun(S As String)As String Dim s1 As String For i=1 To Len(S) s1=LCase(Mid(S,i,1))+s1 Next i Fun=s1 End Function 在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim Str1 As String,Str2 As String Str1=InputBox("请输入一个字符串"):Str2=Fun(Str1) Print Srt2 End Sub 程序运行后,单击命令按钮,如果在输入对话框中输入字符串“abcdefg”,则单击“确定”按钮后在窗体上的输出结果为______。

ABCDEFG
B. abcdefg
C. GFEDCBA
D. gfedcba

设有以下函数过程: Function fun(a As Integer,_ b As Integer) Dim c AS Integer If a<b Then c=a:a=b:b=c End If c=0 DO c=c+a Loop Until C Mod b=0 fun=c End Function 若调用函数fun时的实际参数都是自然数,则函数返回的是______。

A. a、b的最大公约数
B. a、b的最小公倍数
C. a除以b的余数
D. a除以b的商的整数部分

在窗体上画一个命令按钮(其名称为Command1),然后编写如下代码: Private Sub Command1_Click() Dim a a=Array(1,2,3,4) 1=3:j=1 Do While i>=0 s=s+a(i)*j i=i-1:j=j*10 Loop Print s End Sub 运行上面的程序,单击命令按钮,则输出结果是______。

A. 4321
B. 123
C. 234
D. 1234

在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click() Dim a$,b$,c$,k% a="ABCD":b="123456":c="" k=1 Do While k<=Len(a) Or k<=Len(b) If k<=Len(a) Then c=c & Mid(a,k,1) End If If k<=Len(b) Then c=c & Mid(b,k,1) End If k=k+1 Loop Print c End Sub 运行程序,单击命令按钮,输出结果是______。

A. 123456ABCD
B. ABCD123456
C. D6C584A321
D. A182C3D456

答案查题题库