单项选择题

有下列两个过程：
Sub S1(ByVal x As Integer, ByVal y As Integer)
Dim t As Integer
t=x
x=y
y=t
End Sub
Sub S2(x As Integer, y As Integer)
Dim t As Integer
t=x
x=y
y=t
End Sub
则下列叙述中正确的是( )。

A．用过程S1可以实现交换两个变量的值的操作，S2不能实现
B．用过程S2可以实现交换两个变量的值的操作，S1不能实现
C．用过程S1和S2都可以实现交换两个变量的值的操作
D．用过程S1和S2都不能实现交换两个变量的值的操作
<上一题 目录 下一题>
热门 试题

单项选择题
编写如下事件过程和函数过程： Private Sub Command1_Click() Dim num(1 To 6) As Single num(1)=103: num(2)=190: num(3)=0 hum(4)=32:num(5)=-56: num(6)=100 Print Print p2(6,num()) End Sub Private Function p2(ByVal n As Integer, number() As Single) As Integer p2=number(1) For j=2 To n If number(j)＜p2 Then p2=number(j) Next j End Function 程序运行后，在窗体上输出( )。
A．-56
B．0
C．103
D．190
单项选择题
在窗体上画1个名为Text1的文本框和1个名为Label1的标签，再画4个名为Op1的单选按钮控件数组，其Index属性按季度顺序为0～3，如图1所示。在文件Sales.txt中按月份顺序存有某企业某年12个月的销售额。要求在程序执行时，鼠标单击一个单选按钮，则Text1中显示相应季度的销售总额，并把相应的文字显示在标签上。如图2所示是单击“第二季度”单选按钮所产生的结果。请选择可在空白处填写的合适语句( )。 Option Base 1 Dim sales(12) As Long Private Sub Form_Load() Open c: sales.txt For Input As #1 Fork= 1 To 12 Input #1, sales(k) Next k Close #1 End Sub Private Sub ______ (Index As Integer) Dim sum As Long, k As Integer, month As Integer sum=0 month=Index* Fork=1 To 3 month=month+1 sum=sum+sales(month) Next k Label1. Caption=______.Caption & 销售总额: Text 1=sum End Sub
相关试题