为了防止空气中O2氧化I-,在间接碘量法中必须注意:()。
第1题:
单击窗体时,下列程序的执行结果是
Private Sub Invert(ByVal xstr As String, ystr As String)
Dim tempstr As String
Dim I As Integer
I=Len(xstr)
Do While I >=1
tempstr=tempstr + Mid(xstr, I, 1)
I=I - 1
Loop
ystr=tempstr
End Sub
Private Sub Form_Click()
Dim s1 As String, s2 As String
s1= "abcdef"
Invert s1, s2
Print s2
End Sub( )。
A.abcdef
B.afbecd
C.fedcba
D.defabc
第2题:
A.pH上升
B.PaCO/sub2/supsubno上升
C.PaO/sub2/supsubno上升
D.HCO/sub3/supsubno/sup-/supsubno降低
E.HCO/sub3/supsubno/sup-/supsubno升高
第3题:
下面运行程序后,单击命令按钮,输出的结果是______。
Private Sub Commandl_clck()
Dim a%(1 To 4),b%(3 To 6),i%,s1,s2
Fori=1 To 4
a(i)=i
Nexti
For i=3 To 6
b(i)=i
Nexti
s1=YAS(a)
S2=YAS(b)
Printt"s1=";S1"S2=";s2
End Sub
第4题:
把‘今天天气不错!’变为‘今天天气不错’是( )。
A.<sup></sup>
B.<s></s>
C.<tt></tt>
D.<sub></sub>
E.<i></i>
第5题:
A.pH上升
B.PaCO/sub2/supsubno上升
C.Pa0/sub2/supsubno上升
D.HCO/sub3/supsubno/sup-/supsubno降低
E.HCO/sub3/supsubno/sup-/supsubno升高
第6题:
程序执行结果s的值是【 】.
Private Sub Command l-Click ()
I =0
Do
S= I +S
I = I + l
Loop Until I >=4
End Sub
第7题:
在窗体中添加一个名称为Com1的命令按钮,然后编写如下程序:
Private Sub s(ByVal p As Integer)
p=p*2
End Sub
Private Sub Com1_Click()
Dim i As Integer
i=3
Call s(i)
If i>4 Then i=i^2
End sub
窗体打开运行后,单击命令按钮,则消息框的输出结果为( )。
第8题:
下列程序的执行结果为
Private Sub Command1_Click()
Dim s1 As String, s2 As String
s1= "abcd"
Call Transfer(s1, s2)
Print s2
End Sub
Private Sub Transfer (ByVal xstr As String, ystr As String)
Dim tempstr As String
i=Len(xstr)
Do While i >=1
tempstr=tempstr + Mid(xstr, i, 1)
i=i - 1
Loop
ystr=te mpstr
End Sub( )。
A.dcba
B.abdc
C.abcd
D.dabc
第9题:
在窗体中添加—个名称为Command1的命令按钮,然后编写如下事件代码: Private Sub Command1_Click() s="ABBACDDCBA" For I=6 To 2 Step -2 x=Mid(s,I,I) y=Left(s,I) z=Right(s,I) z=x & y & z Next I MSgBox z End Sub 窗体打开运行后,单击命令按钮,则消息框的输出结果是______。
A.AABAAB
B.ABBABA
C.BABBA
D.BBABBA
第10题:
在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序:
Private Sub s(ByVal p As Integer)
p=p*2
End Sub
Private Sub Command1_click()
Dim i As Integer
i=3
Call s(i)
If i>4 Then i=i^2
MsgBox i
End Sub
窗体打开运行后,单击命令按钮,则消息框的输出结果为【 】。