下列对H2S的描述中正确的是（）A、浓度达到0.1%时，迅速死亡B、浓度达到0.01%时，恶心、呕吐C、浓度达到0.05%时，30min后失去知觉D、浓度达到0.01%时，瞳孔放大

如下图所示的两个窗体：

要使其中第一个窗体中的第一个命令按钮来控制显示第二个窗体，第二个命令按钮用来结束程序的运行(两个按钮名称为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

下列Sub 过程中描述错误的是______。

A．Sub 过程只能在窗体模块中定义

B．Goto 语句不能用于Sub 过程

C．Sub 过程只能在窗体模块中定义

D．Sub 过程中不能嵌套定义Sub 过程

编写如下事件过程： Private sub sub1 (ByVal x1 As String, y1 As String) Dim xt As String Dim i As Integer i = Len(x1) Do While i＞= 1 xt = xt + Mid(x1, i, 1) i=i-1 Loop y1 = xt End Sub Private Sub Form. Click() Dim s1 As String, s2 As String s1= "teacher" sub1 s1, s2 Print s2 End Sub 程序运行后，单击窗体，则窗体上显示的内容是

A．rehcaet

B．tahreee

C．themee

D．eerthea

写出程序运行的结果

Public class Base

Public virtual string Hello() {return “Base”;}

Public class Sub:Base

Public override string Hello() {return “Sub”;}

1. Base b = new Base(); b.Hello;

2. Sub s = new Sub(); s.Hello;

3. Base b = new Sub (); b.Hello;

4. Sub s = new Base(); s.Hello;

在窗体中添加一个名称为Command1的命令按钮，然后编写如下程序： Public x As Integer Private Sub Command1_Click() x=10 Call s1 Call s2 MsgBox x End Sub Private Sub sl() x=x+20 End Sub Private Sub s2() Dim x As Integer x=x+20 End Sub 窗体打开运行后，单击命令按钮，则消息框的输出结果为( )。

A．10

B．30

C．40

D．50

以下关于Sub Main 的描述正确的是______。

A．Sub Main 过程的建立是在代码窗口中进行的

B．Sub Main 过程用于声明全局变量

C．Visual Basic 中，一个工程只能有一个Sub Main 过程

D．Visual Basic 无法自动识别Sub Main过程

下列程序运行后的输出结果是______。

Private Sub f(k，s)

s=1

For j=1 To k

s=s*j

Next

End Sub

Private Sub Command1_Click()

Sum=0

For i=1 To 3

Call f(i，s)

Sum=Sum+s

Next

Print Sum

End Sub

在窗体中添加一个名称为Command1的命令按钮，然后编写如下程序： Public x As Integer Private Sub Command1_Click() x=10 Call s1 Call s2 MSgBox x End Sub Private Sub s1() x=x＋20 End Sub Private Sub s2() Dim x As Integer x=X＋20 End Sub 窗体打开运行后，单击命令按钮，则消息框的输出结果为______。

A．10

B．30

C．40

D．50

在窗体中添加一个名称为Commandl的命令按钮，然后编写如下程序：Public X As Integer Private Sub Commandl Click（ ）x＝10 Call slCall s2MsgBox x End Sub Private Sub sl（ ）x＝x+20 End Sub Private Sub s2（ ）Dim x As Integer x=x+20End Sub窗体打开运行后，单击命令按钮，则消息框的输出结果为（ ）。

A.10

B.30

C.40

D.50

下列程序的运行结果是( )。 #include＜stdio.h＞ void sub(int*s，int*y) {static int m=4： *y=s[m]； m--； } void main() {int a[]={1，2，3，4，5}，k，x； printf("\n")； for(k=0；k＜=4；k++) {sub(a，&x)； printf("%d，"，x)； } }

A．5，4，3，2，1，

B．1，2，3，4，5，

C．0，0，0，0，0，

D．4，4，4，4，4，

在窗体中添加一个名称为Commandl的命令按钮，然后编写如下程序： Public x As Integer Private Sub Commandl_click() x＝10 Call s 1 Call s 2 MsgBOx x End Sub Pfivate Sub s1() x＝x+20 End Sub Private Sub

A．10

B．30

C．40

D．50

运行下列程序：

Private Sub form_Click( )

x = 8: y = 2

Call fun1((x), y)

Print x, y

End Sub

Private Sub fun1(x, y)

s = x

x = s / y

y = s Mod y

End Sub

单击窗体后，则在窗体上显示的结果是( )。

A.4 2

B.8 2

C.8 0

D.2 4

下列程序的执行结果为 Private Sub Commandl_Click() Dim s1 As String ,s2 As String s1= "abcd" Call Transfer(sl，s2) Print s2 End Sub Private Sub Transfer (ByVal xstr As String，ystr As String) Dim tempstr As String ystr=tempstr End Sub

A．dcba

B．abdc

C．abcd

D．dabc

A.是对4个SACCH突发脉冲，8个特定位置的TCH突发脉冲进行了平均

B.SUB测量包含了空闲帧

C.SUB是全局测量

D.SUB是局部测量