PB 随机数的基础代码(打开主窗口进行随机数)
代码:
一个应用的主窗口,进行代码的跳转
open(w_mainone)
实现打开窗口时 随机数出现
string a
int t=10
a=string(rand(t))
k1.text=a
string a1
int t1=5
a1=string(rand(t1))
k2.text=a1
实现功能
关于PB随机数的应用;
Rand()
功能得到1与n之间的一个伪随机数。
语法Rand ( n )
参数n:数值型变量或表达式,指定要产生的伪随机数的上界。有效值在1到32,767之间返回值与n的数据类型相同。函数执行成功时返回1与n之间的一个伪随机数,包括1和n在内。如果参数n的值为NULL,Rand()函数返回NULL。
使用起来比较方便
---------------------------------------------------------
Randomize()
功能初始化伪随机数发生器,这样让应用程序每次使用不同的伪随机数序列。
语法Randomize ( n )
参数n:数值型变量或表达式,指定伪随机数生成器使用的起始值,不同的起始值可以生成不同的伪随机数序列。当n的值为0时,该函数把系统时钟作为伪随机数生成器的起始值,这样可以生成不可重复的伪随机数序列。当n的值不为0时,可以产生不同的伪随机数序列,但是,如果两次使用相同的伪随机数生成器起始值,那么两次生成的伪随机数序列相同。n的值在0到32,767之间返回值Integer。极少使用该函数的返回值
目前没有此需求,so没有使用过
-----------------------------------------------
PB的开发心得
任何语言开发起来都是要都敲多练
关于PB
1.熟悉控件,基本的算法基础
2整体框架的思路搭建
3随时找人解决问题进步更快
4熟悉各个页面布局的位置
-----------------------------------
需求:仅有一个按钮 实现随机数的加减乘除
解:代码如下
做一个简单的下拉选控件实现需求
string a,b,sum,sum1,bj
long c
//fh.text='+'
//fh.text='-'
//fh.text='*'
//fh.text='/'
if fh.text='+' then
a=k1.text
b=k2.text
c=long(a)+long(b)// 运算
sum=string(c)//
//s.text=sum//赋值操作
bj=s.text
if bj=sum then
//Messagebox("ok","恭喜你答对了")
open(w_1)
else
if bj<>sum1 then
//Messagebox("ok","你答错了")
open(w_0)
end if
end if
//------------------------------------------------
end if
//open(w_1)
//-------------------------
if fh.text='-' then
a=k1.text
b=k2.text
c=long(a)-long(b)// 运算
sum=string(c)//
//s.text=sum//赋值操作
bj=s.text
if bj=sum then
//Messagebox("ok","恭喜你答对了")
open(w_1)
else
if bj<>sum1 then
//Messagebox("ok","你答错了")
open(w_0)
end if
end if
//------------------------------------------------
end if
//open(w_1)
//-----------
if fh.text='*' then
a=k1.text
b=k2.text
c=long(a)*long(b)// 运算
sum=string(c)//
//s.text=sum//赋值操作
bj=s.text
if bj=sum then
//Messagebox("ok","恭喜你答对了")
open(w_1)
else
if bj<>sum1 then
//Messagebox("ok","你答错了")
open(w_0)
end if
end if
//------------------------------------------------
end if
//open(w_1)
//---
if fh.text='/' then
a=k1.text
b=k2.text
c=long(a)/long(b)// 运算
sum=string(c)//
//s.text=sum//赋值操作
bj=s.text
if bj=sum then
//Messagebox("ok","恭喜你答对了")
open(w_1)
else
if bj<>sum1 then
//Messagebox("ok","你答错了")
open(w_0)
end if
end if
//------------------------------------------------
end if
//open(w_1)
第二种方法:
循环思路,随机的进行运算都可以
随机数开发的重点是在1.如何进行窗口的跳转,(open()函数的使用)
2 随机数代码所写的页面位置 位于open 页面