命令按钮程序分析

来源:百度知道 编辑:UC知道 时间:2024/05/23 12:36:10
在窗体上添加一个名为Command1的命令按钮,然后编写如下程序:
Function m (x As Integer,y As Integer) As Integer
m=Ⅱf(x>y,x,y)
End Function
Private Sub Command1_Click()
Dim a As Integer,b As Integer
a=1,b=2
Msgboxm(a,b)
End Sub

打开窗体运行后,单击命令按钮,消息框中输出结果为?为什么?
高手麻烦帮一下忙,谢谢~~~
可是书中的答案是4.书中的解释是这样的m(6)=12-6=6
m(2+6)=m(8)=12-8=4,不知道这答案哪里来的?

在窗体上添加一个名为Command1的命令按钮,然后编写如下程序:
Function m (x As Integer,y As Integer) As Integer
m=Ⅱf(x>y,x,y)
End Function
Private Sub Command1_Click()
Dim a As Integer,b As Integer
a=1,b=2
Msgboxm(a,b)
End Sub

打开窗体运行后,单击命令按钮,消息框中输出结果为?为什么?
高手麻烦帮一下忙,谢谢~~~
问题补充:可是书中的答案是4.书中的解释是这样的m(6)=12-6=6
m(2+6)=m(8)=12-8=4,不知道这答案哪里来的?

Function m (x As Integer,y As Integer) As Integer
m=Ⅱf(x>y,x,y)
End Function
这部分是自定义一个函数.
作用是
当x>y的时候m=x,
当x<y的时候m=y.

Private Sub Command1_Click()
Dim a As Integer,b As Integer
a=1,b=2
Msgbox m(a,b)
End Sub

这里主要的一句是:Msgbox m(a,b)
调用了自定义的m函数.
比较a和b的大小
如果a>b那么输出a,如果a<b那么输出b
a=1,b=2,那么就是a<b
所以结果是输出2.

问题补充:可是书中的答案是4.书中的解释是这样的m(6)=12-6=6
m(2+6)=m(8)=12-8=4,不知道这答案哪里来的?
书上的代码也是人写的.人写的难免会出错.
或者是你看错了.
如果你有疑问.那么VB调试下不就知道拉.
书上是不是说的对.