KD
第1题:
下列程序的运行机结果是【 】。
Private Sub Form_ Click()
Dim k As Integer
n= 5
m= 1
k= 1
Do
m=m+2
k= k+1
Loop While k<=n
Print m
End Sub
第2题:
执行下面的程序,消息框里显示的结果是 【 】 。
Private Sub Form_Click()
Dim Str As String, K As Integer
Str="ab"
For k=Len(Str) TO 1 Step-1
Str=Str & Chr(Asc(Mid(Str,k,1))+k)
Next k
MsgBox Str
End Sub
第3题:
在窗体上画一个名称为CoilTlilandl的命令按钮,然后编写如下事件过程: Private Sub command1 Click() Dim m As Integer, i As Integer, x(3)As Integer For i=0 To 3:x(i)=i:Next i For i = 1 To 2: Call sub1(x,i):Next i For i = 0 To 3: Print x(i);: Next i End Sub Private Sub sub1(a()As Integer,k As Integer) Dim i As Integer Do a(k)=a(k)+a(k+1) j = j + 1 Loop While j < 2 End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是
A.0 3 7 5
B.0 1 2 3
C.3 2 4 5
D.0 5 8 3
第4题:
下面程序的输出结果是。 Private Sub Commandl_Click ch$=“ABCDEF” proc ch:Print ch End Sub Private Sub proc(ch As Stnng) s=“” For k=Len(ch) TO 1 Step -1 s=s&Mid(ch,k,1) Next k ch=s End Sub A.ABCDEF B.FEDCBA C.A D.F
第5题:
执行下面的程序,消息框里显示的结果是( )。
Private Sub Form_Click()
Dim Str As String,S As String,k As Integer
S=Str
For k=Len(Str) To 1 Step -1
S=S & (Mid(Str,k,1)
Next k
End Sub
第6题:
当发生Form_Click事件时,下列程序的输出结果是( )。 Private m As Integer,n As Integer Private Sub Form_Click() Dim k As Integer,p As Integer k=6:p=60 Call sub1(k,p) Print m,n,m,k,p Call sub1(k,p) Print m,n,k,p End Sub Private Sub Form_Load() m=7 n=70 End Sub Public Sub sub1(x As Integer,ByVal y As Integer) Dim m As Integer n=n+5 m=n+x+y x=x+y y=x+y End Sub
A.7 75 66 60 7 80 126 60
B.7 75 66 60 7 75 126 60
C.7 75 66 60 7 80 66 60
D.7 75 66 60 7 75 66 60
第7题:
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Dim k As Integer Private Sub Form_Load() k=15 End Sub Private Sub Command1_Click() Static b As Integer b=b+k k=k+1 Print k,b End Sub 程序运行时,两次单击命令按钮Command1后,在窗体上显示的第二行是( )。
A.17 31
B.15 31
C.17 16
D.2 1
第8题:
CALL SUB(N,N)
CALL SUB(X,X)
CALL SUB(N,X*X)
CALL SUB(11,X)
第9题:
<p>L<sub>S</sub>=(100.01280±0.00048)mm,k=2 </p>
<p>L<sub>S</sub>=(100.01280±0.0005)mm,k=2 </p>
<p>L<sub>S</sub>=(100.0128±0.00048)mm,k=2 </p>
<p>L<sub>S</sub>=(100.013±0.0005)mm,k=2 </p>
第10题:
<p>U<sub>rel</sub>=0.66mm,k=2</p>
<p>U<sub>95</sub>=0.3mm,k=2</p>
<p>U=0.6mm,k=2</p>
<p>U<sub>rel</sub>=1.0%,k=2</p>
第11题:
<p>I<sub>S</sub>=10.0413A,U<sub>rel</sub>=5×10<sup>-5</sup>,k=2 </p>
<p>I<sub>S</sub>=10.0413(1±5×10<sup>-5</sup>)A,k=2 </p>
<p>I<sub>S</sub>=(10.0413±5×10<sup>-5</sup>)A,k=2 </p>
<p>I<sub>S</sub>=10.0413A,U<sub>95rel</sub>=5×10<sup>-5</sup>,V<sub>eff</sub>=9 </p>
第12题:
<p>R<sub>s</sub>=9.99993kΩ,U<sub>95</sub>=0.10Ω,k<sub>95</sub>=1.96</p>
<p>R<sub>s</sub>=9.999931kΩ,U<sub>95</sub>=0.10Ω,k<sub>95</sub>=1.96</p>
<p>R<sub>s</sub>=9.99993kΩ,U<sub>95</sub>=102mΩ,k<sub>95</sub>=1.96</p>
<p>R<sub>s</sub>=9.999931kΩ,U<sub>95</sub>=102mΩ,k<sub>95</sub>=1.96</p>
第13题:
下面程序的输出结果是( )。 #include"stdio.h" int sub(int m) { static a=4; a+=m; return a; } void main() { int i=2,j=1,k; k=sub(i); k=sub(j); printf("%d",k); }
A.6
B.7
C.8
D.9
第14题:
以下程序的输出结果是( )。
include<stdio.h>
main()
fint x=0;
sub(&x,16,2);
printf("%d\n",x);
}
sub(int*a,int n,int k)
{if(k<=n) sub(a,n/2,2*k);
*a+=k;
}
第15题:
为某个窗体编写如下事件,单击窗体,消息框显示的结果为【 】。
Private Sub Form_Click( )
Dim k As Integer ,n As Integer ,m As Integer
n=10:m=1:k=1
Do While k<=n
m=m*2
k=k+1
Loop
MsgBox m
End Sub
第16题:
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序 _______。 Dim k As Integer Private Sub Form_Load() k=5 End Sub Private Sub Command Click() Static b As Integer b = b + k k=k+1 Print k,b End Sub 程序运行时,两次单击命令按钮Command1后,在窗体上显示的第二行是 _______。
A.7 11
B.5 11
C.76
D.2 1
第17题:
若有如下程序: float sub(int a,int b) { return(a*b); } main() {int i=1,j=2,k=3; printf("%4.0f\n",sub((int)sub(k+j,j),k+i)); } 则程序运行后的输出结果是( )。
A.40
B.32
C.16
D.编译出错
第18题:
窗体上有一个名为Command1的命令按钮,并有下面的程序: Private Sub Command1 Click( ) Dim arr(5)As Integer . For k=1 To 5 art(k)=k Next k prog art( ) For k=1 T0 5 Print art(k); Next k End Sub Sub prog(a( )As Integer) n=UBound(a) For i=n To 2 step-1 if a(j)<a(j十1)Then t=a(j):a(1)=a(j+1);a(j+1)=t End If Next j Next i End Sub 程序运行时,单击命令按钮后显示的是( )。
A.12345
B.54321
C.01234
D.43210
第19题:
下面程序: Private Sub Command1_Click() m$="ABC" n$="abc" k$=Lcase$(m$) j$=Ucase$(n$) Print Asc(k$) End Sub 运行后输出结果为()
第20题:
<p>U<sub>95</sub>=1%(v<sub>eff</sub>=9)</p>
<p>U<sub>r</sub>=1%(k=2)</p>
<p>u<sub>Cr</sub>=0.5%</p>
U=±0.5%(k=1)
第21题:
sub(1,97);
sub(2,'97');
h=sub(3,'a');
sub(4,a);
第22题:
<p>m<sub>s</sub>=100.02147g;U=0.70mg,k=2</p>
<p>m<sub>s</sub>=(100.02147±0.00070)g;k=2</p>
<p>m<sub>s</sub>=100.02147g;u<sub>c</sub>(m<sub>s</sub>)=0.35mg,k=1</p>
<p>m<sub>s</sub>=100.02147g;u<sub>c</sub>(m<sub>s</sub>)=0.35mg</p>
第23题:
<p>U<sub>95</sub>= 1%,v<sub>eff</sub> =9 </p>
<p>U<sub>r</sub>= 1%,k=2 </p>
<p>u<sub>C</sub>=0. 5% </p>
<p>u<sub>C</sub>=±0 5%.k=1 </p>
第24题:
CALL SUB(N,N)
CALL SUB(X,X)
CALL SUB(N+2,X)
CALL SUB(N,X+3)