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

帮小弟我看下下面的代码有什么有关问题,没提示提示,但是无法保存

2012-02-27 
帮我看下下面的代码有什么问题,没提示提示,但是无法保存我做一个能进行多选的数据窗口的自定义对象(按shif

帮我看下下面的代码有什么问题,没提示提示,但是无法保存
我做一个能进行多选的数据窗口的自定义对象(按shift和ctrl)。代码如下:
// ÒÔϳÌÐòÓÃÓÚÊý¾Ý´°¿ÚµÄ¶àÐÐÑ¡ÖвÙ×÷

long ll_CurrentRow
long ll_j

if row=0 then
return
else
ll_CurrentRow=row //µ±Ç°Êó±êµãÖÐÐÐ
end if

if keydown(keyshift!) then //°´ÏÂshift¼ü

if il_LastRow=0 then
this.selectrow(ll_CurrentRow,true)
il_LastRow=ll_CurrentRow
else
this.selectrow(0,false)
if ll_CurrentRow>il_LastRow then
this.selectrow(ll_j,true)
end if
  else
for ll_j=il_LastRow to ll_CurrentRow step -1
this.selectrow(ll_j,true)
end for
end if
end if

else

il_LastRow=ll_CurrentRow

if keydown(keycontrol!) then 
if this.isselected(ll_CurrentRow) then
this.selectrow(ll_CurrentRow,false)
else
this.selectrow(ll_CurrentRow,true)
end if
else
this.selectrow(0,false)
end if
end if


[解决办法]
jf

热点排行