PB9.0实验操作说明

实验步骤：
一、建立数据库
1.创建数据库exam_pb
2.建立表students
3.为表students指定主键为“学号”
4.向表中输入数据
二、建立应用程序
1.建立工作空间“练习一”
2.建立应用程序“test”
3.建数据窗口dw_1
5.建应用程序窗口w_main
6在应用程序窗口中添加控件
7.为数据窗口指定目标对象“student”为主窗口定义标题！为控件定义标题！
8.为应用程序和控件编写脚本一定要保存窗口！！
①应用程序test脚本：
open(w_main) ——打开主窗口
②应用程序窗口w_main的各个脚本：
w_main open事件的脚本：
SQLCA.DBMS = "ODBC"
SQLCA.AutoCommit = False
SQLCA.DBParm = "Connectstring='DSN=exam_pb;uid=dba;pwd=sql'"
connect using sqlca;
dw_1.settransobject(sqlca)
“增加”命令按钮click事件的脚本：
dw_1.insertrow(0)
dw_1.setfocus()
“删除”命令按钮click的脚本：
dw_1.deleterow(0)
“检索”命令按钮click的脚本：
dw_1.retrieve()
“过滤”命令按钮click的脚本：
w_main.dw_1.setfilter("系别='计算机系'")
w_main.dw_1.filter()
“保存”命令按钮click的脚本：
dw_1.update()
“退出”命令按钮click的脚本：
close(parent)
三、连接数据库
1.建立ODBC数据源“exam_pb”用户名：dba 密码：sql 考试时也是这个
2.建立数据库描述文件“exam_pb”预览和测试！！
3.连接数据源
四、运行程序
------------------------------
实验步骤：
一、建立工作空间“练习二”
二、建立应用程序“test”
三、建立主窗口“w_main”为主窗口定义标题！！保存！！为应用程序test编写脚本“open(w_main)”
四、建立菜单“m_main”为菜单添加子菜单项！！为子菜单项定义标题！！
五、将菜单挂在主窗口上保存！！！！！时刻不要忘记
六、建立计算器窗口“calculator”为计算器窗口定义标题！！
1.为计算器窗口添加控件此窗口包含三个静态文本框控件三个单行编辑框控件五个命令按钮！清空单行编辑框中的“none”字符
2.为各个控件编写脚本
①为“加”命令按钮编写脚本：
real m,n
m=real(sle_1.text)
n=real(sle_2.text)
sle_3.text=string(m+n)
②为“减”命令按钮编写脚本：
real m,n
m=real(sle_1.text)
n=real(sle_2.text)
sle_3.text=string(m - n) 一定要注意m的后面和n的前面要有空格。

否则报错！！因为他会把减号当成负号，如此以来就丢失了运算符！！
③为“乘”命令按钮编写脚本：
real m,n
m=real(sle_1.text)
n=real(sle_2.text)
sle_3.text=string(m*n)
④为“除”命令按钮编写脚本：
real m,n
m=real(sle_1.text)
n=real(sle_2.text)
if integer(sle_2.text)=0 then
messagebox("出错","除数不能为0！")
else
sle_3.text=string(m / n)
end if
⑤为“退出编写脚本”
close(parent)
七、为菜单窗口中的菜单项“计算器”和“退出”编写脚本!!
“计算器”：open(calculator)
“退出”：close(w_main)
八、运行程序
---------------------------
实验步骤：
一、建立工作空间“练习三”
二、建立应用程序“test”
三、建立主窗口“w_main”为主窗口定义标题！！保存！！为应用程序test编写脚本“open(w_main)”
四、建立菜单“m_main”为菜单添加子菜单项！！为子菜单项定义标题！！
五、将菜单挂在主窗口上
六、建立比较器窗口“com”为比较器窗口定义标题！！
1.为比较器窗口添加控件此窗口包含三个静态文本框控件三个单行编辑框控件三个命令按钮！为各控件定义标题！！
2.为各个控件编写脚本
(1)为“比较”命令按钮编写脚本：
real m,n
m=real(sle_1.text)
n=real(sle_2.text)
if m>n then
sle_3.text="大于"
elseif m<n then
sle_3.text="小于"
else
sle_3.text="等于"
end if
(2)为“显示”命令按钮编写脚本：
string str
str=string(sle_1.text+sle_3.text+sle_2.text)
messagebox("结果是",str)
(3)为“退出”编写脚本
close(parent)
七、为菜单窗口中的菜单项“比较器”和“退出”编写脚本!!
“比较器”：open(com)
“退出”：close(w_main)
八、运行程序
OK!!!
----------------------------
实验步骤：
一、建立数据库
1.创建数据库exam_pb
2.建立表manage
3.为表manage指定主键为“商品编号”
4.向表中输入数据
二、建立应用程序
1.建立工作空间“练习四”
2.建立应用程序“test”
3.建数据窗口dw_1
5.建应用程序窗口w_main
6在应用程序窗口中添加控件
7.为数据窗口指定目标对象“manage”为主窗口定义标题！为控件定义标题！
8.为应用程序和控件编写脚本
①应用程序test脚本：
open(w_main)
②应用程序窗口w_main的各个脚本：
w_main open事件的脚本：
SQLCA.DBMS = "ODBC"
SQLCA.AutoCommit = False
SQLCA.DBParm = "Connectstring='DSN=exam_pb;uid=dba;pwd=sql'"
connect using sqlca;
dw_1.settransobject(sqlca)
“增加”命令按钮click事件的脚本：
dw_1.insertrow(0)
dw_1.setfocus()
“删除”命令按钮click的脚本：
dw_1.deleterow(0)
“检索”命令按钮click的脚本：
dw_1.retrieve()
“排序”命令按钮click的脚本：
dw_1.setsort("编号"+" A") //A前面有个空格
dw_1.sort()
“保存”命令按钮click的脚本：
dw_1.update()
“退出”命令按钮click的脚本：
close(parent)
三、连接数据库
1.建立ODBC数据源“exam_pb”用户名：dba 密码：sql 考试时也是这个
2.建立数据库描述文件“exam_pb”
3.连接数据源
四、运行程序
OK!!。