Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共3 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:Datalist怎样也表格同步呢?

1楼
woodiy 发表于:2009/1/17 15:31:00

图片点击可在新窗口打开查看此主题相关图片如下:未标题-2.jpg
图片点击可在新窗口打开查看

Datalist怎样也表格同步呢?

选择Datalist中的行以后,点击修改出来的窗口中就是选定行的内容谢谢!
2楼
czy 发表于:2009/1/17 15:55:00

Current

DataRow类型,返回DataList所选定的行。

示例

DataList并没有提供编辑功能,但是我们可以间接地为DataList加上编辑功能。
假定订单表是一个内部表,该表已经有一个设计好的数据录入窗口,窗口的名称为“窗口1”,为了能够在其他表中使用这个窗口,我们将该窗口的类型设为模式型(也可以是独立型)。
客户表中也有一个窗口,该窗口有一个DataList控件和一个按钮,DataList控件已经绑定到订单表,我们希望单击这个按钮,能够编辑在DataList中选定的订单。
为此,可将该按钮的Click事件代码设为:

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

要特别留意FindRow的用法,该用法在多表多窗口协同工作的时候非常有用。
推广开来,我们可以用针对主表的录入窗口来输入关联表数据,如何实现,大家可以自己想一想。

 

3楼
woodiy 发表于:2009/1/17 18:59:00
谢谢,搞定
共3 条记录, 每页显示 10 条, 页签: [1]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .02344 s, 2 queries.