共8 条记录, 每页显示 10 条, 页签:
[1]
[浏览完整版]
标题：数据填充
1楼
lylin0648 发表于：2011/8/2 16:25:00在例子中，派车表中填好派车的信息后，派车状态中“已派”字样填充在车辆信息表中对应的车号的派车状态。
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目3.table |
2楼
hhbb 发表于：2011/8/2 17:30:00If e.DataCol.Name = "派车状态" Then
Dim dr As DataRow = DataTables("车辆信息").Find("车号 ='" & e.DataRow("车号") & "'")
If dr IsNot Nothing Then
dr("派车状态") = e.DataRow("派车状态")
End If
End If
3楼
明丰 发表于：2011/8/2 18:50:00是这个意思吗？
“出车日期”列输入日期，“返车日期”列为空值时，“派车状态”列显示“已派车”；
“出车日期”列输入日期，“返车日期”列输入日期时，“派车状态”列的值为空。
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:管理项目3.table |
4楼
lylin0648 发表于：2011/8/2 21:24:00谢谢明丰，你想的比我周全，这是我想要的功能，呵呵
5楼
lylin0648 发表于：2011/8/2 22:00:00明丰，求一段条件代码，如果派车表中已派的车信息删除后，车辆信息表中的派车状态中的“已派车”字样同样被清除。掉。
6楼
狐狸爸爸 发表于：2011/8/3 8:26:00设置派车表的BeforeDeleteDataRow事件为：
Dim dr As DataRow = DataTables("车辆信息").find("车号 = '" & e.DataRow("车号") & "'")
If dr IsNot Nothing Then
dr.Delete
End If
[此贴子已经被作者于2011-8-3 8:36:35编辑过]
7楼
明丰 发表于：2011/8/3 10:57:00补充:(lylin0648 的意思应该是只清除"派车状态"对应的值)
设置派车表的BeforeDeleteDataRow事件为:
Dim dr As DataRow = DataTables("车辆信息").find("车号 = '" & e.DataRow("车号") & "'")
If dr IsNot Nothing Then
dr("派车状态") = Nothing
End If
8楼
lylin0648 发表于：2011/8/3 13:59:00明丰，谢谢了，你的理解是正确的，我只删除“车辆信息：中的对应值，而不是删除整条信息。。。。。谢谢
共8 条记录, 每页显示 10 条, 页签:
[1]