标题：关于窗口中关于组合框

1楼

sophia 发表于：2010/6/11 21:38:00

窗口中有一组合框，选择其不同的列表项目时，自动调用其它表中数据，怎样实现？

下载信息 [文件大小：下载次数： ]
点击浏览该文件:管理项目1.rar

2楼

czy 发表于：2010/6/12 1:29:00

'业务种类的SelectedIndexChanged事件
Dim r As Row = Tables("表A").Current
if e.Sender.Value <> Nothing Then
    Dim dr As DataRow = DataTables("表B").Find("业务种类 = '" & e.Sender.Value & "'")
    If dr IsNot Nothing Then
        r("大型数量") = dr("大型数量")
        r("大型单价") = dr("大型单价")
        r("小型数量") = dr("小型数量")
        r("小型单价") = dr("小型单价")
    Else
        r("大型数量") = Nothing
        r("大型单价") = Nothing
        r("小型数量") = Nothing
        r("小型单价") = Nothing
    End If
End If

[此贴子已经被作者于2010-6-12 1:31:02编辑过]

3楼

sophia 发表于：2010/6/12 7:50:00

ok，多谢！

共3 条记录, 每页显示 10 条, 页签: [1]