标准溶液如I₂溶液可以贮存在无色试剂瓶中。

第1题

设有如下程序： Private Sub search(a()As Variant，ByVal key As Variant，index%) Dim I％ For I = Lbound(a)To Ubound(A)If key=a(I)Then index=I Exit Sub End If Next I index=-1 End Sub Private Sub Form_Load() Show Dim b()As Variant Dim n As Integer b=Array(21，64，92，15，72，38，45，72) Call search(b， 45， n) Print n End Sub 程序运行后，输出的结果是A．2B．6C．10D．12

点击查看答案

第2题

在窗体上画一个名称为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 5B．0 1 2 3C．3 2 4 5D．0 5 8 3

点击查看答案

第3题

编写如下事件过程： 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．rehcaetB．tahreeeC．themeeD．eerthea

点击查看答案

第4题

有程序如下: Sub subP(b() As Integer) For i=1 To 4 b(i)=2*i Next i End Sub Private Sub Command1_Click() Dim a(1 To 4) As Integer a(1)=5 a(2)=6 a(3)=7 a(4)=8 subP a() For i=1 To 4 Print a(i) Next i End Sub运行上面程序，单击命令按钮，输出结果为______ 。A． 2 4 6 8B．5 2 2 2C．10 12 14 16D．出错

点击查看答案

第5题

阅读程序： Sub subP(b()As Integer) For i=1 To 4 b(i)=2*i Next i End Sub Private Sub Command1_Click() Dim a(1 To 4)As Integer a (1)=5 a (2)=6 a (3)=7 a (4)=8 subP a() For i=1 To 4 Print a(i) Next i End Sub运行以上程序，单击命令按钮，输出结果为______ 。A．2 4 6 8B．5 6 7 8C．10 12 14 16D．出错

点击查看答案

第6题

配制0.1mol/LNaOH标准溶液，下列配制错误的是( )。(M=40g/mol)A.将NaOH配制成饱和溶液，贮于聚乙烯塑料瓶中，密封放置至溶液清亮，取清夜5mL注入1L不含CO2的水中摇匀，贮于无色试剂瓶中B.将4.02克NaOH溶于1L水中，加热搅拌，贮于磨口瓶中C.将4克NaOH溶于1L水中，加热搅拌，贮于无色试剂瓶中D.将2克NaOH溶于500mL水中，加热搅拌，贮于无色试剂瓶中

点击查看答案

第7题

不需贮存于棕色带磨口塞试剂瓶中的标准溶液为（）。A、NaOHB、I2C、AgNO3D、Na2S2O3

点击查看答案