2只羊可以换7只鹅，2只鹅可以换5只鸡。4只羊可以换几只鸡？

在窗体上面画一个命令按钮，然后编写如下程序：
Function M(x As Integer，y As Integer)As Integer
M=IIf(x＞y，x，y)
End Function
Private Sub Command1_Click()
Dim a As Integer，b As Integer
a=1
b=2
Print M(a，B)
End Sub
程序运行后，单击命令按钮，输出结果为 【11】 。