中科新闻网赜的读音:懂vb者进来看看，我不大明白
来源：百度文库 编辑：中科新闻网 时间：2024/04/26 07:29:23
Private Sub Command1_Click()
Dim x, y, z As Integer
x = 5
y = 7
z = 0
Text1.Text = ""
Call p1(x, y, z)
Text1.Text = Str(z)
End Sub
Sub p1(ByVal a As Integer, ByVal b As Integer, c As Integer)
c = a + b
End Sub
给我讲讲这些语句的意义，答的好的加分
Dim x, y, z As Integer
x = 5
y = 7
z = 0
Text1.Text = ""
Call p1(x, y, z)
Text1.Text = Str(z)
End Sub
Sub p1(ByVal a As Integer, ByVal b As Integer, c As Integer)
c = a + b
End Sub
给我讲讲这些语句的意义，答的好的加分
Private Sub Command1_Click()
Dim x, y, z As Integer
x = 5
y = 7
z = 0
'对x、y、z的值进行初始设置
Text1.Text = ""
'对Text1的Text属性进行初始设置
Call p1(x, y, z)
'调用p1函数，x、y、z分别作为三个参数
Text1.Text = Str(z)
'将z的值转化为字符串变量再复制给text1的text属性，也就是让text1显示出z的值
End Sub
Sub p1(ByVal a As Integer, ByVal b As Integer, c As Integer)
'这是定义了一个名为p1的函数，参数有三个：a、b、c
'a、b前有byval，表示这两个参数是传值参数，也就是说：不管你在p1函数中对a、b的量进行怎样的处理，作为参数传递给a、b的变量的原值是不变的。。c就是用的默认的传值方式，也就是说在函数p1中c发生变化的话，作为参数传递给c的变量的值也会随之变化
c = a + b
'将a和b的和赋值给c
End Sub
注意函数参数的传值和传址的方式的不同
在p1函数中
c是默认的传址方式传递参数，c＝a＋b＝5＋7＝12，这时作为参数传递值给c的变量z的值也就变成了12。