在窗体上画一个命令按钮，其名称为Command1，然后编写如下程序：
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=100
b=200
Print M(a，b)
End Sub
程序运行后，单击命令按钮，输出结果为 【15】 。

越来越多的人成了互联网追新潮的盲从者，他们生怕自己惯用的虚拟身份在某个网络社区被别人抢先占据。这种场面似乎与1999年前后免费电子邮箱热湘有些相似，当时的统计显示，每个互联网用户平均注册了8.6个电子邮箱．可到2005年，这些邮箱只有18%还在使用，每个互联网自然人平均使用的电子邮箱仅为1.73个，同样，只有少数社区注册者将成为存活下来的网络自然人．每个人有限的精力和时间，决定了未来网络社区的天花板高度。这段文字意在说明：

A．同时在多个网络杜区注册是没有必要的

B．盲目追逐新潮会耗费大量的精力和时间

C．网络社区应吸取免费电子邮箱热潮的教训

D．对未来网络社区规模的估计不宜盲目乐观