添加SO<sub>2</sub>后生成的()有利于果皮中色素、酒

题目

添加SO2后生成的()有利于果皮中色素、酒石、无机盐等的溶解,增加酒的色度和浸出物的含量。

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

第1题:

在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序:

Private Sub f(ByVal x As Integer)

x=x+4

End Sub

Private Sub Command1_Click()

i=3

Call f(i)

If i>4 Then i=i*2

End Sub

窗体打开运行后,单击命令按钮,则消息框的输出结果为( )。


正确答案:3
3 解析: 本题考查VBA中参数传递的知识。在VBA的过程调用时,参数有两种传递方式:传址传递和传值传递。如果在过程声明时形参用ByVal声明,说明此参数为传值调用;若用ByRef声明,说明此参数为传址调用;没有说明传递类型,则默认为传址传递。本题中在定义子过程f的时候用ByVal声明了形参x,说明为传值调用,此时对x的任何更改不会影响调用它的实参i,所以执行完callf(i)这条语句后i的值不变仍为3,当然也不满足If语句的条件,故此最后输出结果为3。

第2题:

在窗体上添加两个文本框和一个按钮,在按钮的单击事件中添加如下代码:

Private sub command1_Click( )

Text1="vba test"

Text2=text1

Text1= "test end"

End sub

单击按钮后,text2中的文本内容是【 】。


正确答案:vba test
vba test 解析:当用户单击(Click)命令按钮(Command1)之后:
①"vba test"字符串赋值给Text1。
②再将Text1中的内容赋值给Text2。
③将"test end"赋给Text1。
所以最后Text1中的内容是"test end",而Text2中的内容是"vba test"。

第3题:

在通用声明中定义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

第4题:

在窗体上添加文本框Text1,然后编写下列程序: Private Sub Form_Load() Text1.Text=" " End Sub Private Sub Text1_KeyPress(KeyAscii As Integer) Char=Chr(KeyAscii+1) KeyAscii=Asc(Ucase(Char)) End Sub Private Sub Command1_Click() Print Text1.Text End Sub 程序运行后,在文本框中依次输入1、2、3、a、b、c,单击命令按钮,则窗体上显示的内容是

A.23BCD

B.ABC

C.!@#ABC

D.123abc


正确答案:A
解析:在向文本框中依次输入1、2、3、a、b、c的同时,Text1_KeyPress过程分别接收到的是KeyAscii(各字符的ASCII码),Chr函数将加过1的ASCII码转换成字符,UCase函数将字符转换成大写字符,数字保持不变,Asc函数又将字符转换成ASCII码,最后出现选项A的字符。

第5题:

在窗体中添加一个名称为Cmd的命令按钮,然后编写如下程序: Public x As integer Private Sub Cmd_Click() x=10 Call add1 Call add2 MsgBox x End Sub Private Sub add1 ( ) x=x+20 End Sub Private Sub add2 ( ) Dim x As integer x=x+40 End Snb 窗体打开运行后,单击命令按钮,则消息框的输出结果为( )。

A.10

B.60

C.30

D.70


正确答案:C
解析:公有变量x,在add1中对其值加20为30,但在add2中又定义了私有变量x,这时私有变量有效。所以x的值仍然为30。

第6题:

在窗体中添加一个命令按钮(名为Command1),然后编写如下代码:

Public x as integer

Private Sub Command1_Click( )

x=5

Call s1

Call s2

MsgBox x

End Sub

Private Sub s1( )

x=x+10

End Sub

Private Sub s2( )

Dim x as integer

x=x+10

End Sub

窗体打开运行后,单击命令按钮,则消息框的输出结果是______


正确答案:15
15 解析: 本题使用Call调用子过程s1,s2。x=5在调用子过程s1后,x= 15,但由于在s1中直接使用变量,所以该值的作用范围是局部的,即只限于s1子过程中,没有传回。在调用s2时,由于使用Dim…As关键字定义x,所以其值是模块范围的。所以在消息框中输出的值,是从子过程s2传回的值。

第7题:

在窗体中添加一个名称为Com1的命令按钮,然后编写如下程序:

Private Sub s(ByVal p As Integer)

p=p*2

End Sub

Private Sub Com1_Click()

Dim i As Integer

i=3

Call s(i)

If i>4 Then i=i^2

End sub

窗体打开运行后,单击命令按钮,则消息框的输出结果为( )。


正确答案:3
3 解析: 本题考查VBA程序的知识。在VBA的过程调用时,参数有两种传递方式:传址传递和传值传递。如果在过程声明时形参用ByVal声明,说明此参数为传值调用,此时形参的变化不会返回到实参;若用ByRef声明,说明此参数为传址调用,此时形参的变化将会返回到实参:没有说明传递类型,则默认为传址传递。此题中形参p被说明为ByVal传值形式的整型量,当运行Com1_Click()过程时调用s()函数,实参i传送其值给形参p,p发生变化p=p*2=3*2=6。但因为使用的是ByVal传值传递,所以实参i的值不发生变化,if语句中的判断条件为假,所以会直接执行MsgBox i语句后输出3。

第8题:

有如下SUB过程:

Sub s(x As Single,y As Single)

t=x

x=t / y

y=t Mod y

End Sub

在窗体上添加一个命令按钮,然后编写如下事件过程:

Private Sub Form_Click()

Dim a As Single

Dim b As Single

a=5

b=4

s a,b

Print a,b

End Sub

则程序运行后,单击命令按钮,输出的结果为【 】 。


正确答案:1.251
1.25,1 解析:调用s过程,传入"a=5,b=4"。t=5 , x=5/4, 故x=1.25;y=5%4,故y=1。返回并输出(1.25,1)

第9题:

在窗体中添加一个名称为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


正确答案:B
解析:本题使用Call关键字调用子过程s1,s2。x=10在调用子过程s1后,x=30,但由于在s1中直接使用变量,所以该值的作用范围是局部的,即只限于s1子过程中,没有传回。在调用s2时,由于s2使用Dim...As关键字定义x,所以其值是模块范围的。故在消息框中输出的值,是从子过程s2传回的值。

第10题:

在窗体中添加一个命令按钮,并编写如下程序:Private Sub Command1_ Click() x=1: y=2: z=3 x=y: y=z: z=xEnd Sub程序执行后,输出的结果是______。

A.3

B.0

C.2

D.1


正确答案:C
解析:变量中的数据为最后一次赋的值。

更多相关问题