如何保证转化出口CH4<0.5%()
第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
第2题:
运行以下程序后,输出结果为_____________。 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
第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)
第4题:
执行以下程序后输出的是。 Private Sub Commandl_Click ch$ = "ABCDEFGH": Print Mid(Right(ch$, 6), Len(Left(ch$, 4)), 2) End Sub A.CDEFGH B.ABCD C.FG D.AB
第5题:
若有以下变量和函数说明: #include<iostream.h> charCh='*'; void sub(int x,int y,char ch,double*Z) { switch(ch) { case'+':*Z=x+y;break; case'-':*Z=x-y;break: case'*':*Z=x*y;break; case'/':*z=x/y;break: } } 以下合法的函数调用语句是( )。
A.sub(10,20,Ch,y);
B.sub(1.2+3,2*2,'+',&Z);
C.sub(sub(1,2,'+',&y),sub(3,4'+',&x),'-',&y);
D.sub(a,b,&x,ch);
第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
第7题:
下列程序的功能是把文件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
第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
第9题:
窗体上画一个名称为Text1的文本框,然后编写如下事件过程: Private Sub Form. Load() Show TextSetFocus End Sub Private Sub Text1_ KeyPress (KeyAscii As Integer) Dim ch As String ch = Chr (KeyAscii) KeyAscii = Asc(UCase(ch)) Pint Chr(KeyAscii + 4) End Sub程序运行后,在文本框中输入abcde,则在窗体上显示的内容是______。
A.abcde
B.efghi
C.EFGHI
D.ABCDE
第10题:
下面程序的输出结果是。 Private Sub Commandl_Click ch$=“ABCDEF” proc ch:Print ch End Sub Private Sub proc(ch As Stnng) 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