已知反应C(s) + 2H2O(g) ←→ CO2(g) + 2H2(g) 的Kp为A,用A 表示下列各反应的平衡常数KpCO2(g)+2Hg)←C(s)+ 2H2O(g)Kp=()
第1题:
在窗体中添加一个名称为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
第2题:
有如下程序 Private Sub Command1_Chck( ) s=0 DO s=(s+1) *(s+2) N=N+1 Loop Until s>=10 Prim N;s End Sub 运行后的输出结果是
A.0 1
B.30 30
C.4 30
D.2 12
第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.rehcaet
B.tahreee
C.themee
D.eerthea
第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
第5题:
有如下程序: Private Sub Command1 Click() Dim a As Single Dim b As Single a=5:b=4 Call S(a,B)End Sub Sub S(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
第6题:
运行下列程序:
Private Sub Command1_Click( )
Dim s1 As String * 1
Dim s2 As String
s1 = "a"
For i = Asc(s1) To Asc(s1) + 4
s2 = s2 & Chr(i)
Next i
Print s2
End Sub
单击Command1命令按钮后,则在窗体上显示的结果是( )。
A.a
B.abcde
C.aaaa
D.s2
第7题:
下列程序的执行结果为 Private Sub Command1_Click() Dim s1 As String,s2 As String S1;="abcdef" Call Invert(s1,s2) Print s2 End Sub Private Sub Invert (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=tempstr End Sub
A.fedcba
B.abcdef
C.afbecd
D.defabc
第8题:
设字符串S1= “ABCDEF”,S2= “PQRS”,则运算S=CONCAT(SUB(S1,2,LEN(S2)),SUB(S1,LEN(S2),2))后的串值为()。
第9题:
已知反应CaCO3(s)═══CaO(s)+CO2(g)。增大系统总压,平衡向着什么方向移动?()
第10题:
已知下列反应的平衡常数:H(+ S (s) == H2S 2g)(g) K1;S (s) + O2 (g) == SO2 (g) K2;则反应H2(g)+ SO2 (g) == O2 (g) + H2S (g)的平衡常数为 ()。
第11题:
<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>
第12题:
第13题:
设字符串s1='ABCDEFG',s2='PQRST',则运算s=CONCAT(SUB(s1,2,LEN(s2)),SUB(s1,LEN(s2,2))后的串值为(65)。
A.'ABCDEFEF'
B.'BCDEFG'
C.'BCPQRST'
D.'BCQR'
第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题:
写出程序运行的结果
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;
第16题:
在窗体中添加一个名称为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
第17题:
在窗体上画一个命令按钮和两个文本框,其名称分别为Command1、Text1和Text2,在属性窗口中把窗体的KeyPreview属性设置为True,然后编写如下程序: Diln S1 As String,S2 As String Private Sub Form. Load( ) Text1.Text="" Text2.Text="" Text1.Enabled=False Text2.Enabled=False End Sub Private Sub Form. KeyDown(KeyCode As Integer,Shift As Integer) S2=S2&Chr(KeyCode) End Sub Pri vate Sub Form. KeyPress(KeyAscii As Integer) S1=S1&Chr(KeyAscii) End Sub Private Sub Command1 Click( ) Text1.Text=S1 Text2.Text=S2 S1="" S2="" End Sub 程序运行后,先后按“a”、“b”、“c”键,然后单击命令按钮,在文本框Text1和Text2中显示的内容分别为( )。
A.abc和ABC
B.空白
C.ABC和abc
D.出错
第18题:
运行下列程序:
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
第19题:
下列程序的执行结果为 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
第20题:
s=”this is the mainstring”,sub=”string”,strindex(s,sub)是()
第21题:
已知系统开环传递函数为 GK/sub>(s)=7/[s(s+2)] ,则系统的增益和型次分别为()
第22题:
CO
<p>CH<sub>4</sub>、SO<sub>2</sub></p>
<p>SO<sub>2</sub>、CO</p>
<p>CO、CH<sub>4</sub>、SO<sub>2</sub></p>
第23题:
7,Ⅰ型
7,Ⅱ型
3.5,Ⅰ型
3.5,Ⅱ型