化学工程

解释下列问题 (1)CCl4是液体,CH4和CF4是气体,而CI4是固体。 (2)NaF的熔点高于NaCl。

题目

解释下列问题 (1)CCl4是液体,CH4和CF4是气体,而CI4是固体。 (2)NaF的熔点高于NaCl。

如果没有搜索结果,请直接 联系老师 获取答案。
如果没有搜索结果,请直接 联系老师 获取答案。
相似问题和答案

第1题:

( 30 )下面程序的输出结果是

Private Sub Command1_Click()

ch$= ” ABCDEF ”

proc ch

Print ch

End Sub

Private Sub proc(ch As String)

S= ””

For k=Len(ch) To 1 Step-1

s=s&Mid(ch,k,1)

Next k

ch=s

End Sub

A ) ABCDEF

B ) FEDCBA

C ) A

D ) F


正确答案:B

第2题:

(9)下列程序的输出结果是。 Sub Prin() Dim B As String A=1 B=A & Space(4)&A PrintA Print trim(B) End Sub


正确答案:

1

1    1


【解析】Space(Integer)函数的功能是返回指定数目空格;Trim函数的功能是去掉字符串两边的空白字符,注意Trim(B)不能将字符中间的空白字符去掉。B=A&Space(4)&A的结果是“1    1”(中间有4个空格)。
LTrim(String)函数的功能是去掉String字符串左边的空白字符;RTrim(String)函数的功能是去掉String字符串右边的空白字符。

第3题:

下列过程定义语句中,参数不是对象的定义语句是( )。

A.Sub Pro4(x As Form)

B.Sub Pro4(y As Control)

C.Sub Pro4(Form1 As Form,Labell As Control)

D.Sub Pro4(x As Currency)


正确答案:D

第4题:

下列程序实现的功能是:在窗体上单击时,将在窗体上输出c:=a1.txt文件中的所有小写字母。

Private Sub Form. Click()

Dim Ch As String * 1

Open "c:\a1.txt" For Input As 10

Do While【 】

Ch= Input(1, 10)

If 【 】Then

Print Ch;

End If

Loop

【 】

End Sub


正确答案:Not EOF(10) Ch>="a"And Ch="z" Close #10
Not EOF(10) ,Ch>="a"And Ch="z" , Close #10 解析:要将a1.txt中的所有小写字母输出,可采用下述方法:首先读打开该文件,然后从文件中读取一个字符,判断该字符是否为小写字母,若是则输出该字母,重复上述过程直到文件结尾。在读字符前应要测试文件内部读写指针是否位于文件尾,只有不是在文件结尾时才能读取字符,故【 】处应填“Not EOF(10)”,读取一个字符后,应判断该字符是否尾小写字母,故【 】处应填“Ch>="a" And Ch="z"”,文件读写过后,应关闭文件,故【 】处应填“Close #10”。

第5题:

阅读程序: Sub p( b () As Integer)For i =1To 4 b(i) = 2(iNext 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 call p (a) For i=1 To 4 Print a(i) Next iEnd Sub运行上面的程序,单击命令按钮,输出结果为。


正确答案:2 4 6 8
【解析】本题综合考查Sub过程的建立与调用以及数组的赋值。P过程为参数b()赋值,赋值方法为b()中的元素值等于其下标的2倍。在事件过程中,数组a(1 to 4)先被逐一赋值,然后以传地址的方式被p过程调用。在调用中,a(i)被重新按照p过程的赋值方式(即元素值等于对应下标值的2倍)赋值。由于是以传地址的方式传送a(1 to 4),故在调用完p过程后,a(1 to 4),故在调用完p过程后,a(1 to 4)中的元素值将保留,故空白处填:2 4 6 8。

第6题:

在通用声明中定义a,在窗体中添加一个命令按钮Command1,编写如下程序代码:

DimaAsInteger

Subtest()

a=a+1:b=b+1:c=c+1

Print"Sub:";a;",";b;",";c

EndSub

PrivateSubCommand1_Click()

a=2:b=3:c=4

Calltest

Calltest

EndSub

程序运行后,单击命令按钮,窗体中将显示( )

A.Sub:3,4,5Sub:4,5,6

B.Sub:2,3,4Sub:2,3,4

C.Sub:3,1,1Sub:4,1,1

D.Sub:1,1,1Sub:1,1,1


正确答案:C

第7题:

(12)有下列Sub过程: Sub Sub(x As Single,y As Single) t=x x=t/y y=t Mody End Sub 在窗体上的命令按钮Commandl中,编写下列事件过程,执行该事件过程调用Sun过程,结果是( )。 Private Sub Commandl_Click() Dim a As Single Dim b As Single a=5 b=4 Sun a,b Print a;b End Sub A.1.25 1 B.5 4 C.4 5 D.1 1.25


正确答案:A
【解析】本题考查过程的调用,如果用Call语句调用子过程时,实际参数要放在括号中,如果不使用Call子句,则不必使用括号。本题参数调用时是按地址传递,因此Sun过程中变量的值改变也即改变了单击事件中的a、b变量值。
Sun a,b的执行过程是:t=x=5,x=t/y=1.25,y=t Mod y=1。

第8题:

( 14 )执行以下程序后输出的是

Private Sub Command1_Click()

Ch$= ” AABCDEFGH ”

Print Mid(Righ(ch$,6),Len(left(ch$,4)),2)

End Sub

A)CDEFGH

B)ABCD

C)FG

D)AB


正确答案:C

第9题:

运行以下程序后,输出结果为_____________。 Private Sub Command1_Click() a=1:b=2:c=3 Call test(a,b+3,(c)) Print "main:";a;b;c End Sub Private Function test(p,m,n) p=p+1:m=m+1:n=n+1 Print "sub:";p;m;n End Function

:A. sub:2 6 4 main:1 2 3

B. sub:2 6 4 main:2 2 3

C. sub:2 6 4 main:2 6 4

D. sub:2 6 4 main:1 6 4


参考答案:B

第10题:

下列程序的功能是把文件C:\a1.txt复制成C:\a2.txt,请填空。

Private Sub Form. C1ick()

Dim ch As String

Open "C:\a1.txt" For【 】

Open "C:\a2.txt" For【 】

Do While Not【 】

ch=Input(1,10)

Print 20,ch;

Loop

Close 10,20

End Sub


正确答案:Input As # 10 Output As # 20 EOF(10)
Input As # 10, Output As # 20 , EOF(10) 解析:根据程序中的语句Close # 10, #20可知两个文件的文件号分别为10,20。程序的功能是把文件C:\a1.txt复制成C:\ a2.txt即最后输出文件的内容为C;\a2.txt的内容,故a1.txt的打开方式为Input.a2.txt的打开方式为output。根据语句Print # 20.ch可推断文件C:\a2.txt的文件号为20,另一个为10。再结合打开语句的格式:Open Path- name For打开方式As[#]文件号可知[13]处应填Input As #10,[14]处应为Output As #20。在文件复制时还得保证复制文件没有结束,此时就用到了EOF函数。其格式为;EOF(文件号)。因为复制文件的文件号为10,故[15]处应填EOF(10)。

更多相关问题