pb中的知识点复习 pb pb

程序员，最近有个项目要用到powerbuilder，把pb的知识点大概梳理了一遍，不知道后面够不够用:

& 续行标记

// 单行注释

/* */ 多行注释

声明数组:

string name[]

int d[10] 长度为10的int数组，从1开始

作用域:

全局变量 共享变量 实例变量 局部变量

关系运算符:

= 等于

> 大于

< 小于

<> 不等于

>= 大于等于

<= 小于等于

逻辑运算符：

not 逻辑非

and 逻辑与

or 逻辑或

数据类型转换:

string(),char()

判断数据类型，返回true或者false

isnumber(),isdate(),isnull(),istime()

字符串的处理函数:

len() 得到字符串的长度

pos()

replace()

reverse()

mid()

space()

pb中的特殊字符:

~n 换行

~t 制表

~r 回车

~" 双引号

~' 单引号

数值计算函数:

abs() 绝对值

max() 最大值

min() 最小值

mod() 求余

if 语句

if then

elseif then

else

end if

choose case语句:

int score=85

choose case score

case is>=90

st_1.text="优秀程序员"

case 80 to 90

st_1.text="良性程序员"

case else

st_1.text="合格程序员"

end choose

循环语句: for to next

for i=1 to 100

s+=i

next

st_1.text=string(i)

do loop until 循环语句

exit 退出循环

sqlca.sqlcode=0 表示数据库执行成功

sqlcode=100 查询不到数据

sqlcode<0 表示执行失败

结构体:

s_student s

s.name='国内实力派程序员'

s.sex='男'

结构体数组:

s_student s[]

s[1].name='国内实力派程序员'

s[1].sex='男'

s[2].name='优秀程序员'

s[2].sex='男'

游标: cursor

// 声明游标和SQL语句

DECLARE cur_emp CURSOR FOR

SELECT emp_id, emp_name, emp_salary FROM employee_table WHERE emp_dept = 'IT';

// 打开游标

OPEN cur_emp;

// 逐行获取查询结果

FETCH cur_emp INTO :emp_id, :emp_name, :emp_salary;

// 处理获取的数据

DO WHILE SQLCA.SQLCode = 0

// 处理数据

MessageBox("Employee Info", "ID: " + String(emp_id) + " Name: " + emp_name + " Salary: " + String(emp_salary));

// 继续获取下一行数据

FETCH cur_emp INTO :emp_id, :emp_name, :emp_salary;

LOOP;

// 关闭游标

CLOSE cur_emp;

动态sql语句的执行:

Execute Immediate "Create Table Users ( code char(6),name varchar(50) )" Using SQLCA;

String ls_sql

ls_sql = "INSERT INTO Users VALUES('10010','国内实力派程序员')"

Execute Immediate :ls_sql Using SQLCA;