At the end of the financial year， an accounts accumulation batch is run. This batch updates the company’s accounting records. During the batch run process， some incorrect entries were inserted into the ACCOUNT table. You identified the bug and immediately

如下图所示的两个窗体：

要使其中第一个窗体中的第一个命令按钮来控制显示第二个窗体，第二个命令按钮用来结束程序的运行(两个按钮名称为Command1和Command2)。则以下选项中，对这两个命令按钮编写的事件过程正确的是

A．Private Sub Command1 Click() Form2．Show 1 End Sub Private Sub Command2_Click()End End Sub

B．Private Sub Command1_Click() Show 1 End Sub Private Sub Conunand2_Click() End End Sub

C．Private Sub Conmmand1_Click() Show 1 End Sub Private Sub Command2_Click() End End Sub

D．Private Sub Command1_Click()Show 1， Form2 End SubPrivate Sub Command2_Click() End End Sub

以下语句错误的是

A．If a=1 And b=2 Then C=3 End If

B．If a=1 Then C=2 Else If a=2 Then C=2 End If

C．If a=1 Then C=3 End If

D．If a=1 Then C=2 Else If a=2 Then C=2 End If End If

A.end-to-endnetworkdelaytimesthatexceed50msforreal-timetrafficareconsideredunacceptable

B.end-to-endnetworkdelaytimesthatexceed250msforreal-timetrafficareconsideredunacceptable

C.end-to-endnetworkdelayisnotafactoraslongasthedelayisconsistent

D.somepacketlosscanbecorrectedbycodecalgorithms

E.RSVPhandlesvoicepacketretransmission

F.fragmentationisaresultofpacketloss

下列不是分支结构的语句是（ ）。

A. If．··Then··End IF

B. While…End

C. If...Then...Else…End If

D. Select…Case…End Select

下面4个CT函数中是用来判断用户输入的数是否为奇数的，是奇数的返回1，否则返回0，其中正确的是

A．Function CT(ByVal a As Integer) If a Mod 2=0 Then Return 0 ElSe Return 1 End if End Function

B．Function CT(ByVal a As Integer) If a Mod 2=0 Then CT=0 Else CT=1 End if End Function

C．Function CT(ByVal a As Integer) If a Mod 2=0 Then CT=1 Else CT=0 End if End Function

D．Function CT(ByVal a As Integer) If a Mod 2=0 Then Return 1 Else Return 0 End if End Function

请看代码，回答下面的问题。

Type

TMammal=Class

Procedure Walk;

…..

end;{end of TManmml}

procedure TMammal.Walk;

begin

ShowMessage(‘Result is Mammal Walk’);

end;

TDog=Class(TMammal)

Procedure Walk;

end;

procedure TDog.Walk;

begin

ShowMessage(‘Result is Dog Walk’);

end;

var

Mammal:TMammal;

dog:TDog;

begin

Mammal:=TDog.Create;

Mammal.Walk;

Mammal.Free;

end;

上面代码中，最后的输出结果是：（ ）

A.‘Result is Dog Walk’

B.‘Result ia Mannal Walk’