PB 随机数计算器

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





  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 打赏
    打赏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包

打赏作者

HelloWorldFH

你的鼓励将是我创作的最大动力

¥2 ¥4 ¥6 ¥10 ¥20
输入1-500的整数
余额支付 (余额:-- )
扫码支付
扫码支付:¥2
获取中
扫码支付

您的余额不足,请更换扫码支付或充值

打赏作者

实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、C币套餐、付费专栏及课程。

余额充值