在某温度时,CaF2饱和溶液的浓度为2×10-4mol·dm-3,则CaF2的溶度积为()
第1题:
阅读以下说明及Visual Basic程序代码,将应填入(n)处的字句写在对应栏内。
【说明】
在窗体上设计两个文本框和两个标签,标签上显示:“摄氏温度:”和“华氏温度:”,文本框一个用于输入摄氏温度数,一个用于输出对应的华氏温度。摄氏温度与华氏温度的转换公式为:c=(5/9)×(f-32)
要求:对输入的摄氏温度数有检查功能,以拒绝接收非数字字符。运行界面如图所示。
【Visual Basic代码】
Private Sub Commandl_Click ()
Text1 = ""
Text2 = ""
Text1.Enabled = True
Text2.Enabled = True
Text1.SetFocus
End Sub
Private Sub Command2 Click ()
End
End Sub
Private Sub Form. Load ()
Text1 = ""
Text2 = ""
Text1.Enabled = False
Text2.Enabled = False
End Sub
Private Sub Textl_Change ()
Text2.Text = (1)
End Sub
Private Sub Textl_KeyPress (KeyAscii As (2) )
If (3) Then
If Chr ( KeyAscii ) < "0" Or (4) Then
(5)
End If
End If
End Sub
第2题:
有如下程序: Private Sub Command1_Click() Dim a As Single Dim b As Single a=5:b=4 Call Sub1(a,b) End Sub Sub Sub1(x As Single,y As Single) t=X X=t\Y Y=t Mod y End Sub 在调用运行上述程序后,a和b的值分别为
A.0 0
B. 1 1
C.2 2
D.1 2
第3题:
执行下面程序,第一行输出结果是【 】,第二行输出结果是47。
Option Explicit
Private Sub Form_Click( )
Dim A As Integer
A=2
Call Sub1 (A) End Sub
Private Sub1 (x As Integer)
x=x*2+1
If x<10 Then
Call Sub1 (x)
End If
x=x*2+1
Print x
End Sub
第4题:
在窗体中添加一个命令按钮,编写如下程序: Private Sub Test(p,m,n) p=p+1:m=m+1:n=n+1 Print "Sub: ";p;m;n End Sub Private Sub Command1.Click() a1=1:b=2:c1=3 Call Test((a,b1+3,(c1)) Print "Main:";a1;b1;c1 End Sub 程序运行后,输出结果为
A.Sub: 2 6 4 Main: 2 6 4
B.Sub: 2 6 4 Main: 2 6 4
C.Sub: 2 6 4 Main: 1 2 3
D.Sub: 2 6 4 Main: 2 2 3
第5题:
在窗体中添加一个命令按钮,编写如下程序:
Private Sub Sub1(p,m,n)
p=p+1:m=m+1:n=n+1
Print "sub1:";p;m;n
End Sub
Private Sub Command1_Click()
a1=1:b=2:c1=3
Call Sub1(a,b1+3,c1)
Print"Main:";a1;b1;c1
End Sub
程序运行后,输出结果为
A.Sub: 2 6 4 Main: 2 6 4
B.Sub: 2 6 4 Main: 2 6 4
C.Sub: 2 6 4 Main: 1 2 3
D.Sub: 2 6 4 Main: 2 2 3
第6题:
在窗体中添加两个文本框,其名称分别为Text1和Text2;两个标签,其名称分别为Label1和Label2。编写程序,使得程序运行后,在文本框Text2中输入小写字母,能转换为比此字母的ASCII码小4的大写字母,结果显示在文本框Text1中。如输入“efg”,则输出的结果为“ABC”,能够实现上述功能的程序是
A.Private Sub Form. Load() Show Text1.Text=" " Text2.Text=" " Text2.SetFocus End Sub Private Sub Text2_KeyDown(KeyCode As Integer,Shift As Integer) Text1.Text=Chr(KeyCode-4) End Sub
B.Private Sub Form_Load() Show Text1.Text=" " Text2.Text=" " Text2.SetFocus End Sub Private Sub Text2_KeyDown(KeyCode As Integer,Shift As Integer) Text1.Text=Text1.Text+Chr(KeyCode-4) End Sub
C.Private Sub Form_Load() Show Text1.Text=" " Text2.Text=" " Text2.SetFocus End Sub Private Sub Text2_Click(KeyCode As Integer,Shift As Integer) Text1.Text=Text1.Text+Chr(KeyCOde-4) End Sub
D.Private Sub Form_Load() Show Text1.Text=" " Text2.Text=" " Text2.SetFocus End Sub Private Sub Text2_Click(KeyCode As Integer,Shift As Integer) Text1.Text=Chr(KeyCode-4) End Sub
第7题:
有如下Sub过程:
Sub ind(a As Integer)
Static x As Integer
x= x + a
Print x:
End Sub
以下是调用它的事件过程,程序运行后,单击命令按纽Command1三次,输出结果为【 】。
Private Sub Command1_Click()
Ind 2
End Sub
第8题:
<p>Re<sub>1</sub>=0.5Re<sub>2</sub></p>
<p>Re<sub>1</sub>=Re<sub>2</sub></p>
<p>Re<sub>1</sub>=1.5Re<sub>2</sub></p>
<p>Re<sub>1</sub>=2Re<sub>2</sub> </p>
第9题:
<p>t<sub>1/2</sub>减少,生物利用度也减少</p>
<p>t<sub>1/2</sub>不变,生物利用度增加</p>
<p>t<sub>1/2</sub>增加,生物利用度也增加</p>
<p>t<sub>1/2</sub>不变,生物利用度减少</p>
<p>t<sub>1/2</sub>和生物利用度皆不变化</p>
第10题:
<p>m<sub>s</sub>=100.02147g;U=0.70mg,k=2</p>
<p>m<sub>s</sub>=(100.02147±0.00070)g;k=2</p>
<p>m<sub>s</sub>=100.02147g;u<sub>c</sub>(m<sub>s</sub>)=0.35mg,k=1</p>
<p>m<sub>s</sub>=100.02147g;u<sub>c</sub>(m<sub>s</sub>)=0.35mg</p>
第11题:
C<sub>P</sub>=1
C<sub>P</sub>=2/3
C<sub>Pk</sub>=1
C<sub>Pk</sub>=2/3
第12题:
<p>M<sub>0</sub></p>
<p>M<sub>1</sub></p>
<p>M<sub>2</sub></p>
<p>M<sub>3</sub></p>
第13题:
在窗体中添加一个命令按钮,编写如下程序: Private Sub Subl(p,m,n) p=p+1:m=m+1:n=n+1 Print"subl:";p;m;n End Sub Private Sub Command1_Click() al=1:b=2:c1=3 Call Subl(a,b1+3,c1) Print"Main:";a1;b1;c1 End Sub 程序运行后,输出结果为
A.Sub:2 6 4 Main:2 6 4
B.Sub:2 6 4 Main:2 6 4
C.Sub:2 6 4 Main:1 2 3
D.Sub:2 6 4 Main:2 2 3
第14题:
假定一个工程由一个窗体文件Form1和两个标准模块文件Model1及Model2 组成。 Model1代码如下: Public X As Integer Public Y As Integer Sub S1( ) x=1 S2 End Sub Sub S2( ) y=10 Form1.Show End Sub Model2的代码如下: Sub Main( ) S1 End Sub 其中Sub Main被设置为启动过程。程序运行后,各模块的执行顺序是( )。
A.Form1→Model1→Model2
B.Model1→Model2→Form1
C.Model2→Model1→Form1
D.Model2→Form1→Model1
第15题:
有如下程序。 Private Sub Commandl_Click() Dim a As Single Dim b As Single a=5:b=4 Call Sub1 ( a,B)End Sub Sub Subl(x As Single, y As Single) t=x x=t\y y = t Mod y End Sub 在调用运行上述程序后,a和b的值分别为
A.0 0
B.1 1
C.2
D.1 2
第16题:
有程序如下: 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 8
B.5 2 2 2
C.10 12 14 16
D.出错
第17题:
有如下程序。
Private Sub Command1_Click()
Dim a As Single
Dim b As Single
a=5: b=4
Call Sub1(a, b)
End Sub
Sub Sub1(x As Single, y As Single)
t=x
x=t \ y
y=t Mod y
End Sub
在调用运行上述程序后,a和b的值分别为
A.0 0
B.1 1
C.2 2
D.1 2
第18题:
在窗体中添加一个命令按钮,编写如下程序: Private Sub Sub1(p,m,n) p=p+1:m=m+1:n=n+1 Print "sub1:";p;m;n End Sub Private Sub Command1_Click() a1=1:b=2:c1=3 Call Sub1(a,b1+3,c1) Print"Main:";a1;b1;c1 End Sub 程序运行后,输出结果为
A.Sub: 2 6 4 Main: 2 6 4
B.Sub: 2 6 4 Main: 2 6 4
C.Sub: 2 6 4 Main: 1 2 3
D.Sub: 2 6 4 Main: 2 2 3
第19题:
CaF2饱和溶液的浓度为2×10-4mol·L-1,则CaF2的溶度积为 ()。
第20题:
<p>1K<sub>m</sub></p>
<p>2K<sub>m</sub></p>
<p>3K<sub>m</sub></p>
<p>4K<sub>m</sub></p>
<p>5K<sub>m</sub></p>
第21题:
<p>I<sub>2</sub>=I<sub>3</sub></p>
<p>I<sub>2</sub>=4I<sub>3</sub></p>
<p>I<sub>2</sub>=2I<sub>3</sub></p>
<p>I<sub>3</sub>=4I<sub>2</sub></p>
第22题:
<p>U<sub>95</sub>= 1%,v<sub>eff</sub> =9 </p>
<p>U<sub>r</sub>= 1%,k=2 </p>
<p>u<sub>C</sub>=0. 5% </p>
<p>u<sub>C</sub>=±0 5%.k=1 </p>
第23题:
CO最高允许浓度为0.0024%
<p>NO<sub>2</sub>最高允许浓度为0.00025% </p>
<p>SO<sub>2</sub>最高允许浓度为0.0005% </p>
<p>NH<sub>3</sub>最高允许浓度为0. 00066% </p>