以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 关于DataList的current (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=2712) |
-- 作者:cpayinyuan -- 发布时间:2009/5/7 13:14:00 -- 关于DataList的current 帮助中关于DataList的Current的说明及事例是: DataRow类型,返回DataList所选定的行。 示例 …… Dim dst As WinForm.DataList = e.Form.Controls("DataList1")Dim dr as DataRow = dst.Current \'获得选定行 If dr Is Nothing Then Return End If Dim Index As Integer = Tables("订单").FindRow(dr) \'获得选定行在Tables("订单")中的位置 If Index >=0 Then \'如果选定行在Tables("订单")中存在 Tables("订单").Position = Index \'定位到选定行 Forms("窗口1").Open() \'打开编辑窗口 End If …… [此贴子已经被作者于2009-5-7 15:25:23编辑过]
|
-- 作者:狐狸爸爸 -- 发布时间:2009/5/7 14:56:00 -- 1、不应该出错啊,因为代码中加了判断的: If Index >=0 Then \'如果选定行在Tables("订单")中存在 2、当然可以的。 |
-- 作者:cpayinyuan -- 发布时间:2009/5/7 15:24:00 -- 以下是引用狐狸爸爸在2009-5-7 14:56:00的发言:
1、不应该出错啊,因为代码中加了判断的: If Index >=0 Then \'如果选定行在Tables("订单")中存在 我知道您的意思,虽然有这个判断,不会引用空行,但用户希望的是只要表中存在这一行就打开窗口,即使有这个判断,仍然不会打开窗口,这不是用户希望的结果!应该可以算作出错. [此贴子已经被作者于2009-5-7 15:24:35编辑过]
|