首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > PB >

哪位高手能帮小弟我翻译一下PB的代码,多谢各路高手

2012-03-13 
谁能帮我翻译一下PB的代码,谢谢各路高手有一段PB代码不是很明白请大家指教:string ls_idlong ll_idw_main.

谁能帮我翻译一下PB的代码,谢谢各路高手
有一段PB代码不是很明白请大家指教:

string ls_id
long ll_i
dw_main.accepttext( )
if dwo.name = 'stockmodelcode' then
  ls_id= dw_main.object.stockmodelcode[row]
  
  for ll_i= 1 to dw_main.rowcount( )
if ll_i<> row then
if ls_id= dw_main.object.stockmodelcode[ll_i] then
messagebox('提示','添加的编码已经存在!!')
dw_main.object.stockmodelcode[row]= ''
return 1
end if
end if  
  next

end if

[解决办法]
大概是写在DW 控件的 itemchanged 事件里用于检测输入的编码是不是已经存在的程序。

C/C++ code
string ls_idlong ll_idw_main.accepttext( )if dwo.name = 'stockmodelcode' then //判断当前列是否 stockmodelcode    ls_id= dw_main.object.stockmodelcode[row] //取录入的数据,还可以写成:ls_id = data        for ll_i= 1 to dw_main.rowcount( ) //循环整个DW, 从第一行至最后一行        if ll_i<> row then              //遇到当前行则跳过,还可以写成 if ll_i = row then continue            if ls_id= dw_main.object.stockmodelcode[ll_i] then //第ll_i 行的stockmodelcode 列的数据和当前的数据ls_id 是否相同                messagebox('提示','添加的编码已经存在!!')                 dw_main.object.stockmodelcode[row]= ''  //如果相同,则清空当前项,                return 1  //这里不此项不接受数据的更改,并且不改变输入的焦点。            end if         end if     nextend if
[解决办法]
探讨

if dwo.name = 'stockmodelcode' then //dwo 是事件中自带的数据对象参数,以editchanged这个事件为解释就是 当前编辑列名为 stockmodelcode
ls_id= dw_main.object.stockmodelcode[row]//row 也是事件中带的行参数,此句就是取stockmodelcode列 row 行的数据
if ll_i<> row then

热点排行