在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后输写如下程序: Private Sub Command1_Click() Dim x,y,z As Integer x=5 y=7

admin2009-03-15  25

问题 在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后输写如下程序:    Private Sub Command1_Click()    Dim x,y,z As Integer         x=5         y=7         z=0         Text1.Text=" "         CallFunl(x,y,z)         Text1.Text=Str(z)    End Sub    Sub Fun1(By Val a As Integer,Byval b As Integer,c As Integer)        c=a+b    End Sub    程序运行后,如果单击命令按钮,则在文本框中显示的内容是

选项 A、0
B、12
C、Str(2)
D、没有显示

答案2

解析 过程Fun1的参数c是按地址传递的(ByRef,默认的传递方式),而Fun1用语句Call Fun1(x,y,z)调用后,形参c的值为12,则实参z的值亦为12。
转载请注明原文地址:https://kaotiyun.com/show/ET1p777K
0

最新回复(0)