初学pb,通过练习制作一个实现简单功能的计算器来联系窗口等的使用
(1)首先创建计算器的模型,如图
(2)然后设计全局变量:
其中result代表计算中的结果,buffer则为一个缓冲变量,judge则是判断计算器的状态(0为初始状态,1+,2-。。。)
(3)对每个数字设置按钮,添加以下脚本:
if judge=0 then
result=0 //result=0时,此时为输入状态
end if
buffer=buffer+"1" //“0”是数字键为0时,如为1时应是buffer+“1”
sle_1.text=buffer //显示输入的数字
(4)对+,-,*,/进行添加脚本:
首先保存数字按钮的结果buffer,它是string类型记得转换为double类型:
double buf
buf=double(buffer)
CHOOSE CASE judge
CASE 0
If result=0 then
Result=buf
End if
Case 1
Result=result + buf
Case 2
Result=result - buf
Case 3
If buffer<>"" then
Result=result * buf
End if
Case 4
If buf<>0 then
Result=result / buf
End if
END CHOOSE
If result<100000000 then
Sle_1.text=string(result)
Else
Sle_1.text="error"
End if
Buffer=""
Judge=1 //judge=1是当按下“*”键时返回的值,返回值在全局变量定义时已给出,
//其余部分相同
记住第一次按+等按钮case=0.
(5)对=写脚本,和+,-等方法一样,脚本同上
(6)cls是清空让三个变量全为初始值就行了
sle_1.text="0"
buffer=""
judge=0
result=0
这样就完成了