主题：求助可不可以从两个表中取列表数据？

If e.IsFocusCell Then
If e.Col.Name = "姓名" Then
Dim cmd As New SQLCommand

Dim cmd1 As New SQLCommand
Dim dt As DataTable

Dim dt1 As DataTable
cmd.C

cmd1.C
cmd.CommandText = "SELECT DISTINCT 姓名 From {海外人员}"

cmd1.CommandText = "SELECT DISTINCT 姓名 From {国内人员}"
dt = cmd.ExecuteReader

dt1 = cmd1.ExecuteReader
Tables("订单表").Cols("业务员").Combolist = dt.GetComboListString("姓名")& "|" & Dt1.GetComboListString("姓名")
End If
End If

笨办法