Sub 常量() Const pi = 3.1415926 End Sub Sub 变量() Dim a As Integer a = 100 a = 200 End Sub Sub 应用() Const pi = 3.1415926 '常量 a = 200 '变量,可不用声明 Debug.Print pi * a '在立即窗口显示 End Sub
<h2 style="font-family: 'Microsoft Yahei', sans-serif; margin: 0px; padding: 0px; line-height: 26px;">转载请注明作者与出处:<a target=_blank target="_blank" href="http://blog.csdn.net/u013511642" style="color: rgb(202, 0, 0); text-decoration: none;">http://blog.csdn.net/u013511642</a> 王小涛_同學</h2>
原文地址:http://blog.csdn.net/u013511642/article/details/45374471