PB中的timer事件

一.timer事件

1.在窗口的timer事件中编写代码

2.在相应的触发事件中调用：timer(1) 就是每隔一秒触发一次，timer(0)就是关闭计时器

实例：

在窗口的timer()事件中编写代码：w_main.BackColor=rgb(rand(255),rand(255),rand(255))

  rand(255)是生成随机数；

  rgb是颜色函数；

然后在窗口的打开事件或者通过某个事件触发此timer

 

二.随机数

1
PB中rand函数产生随机数的机制：
PB每次调用rand获取的随机数，实际上是从固定的数组中读取的。
比如语句rand(100),在程序中：
第一次调用，函数返回42。
第二次调用，函数返回68。
第三次调用，函数返回35。
也就是：42、68、35、1、70、25、79、59...这样一个数组常量。
程序关闭后重新运行，按照相同的顺序返回相同的值。
2
Randomize 函数的使用：
上述的机制中提到的数组，PB是通过Randomize函数来指定的。
例如：
Randomize(1)，产生随机数顺序为：42、68、35、1、70、25、79、59...
Randomize(2)，产生随机数顺序为：46、17、99、96、85、51、91、32...
而Randomize(0)则是随机指定，也正是这个参数0，使得rand函数可以真正意义上获取随机数。
3
rand 函数配合Randomize 函数获取随机数:
int i
string ls_msg
Randomize(0)
for i = 1 to 10 
     ls_msg += string(rand(100))+'~r~n'
next
messagebox("",ls_msg)
以上代码功能，从1-100中间随机获取10个数
Randomize函数的作用域是全局的，所以如果程序多次多处调用rand函数，可以把Randomize写在appliction的open事件中。