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 ......
·错误类型
·编程员的错误(比如分母不能是0,参数个数或数据类型不对应)
·环境方面的错误(比如文件太大,磁盘放不下)
·时间上的错误(比如视图给尚未完成加载的窗体设置焦点)
·创建错误处理程序
......
◆请由此确定是否被恶意修改◆
作者:我心飞翔
VB中引入本DLL的方法
方法一:选择“工程(P)”菜单下的“引用(N)”,在出现的对话框中点“浏览按钮”,并找到DLL所在位置。
方法二:分两步走
(1)注册动态链接库,使用regsvr32命令。在运行对话框中,输入“regsvr32 DLL完整路 ......
Format[$] ( expr [ , fmt ] )
format 返回变体型
format$ 强制返回为文本
--------------------------------
数字类型的格式化
--------------------------------
固定格式参数:
General Number 普通数字,如可以用来去掉千位分隔号
format$("100 ......
VB无所不能之四:制作透明和半透明窗体
——作者:钟声
我们经常可以看到这样的窗体,觉得很炫,如图所示:
同样,对Windows系统方面的编程似乎首先想到的绝对不是VB,而大部分程序员想到的一定是VC。
& ......