T3抑制试验,下列哪些情况是禁忌的()
第1题:
有如下SUB过程:
Sub s(x As Single,y As Single)
t=x
x=t / y
y=t Mod y
End Sub
在窗体上添加一个命令按钮,然后编写如下事件过程:
Private Sub Form_Click()
Dim a As Single
Dim b As Single
a=5
b=4
s a,b
Print a,b
End Sub
则程序运行后,单击命令按钮,输出的结果为【 】 。
第2题:
以下程序用于求S=1+3+32+33+…+310的值。
Private Sub Commandl_Click()
S=1
T=1
ForI=1 To 10
T=______
S=S+T
NextI
Print"S=";S
End Sub
第3题:
下列过程定义语句中,形参个数为不确定数量的过程是( )。
A.Private Sub Pro3(x As Double,y As Single)
B.Private Sub Pro3(Arr(3),Option x,Option y)
C.Private Sub Pro3(ByRef x,ByVal y,Arr( ))
D.Private Sub Pro3(ParamArray Arr( ))
第4题:
下列程序的输出结果是______。 #include sub1(char a,char b) {char c; c=a;a=b;b=c;} sub2(char* a,char b) {char c; c=*a;*a=b;b=c;} sub3(char* a,char*b) {char c; c=*a;*a=*b;*b=c;} { char a,b; a='A' ;b='B'; sub3 (&a, &b) ;putchar (a) ;putchar (b); a='A';b='B';sub2(&a,b);putchar(a);prtchar(b); a='A';b='B';sub1(a,b);putchar(a) ;putchar(b); }
A.BABBAB
B.ABBBBA
C.BABABA
D.BAABBA
第5题:
下列程序的运行结果是______。
Sub abcd(ByValn As Integer)
n=n+5
End Sub
Private Sub Form_Click()
nx%=3
Callabcd(nx%)
Printnx%
End Sub
第6题:
编写如下事件过程:
Private Sub Form_keyDown(KeyCode As Integer,Shift As Integer)
Print Chr(KeyCode)
End Sub
Private Sub Form_Keypress(KeyAscii As Integer)
Print Chr(KeyAscii)
End Sub
在一般情况下(即不按住Shift键和锁定大写键时) 运行程序,若按"T"键,则程序输出的结果是
A.T T
B.t T
C.T T
D.t t
第7题:
下列程序输出的结果是( )。 #include<stdio.h> sub1(char a,char b) {char c:c=a:a=b:b=c; } sub2(char*a,char b) {char c:c=*a;”a=b;b=c;} sub3(char*a,char*b) {char c;c=*a;”a=*b;*b=c;} void main() { char a,b; a='A';b='B':sub1(a,b);putchar(a):putchar(b): a='A';b='B'; sub2(&a,b);putchar(a);putchar(b); a='A';b='B'; sub3(&a,&b);putchar(a);putchar(b); putchar('\n'); }
A.ABABAB
B.ABBBBA
C.ABBABA
D.ABABBA
第8题:
(12)有下列Sub过程: Sub Sub(x As Single,y As Single) t=x x=t/y y=t Mody End Sub 在窗体上的命令按钮Commandl中,编写下列事件过程,执行该事件过程调用Sun过程,结果是( )。 Private Sub Commandl_Click() Dim a As Single Dim b As Single a=5 b=4 Sun a,b Print a;b End Sub A.1.25 1 B.5 4 C.4 5 D.1 1.25
第9题:
有如下事件过程:
Private Sub Form. Active ( )
Dim Score (1 to 3) As Integer
Dim i As Integer
Dim t As Variant
Fori=3 To 1 step-1
Score (i) = 2 * i
Next
For Each t In Score
Print t
Next
End Sub
程序运行后窗体上显示的值为【 】。
第10题:
有如下程序: Private Sub Command1_Click() Dim a As Single Dim b As Single a=5:b=4 Call Sub1(a,b) End Sub Sub Sub1(x As Single,y As Single) t=X X=t\Y Y=t Mod y End Sub 在调用运行上述程序后,a和b的值分别为
A.0 0
B. 1 1
C.2 2
D.1 2