主题：请教：在回车跳下一行问题
天地之间
[专家分：0] 发布于 2008-12-14 22:21:00
我在Grid的BeforeRowColChange事件加入了以下的代码
IF m.nColIndex=2
ro1=ThisForm.Grid1.ActiveRow
co1=ThisForm.Grid1.ActiveColumn
ThisForm.Grid1.ActivateCell(ro1+1,co1)
ThisForm.Grid1.Refresh
NODEFAULT
ENDIF
定位在第2列，回车可以下跳到第2、3列都行，但我的数据表有50个数据，可它只能下跳到20时，就停下了，不再跳了，请高手们给予指点。谢谢在先
回复列表 （共23个回复）
沙发
moz [专家分：37620] 发布于 2008-12-15 04:38:00
换成
.relativeRow
.relativeColumn
板凳
天地之间 [专家分：0] 发布于 2008-12-15 18:48:00
行了,谢谢你的指点!非常感谢!
3 楼
天地之间 [专家分：0] 发布于 2008-12-15 19:19:00
不过又出新问题了,它可以回车下跳一行,但用上、下行箭头都是下行一行，用鼠标点也不管用，请问如何解决？请高手点教！
4 楼
moz [专家分：37620] 发布于 2008-12-15 20:11:00
我在另一贴里给你回的是.KeyPress事件
5 楼
天地之间 [专家分：0] 发布于 2008-12-15 20:54:00
我看到你的那个回贴,可那运行之后上、下移都行，回车也行，但当输完满格后不会自动下移啊。
6 楼
moz [专家分：37620] 发布于 2008-12-15 23:39:00
哦,我已经黔驴技尽了.
7 楼
0901chang [专家分：10660] 发布于 2008-12-15 23:45:00
试一试用skip:
发现回车键时，执行skip移动记录指针。
8 楼
天地之间 [专家分：0] 发布于 2008-12-16 19:55:00
这句放在那?好象没地方放啊?在.grid1.column2.text1.KeyPress这里吗?
9 楼
wzxc [专家分：9440] 发布于 2008-12-16 20:46:00
form load:
SET CONFIRM ON
form unload:
SET CONFIRM OFF
Grid的BeforeRowColChange事件:
If Lastkey()=13
Nodefault
Keyboard "{DNARROW}"
endif
失业了，再做一次好事，以后可能没这机会了。
10 楼
moz [专家分：37620] 发布于 2008-12-16 20:51:00
你今天才失业?
我已经失业半年了,还没敢跳楼呢,
你就敢说"以后可能没这机会了"?
我来回复
您所在位置：