pb语法细节

1.修改dw中的字段的字体颜色

if (ld_lzsc <= 0 or ld_lzsc > 24 ) then
 dw_1.object.gzsm_lzsc.color=string(rgb(255,0,0))
else
 dw_1.object.gzsm_lzsc.color=string(rgb(0,0,0))
end if

 

2.使用select语句一次查询多个变量

select gzsm_lzr,gzsm_xwr1,gzsm_xwr2,gzsm_xwr3,gzsm_lzqk,gzsm_xwdd,gzsm_bz &
into :ls_lzr,:ls_xwr1,:ls_xwr2,:ls_xwr3,:ls_lzqk,:ls_xwdd,:ls_bz &
from gzsm where gzsm_id = :ll_gzsm_id;

3.设置输入焦点

如果只有一行,可以省略设置行

dw_1.setrow(1)

dw_1.setcolumn( 11 )
dw_1.setfocus( )