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

谁能帮我翻译一下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 事件里用于检测输入的编码是不是已经存在的程序。


string ls_id
long ll_i

dw_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&lt;&gt; 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 
next

end if

[解决办法]

引用:

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

哪位高手能帮小弟我翻译一上PB的代码

热点推荐