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 页面