未知题型
单击命令按钮时，下列程度段的执行结果为( )。 Pfivate Sub Command1_Click() Dima As Integer，b As Integer, c As Integer a=2:b=4:c=6 Call S1(a，B) Print 'a='；a；'b='；b；'c='；c Call S2(a，B) Print 'a='；a；'b='；b；'c='；c； End Sub Private Sub S1(x As Integer, y As Integer) Dim c As Integer x=2*x:y=y+2:c=x+y End Sub Sub S2(x As Integer, By Val y As Integer) Dim e As Integer x=2*x:y=y+2:e=x+y End Sub
A.a=4 b=6 c=6 a=4 b=6 c=6
B.a=8 b=6 c=6 a=8 b=6 c=6
C.a=4 b=6 c=6 a=8 b=6 c=6
D.a=8 b=6 c=6 a=4 b=6 c=6
- A.a=4
B.a=8
C.a=4
D.a=8
【参考答案】
C
解析：在定义子过程的参数时，如果在参数前加上ByVal，表示是“传值”参数，主调函数中参数的值不被改变，否则......
(↓↓↓ 点击下方‘点击查看答案’看完整答案 ↓↓↓)
点击查看答案
相关考题
-
判断题
二氧化硫对呼吸道有害，因此如果果酒中检测出含有二氧化硫，一定是非法添加。 A、正确 B、错误 -
未知题型
在窗体上面有一个文本框，其名称为Text1，编写如下事件过程： Private Sub Text1_KeyPress(KeyAscii As Integer) Dim str As String str=Chr(KeyAscii) KeyAscii=Asc(UCase(str)) Text1.Text=String(2，KeyAscii) End Sub 程序运行后，如果在键盘上输入字母“a”，则在文本框Text3中显示的内容为( )。A.aaaB.AAAC.AAD.aa
A.Text=String(2，KeyAscii)
B.aaa
B.AAA
C.AA -
未知题型
某人在窗体上画了一个名称为Timer1的计时器和一个名称为Label1的标签，计时器的属性设置为Enabled=True，Interval=0，并编程如下。希望在程序运行时，可以每2秒在标签上显示一次系统当前时间。 Private Sub Timer1_Timer() Label1.Caption=Time$ End Sub 在程序执行时发现未能实现上述目的，那么，应做的修改是( )。A.通过属性窗口把计时器的Interval属性设置为2000B.通过属性窗口把计时器的Enabled属性设置为FalseC.把事件过程中的Label1.Caption=Time$语句改为Timer1.Interval=Time$D.把事件过程中的Label1.Caption=Time$语句改为Label1.Caption=Timer1.Time
A.Caption=Time$
B.通过属性窗口把计时器的Interval属性设置为2000
B.通过属性窗口把计时器的Enabled属性设置为False
C.把事件过程中的Label1.Caption=Time$语句改为Timer1.Interval=Time$
