下列程序段的执行结果为()。 Dim x as integer If x Then Print x Else Print x+1
A. 1
B. 0
C. -1
D. 显示出错信息
A. 1
B. 0
C. -1
D. 显示出错信息
单击命令按钮时,下列程序代码的执行结果为 () Function FirProc(x As Integer, y As Integer, z As Integer) FirProc=2*x+y+3*z End Function Function SecProc(x As Integer, y As Integer, z As Integer) SecProc=FirProc(z, x, y)+x End Function Private Sub Commandl Click() Dim a As Integer, b As Integer, c As Integer a=2 :b=3 :c=4 Print SecProc(c, b,A)End Sub
A.21
B.19
C.17
D.34
A.1204
B.1504
C.1231
D.531
阅读下列程序并写出程序运行结果。
Private Sub Form_Click()
Dim A(1 To 3) As String
Dim c As Integer
Dim j As Integer
A(1) = "4"
A(2) = "8"
A(3) = "12"
c = 1
For j = 1 To 3
c = c + Val(A(j))
Next j
Print c
End Sub
写出程序运行时单击窗体后,窗体Form1上的结果。
e{N=a+b;}
A.3
B.-3
C.9
D.15
执行下面的程序段后i和j的结果为 int i=1,j=10; do { if(i++>--j)continue; } while(i<5);
A.i=6,j=5
B.i=5,j=5
C.i=6,j=4
D.i=5,j=6
已知(DS)=091DH,(SS)=1E4AH,(AX)=1234H,(BX)=0024H,(CX)=5678H,(BP)=0024H,(SI)=0012H,(DI)=0032H,(09226H)=00F6H,(09228H)=1E40H,(1E4F6H)=091DH。下列各指令或程序段分别执行后得结果如何?(互评需要达到5次) (1)LEA BX,20H[BX][SI] MOV AX,2[BX] (2)LDS SI,[BX][DI] MOV [SI],BX