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）
相关文档：
发送端以163为例
一、asp.net版 using System.Web.Mail; //命名空间引用
c#
MailMessage mail = new MailMessage();
mail.To = "shadow103@qq.com"; //接受人的邮箱
& ......
全面控制 Excel
首先创建 Excel 对象，使用ComObj:
Dim ExcelID as Excel.Application
Set ExcelID as new Excel.Application
1) 显示当前窗口：
ExcelID.Visible := True;
2) 更改 Excel 标题栏：
ExcelID.Caption := '应用程序调用 Microsoft Excel';
3) 添加新工作簿：
ExcelID.WorkBooks.Add;
4) 打开已存在� ......
原来的错误是：Timer1的Enabled属性设为True。
代码错误是：
Private Sub Timer1_Timer()
Dim c As Date
c = Time
lbl3.Caption = CStr(c)
End Sub
————————————————&mdas ......
Format[$] ( expr [ , fmt ] )
format 返回变体型
format$ 强制返回为文本
--------------------------------
数字类型的格式化
--------------------------------
固定格式参数：
General Number 普通数字，如可以用来去掉千位分隔号
format$("100 ......
