![图片点击可在新窗口打开查看](file:///C:/Documents%20and%20Settings/admin/My%20Documents/Fetion/temp/da1e7903716584f197f9e48af5f6d38f.png)
按照自定义录入界面4,制作了这么一个界面,请问当我选择客户名称的时候,怎样把其他列的内容,比如“一级分类”、“二级分类”、“联系人电话”、“联系人职务”、“联系人姓名”的内容同时填入上面那个客户信息表里呢?请教高手~
If e.Selected Then '如果选择了值
Dim tbl As Table = Tables("选择客户_Table1")
If tbl.Current IsNot Nothing Then
e.Form.DropDownBox.Value = tbl.Current("客户名称")
End If
e.Form.DropDownBox.CloseDropDown()
End If
现在的代码是这样的,只能录入“客户名称”一列内容
[此贴子已经被作者于2012-5-31 13:55:15编辑过]