主题：求助：选择不同行执行SQL语句

我新建一个窗口，

里面放有：
DataList1绑定数据表“表A”
DataList2

在DataList1的CurrentChanged事件中：
Dim cmd As New SQLCommand
cmd.C
Dim dst1 As WinForm.DataList = e.Form.Controls("DataList1")
Dim dst2 As WinForm.DataList = e.Form.Controls("DataList2")
if dst1.count>0 then
    Dim dr1 as DataRow = dst1.Current '获得选定行
    dim str as string = dr1("商品编码")
    cmd.CommandText = "select * from product where u_Code = '" & str & "'"
end if
dst2.DataTable = cmd.ExecuteReader()
dst2.Build()
能够正常执行。以上的目的：选择DataList1每一行，能够查询关联表。

但DataList1不能像Table1那样能编辑查询的方便。所以我想将DataList1换成Table1，就是代码要在那里写才好

各位老大们，能否来个实例的，谢谢。

如3楼，
我有试过，
就是不知在哪里写上类似（在DataList1的CurrentChanged事件中）
Table没发现有事件

我去转成ACCEE出来，再上传

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:商品编码查询.rar

请老大帮忙解决一下

If MainTable.Name = "表A" Then
Dim frm As WinForm.Form
frm = Forms("窗口1")
frm.Open()
Dim cmd As New SQLCommand
cmd.C
Dim dst2 As WinForm.DataList = frm.Controls("DataList2")
Dim str as string = CurrentTable.Current("商品编码")
cmd.CommandText = "select * from product where u_Code = '" & str & "'"
dst2.DataTable = cmd.ExecuteReader()
dst2.Build()
End If
这句就搞定了

以上的这句有点不理想
能否来句判断：窗口1已打开就执行，窗口1未打开就不执行