private sub add(byval a as integer ,optional b as integer = 1)
add =a + b

end sub

这个一个非常简单的加法子程序，可以完成A+B的运算，调用的时候如果忽略B的赋值的话，就是A的自增1。

而这个Optional就是可以使这个程序有一个可选参数。这个用于很广的方面，我现在正在做一个3D控件，设置屏幕分辨率的时候遇到了这样的问题，翻了好多资料才找到这个东西。

还有就是USERCONTROL的一些特定字符串的选择。

例如
winsock.protocol = sckUDPProtoclool

这是一个特定的字符串，它方便用户区别使用。

而我们做USERCONTROL的时候，就要用到ENUM了

ENUM protocol
sckTCPProtoclool = 1
sckUDPProtoclool = 2
end ENUM

这样可以使那些数字便于区分。这个使用频率不大，主要用于大数据量而又容易混搅的函数。相当与CONST

希望对大家有所帮助`