主题：求助老师问题 应该是级联选择方面的

方法一设置一下：

 

 

此主题相关图片如下：qq截图20150804143659.jpg

方法二：DataColChanged事件

 

If e.DataCol.Name = "公司"  Then
    Dim dr As DataRow
    Dim Filter As String
    Filter = "公司名 = '" & e.DataRow("公司") & "'"
    dr = DataTables("客户信息").Find(Filter)
    If dr IsNot Nothing Then '如果找到

        e.DataRow("姓名") = dr("联系人")
    Else
        e.DataRow("姓名") = Nothing
    End If
End If

 

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

点击浏览该文件:管理项目1.foxdb