在一定温度和压强下,某一定量的PCl5和Cl2。试判断在下列情况下,PCl5的离解度是增大还是减小。 (1) 减压使PCl5的体积变为2dm-3; (2) 保持压强不变,加入氮气,使体积增至2dm3; (3) 保持体积不变,加入氮气,使压强增加1倍; (4) 保持压强不变,加入氮气,使体积变为2dm3; (5) 保持压强不变,加入氮气,使压强增加1倍。
第1题:
有如下程序: 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
第2题:
假定有如下的Sub过程: sub sfun(x As Single,y As Single) t=x x=t/y y=t Mod y End Sub 在窗体上添加一个命令按钮(名为Command1),然后编写如下事件过程: Private Sub Command1_Click() Dim a as single Dim b as single a=5 b=4 sfun a,b MsgBox a & chr(10)+chr(13)& b End Sub 打开窗体运行后,单击命令按钮,消息框的两行输出内容分别为 ______。
A.1和1
B.1.25和1
C.1.25和4
D.5和4
第3题:
假定有如下的Sub过程:
Sub sfun(x As Single,y As Single)
t=x
x=t/y
y=t Mod y
End Sub
在窗体上添加一个命令按钮(名为Command1),然后编写如下事件过程:
Private Sub Command1_Click()
Dim a as single
Dim b as single
a=5
b=4
sfun a,b
MsgBox a & chr(10)+chr(13)& b
End Sub
打开窗体运行后,单击命令按钮,消息框的两行输出内容分别为
A.1和1
B.1.25和1
C.1.25和4
D.5和4
第4题:
有如下程序。 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
第5题:
假定有如下的Sub过程: Sub sfun(x As Single,y As SinglE)t=x x=t/y y=t Mod y End Sub 在窗体上添加一个命令按钮(名为Command1),然后编写如下事件过程: Private Sub Command1_Click( ) Dim a as single Dim b as single a=5 b=4 sfun a,b MsgBox a &char(10
A.1和1
B. 1.25和1
C. 1.25和4
D. 5和4
第6题:
在窗体上画两个标签和一个命令按钮,其名称分别为Labe11、Labe12和Command1,然后编写如下程序: Private SUb fune(L As Label,By Val a As Integer) L.Caption="1234" a=a*a End Sub Private Sub Form. Load() LabeCaptlon="ABCD" LabeCapfion=10 End Sub Private SUb Command1_Click() a=Val(Label2.Caption) Callfunc(Labell,A)LabeCaption=a End Sub 程序运行后,单击命令按钮,在两个标签Labe11和Labe12中显示的内容分别是______。
A.ABCD和10
B.1234和100
C.ABCD和100
D.1234和10
第7题:
若有如下Sub过程:
Sub sfun(x As Single,y As Single)
t=X
x=t/y
y=t Mod Y
End Sub
在窗体中添加一个命令按钮Command33,对应的事件过程如下:
Private Sub Command33_Click()
Dim a As Single
Dim b As Single
a=5: b=4
sfun a,b
MsgBox a&chr(10)+chr(13)&b
End Sub
打开窗体运行后,单击命令按钮,消息框中有两行输出,内容分别为
A.1和1
B.1.25和1
C.1.25和4
D.5和4
第8题:
阅读以下说明及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
第9题:
设在窗体Forml上有一个列表框Listl,其中有若干个项目。要求单击列表框中某一项时,把该项显示在窗体上,正确的事件过程是。 A.Private Sub Listl_Click B.Private Sub Forml_Click Print Listl.Text Print Listl.Text End Sub End Sub C.Private Sub Listl_Click D.Private Sub Forml_Click Print Forml.Text Listl.Print Listl.Text End Sub End Sub
第10题:
现有如下Sub过程: Sub fun(x es single,y as single) t = x x = t/y y = t mod y End sub在窗体上添加命令按钮(cmD) ,编写如下事件过程: Private sub cmd_click( ) Dim a as single Dim b as single a = 5 b = 4 fun a, b Msgbox a & chr(10) + chr(13) & b End sub运行程序后,单击按钮,则在消息框中显示的内容为( )
A.1和1
B.1.25和1
C.1.25和4
D.5和4