主题：请教：在回车跳下一行问题
天地之间
[专家分：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个回复）
11 楼
wzxc [专家分：9440] 发布于 2008-12-16 21:26:00
you are younger!!!
工作了近30年了，突然失业了，心寒啊！！！
12 楼
moz [专家分：37620] 发布于 2008-12-16 21:49:00
我们社保局有规定,只要交了失业保险,
连续工作一年,可领两个月的失业救济.
最多可连续领24个月.我可以领20个月.
有钱买米,不愁.
你既然那么老了,该享儿女福了,等着领退休金吧.
估计你是没有机会再就业的了,要不,创业吧.政府会有技术支持的,
我还参加完创业培训拿了结业证了呢.
13 楼
天地之间 [专家分：0] 发布于 2008-12-16 21:54:00
工作了近30年了??与我一样大啊!不过你比我厉害多了,我可是硬啃这个东东,有机会加我的QQ:38285653
14 楼
天地之间 [专家分：0] 发布于 2008-12-16 21:57:00
MOZ,你也这么"大"了吗?难得我们成"朋友"了哦
15 楼
wzxc [专家分：9440] 发布于 2008-12-16 22:39:00
[quote]你今天才失业?
我已经失业半年了,还没敢跳楼呢,
你就敢说"以后可能没这机会了"?[/quote]
必要的时候可能会跳楼。
我们这里已经发生过一起跳楼事件了。
跳楼是最好的解脱。
close all
quit
16 楼
0901chang [专家分：10660] 发布于 2008-12-17 08:11:00
试一试
.grid？.column？.text1.KeyPress
LPARAMETERS nKeyCode, nShiftAltCtrl
If nKeyCode=13
sele 我的表
skip
if dof()
skip -1
endi
刷新表或屏幕
endif
我没有测试此代码，但表格的显示原理是：光标所在行，就是对应表的记录指针，所以移动指针可能是最简单的方法。
17 楼
moz [专家分：37620] 发布于 2008-12-17 21:05:00
[quote][quote]你今天才失业?
我已经失业半年了,还没敢跳楼呢,
你就敢说"以后可能没这机会了"?[/quote]
必要的时候可能会跳楼。
我们这里已经发生过一起跳楼事件了。
跳楼是最好的解脱。
close all
quit
[/quote]
深圳早已经不知道发生过多少起了，
跳了的，没跳的，到处都有，
现在大多楼顶都封了，以防不测。
我们参加政府出钱的免费培训的教授专家说了：
“坚持下去，别自杀，会看到希望的。”
人们都说，越老越怕死。
也常说，死过的人，越不敢再死。
我已经死过了，能看得见的将来，估计都不会再死得掉的了。
所以也有人说，活着，才是最勇敢的表现。
香港公益广告口号：前路由我创，生命满希望。
18 楼
0901chang [专家分：10660] 发布于 2008-12-17 21:25:00
帽子兄，你这么有尿有水，也被下岗。
类似的，乌鸦有无与伦比的歪门邪道，也被退休。
乌鸦31年工龄退休，而wzxc说近30年工龄被下岗，看来乌鸦比wzxc幸运。
19 楼
wzxc [专家分：9440] 发布于 2008-12-18 12:01:00
moz 虽年轻，总结的极是。我也很不想死，因为我曾经也死过一次了。
祝贺乌鸦老哥。现在的光景，退休了就万事无忧了。
加上你的无与伦比的歪门邪道，你的后半辈子可要无线风光了。
我要退休，还要10多年，难啊！！！
三十功名尘与土，八千里路云和月。
忙忙碌碌一辈子，一无所有！
20 楼
0901chang [专家分：10660] 发布于 2008-12-18 12:37:00
楼上，乌鸦的风光都是属于自淫
我来回复
您所在位置：