当前位置: 代码迷 >> PB >> 帮小弟我看下下面的代码有什么有关问题,没提示提示,但是无法保存
  详细解决方案

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

热度:96   发布时间:2016-04-29 09:04:06.0
帮我看下下面的代码有什么问题,没提示提示,但是无法保存
我做一个能进行多选的数据窗口的自定义对象(按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
  相关解决方案