vb常用内部函数（四）：随机数函数
rnd函数返回或者说产生一个小于1但大于或等于0的single类型的随机数。
产生随机数之前需要一个种子。
·不同的种子，可使随机数生成器生成不同的随机数；
·在一个种子下，生成的随机数相同。
随机数生成器的语句为randomize。格式为：randomize[x]。
·当x>0时，使用前一次调用rnd函数产生的随机数作为本次产生随机数的种子。一般通过使用该参数获得不同的随机数序列。
·当x<0时，使用x作为随机数种子，用于产生相同的随机数序列。
·当x=0时，返回最近一次调用rnd函数生成的随机数。
·当x省略时，调用rnd函数之前，如果没有执行randomize语句，则与x>0的情况相同。反之，如果执行了randomize语句，则rnd函数使用randomize语句提供的新种子值，返回随机数。
rnd函数产生的是[0，1）区间内的single类型数据。
*&&*如果要生成其他区间的随机数或者英文字母，则要通过表达式来实现：
·生成[0，x）区间的随机数single类型数据，使用表达式rnd*x
·生成[m，n）区间的随机数single类型数据，使用表达式m+rnd*（n-m）
·生成[m，n]区间的随机整数，使用表达式int（m+rnd*（n-m+1））或者使用表达式m+int（rnd*（n-m+1））
·生成一个随机的大写英文字母，使用表达式chr（int（rnd*27）+65）
·生成一个随机的小写英文字母，使用表达式chr（int（rnd*27）+97）
相关文档：
Public Function IsValidIPAddress(ByVal strIPAddress As String) As Boolean
On Error GoTo Handler
Dim varAddress As Variant, n As Long, lCount As Long
varAddress = Split(strIPAddress, ".", , vbTextCompare)
If IsArray(varAd ......
·注释能使注释能使代码更加容易理解，更加容易跟踪。
·出色的注释就像一幅好的设计蓝图，能够引导阅读者通过你的应用程序的曲折之处，能够说明预期的运行结果和可能出现的异常情况。
·编程原则
·用文字说明代码的作用
·编写非常出色的 ......
VB6IDEMouseWheelAddin.dll
就是这个能使你在VB的代码编辑窗口能够使用鼠标滚轮，编辑代码、查看代码更方便。
下面详述：
1、给大家一个下载地址：
http://download.microsoft.com/download/e/f/b/efb39198-7c59-4ace-a5c4-8f0f88e00d34/vb6mousewheel.exe右击解压，再右击解压，这时就会看到一个dll文件，这个就是我 ......
上集中只是显示星期几，不够全面，完善后如下：
1、创建lbl1、lbl2、lbl3、txt1、cmd1、Timer1
2、lbl：“输入年月日（如2000-8-16）：”，设置lbl、txt1、cmd1的字体大小和颜色。Timer1的Enable属性设为False，Interval属性设为：1000。
3、双击cmd1，进入代码编辑窗口，敲入：
Private Sub Timer1_Timer()
......
第一次正式去上米老师的课，这次是寒假来后的第一节课，内容主要是交流一下寒假的学习情况。
首先是言行问题：去机房上课时，带胸牌、笔记本、笔、《Visual Basic 程序设计》、鞋套、眼镜，手机能不带就不带；别人发言时，显示器关掉，面向对方以示尊敬。
......
