以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  请教,在窗体里如何设置  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=53269)

--  作者:悦颜
--  发布时间:2014/7/3 21:07:00
--  请教,在窗体里如何设置

请教老师,在表事件里这么写代码:

If e.Col.Name = "寄往公司名称" Then
    Select Case  e.Row("国内或国外")
        Case  "国外"
            e.Col.ComboList = DataTables("外销客户").GetComboListString("客户名称")
        Case  "国内"
            e.Col.ComboList = DataTables("国内客户").GetComboListString("客户名称")
           
           
    End Select
End If

‘-----------------------------

在窗体里我如何转换?

 


[此贴子已经被作者于2014-7-4 22:23:28编辑过]

--  作者:有点甜
--  发布时间:2014/7/3 21:10:00
--  

enter事件

 

Select Case e.Form.Controls("ComboBox1").Text
    Case  "国外"
        e.Sender.ComboList = DataTables("外销客户").GetComboListString("客户名称")
    Case  "国内"
        e.Sender.ComboList = DataTables("国内客户").GetComboListString("客户名称")            
End Select


--  作者:悦颜
--  发布时间:2014/7/3 21:24:00
--  

图片点击可在新窗口打开查看 甜老师:想想应该是对的,但窗体内“寄往公司名称”下拉框内还是没内容。


--  作者:有点甜
--  发布时间:2014/7/3 21:26:00
--  

 写在你的 寄往公司名称 控件的Enter事件下

 

 ComboBox1 改成你 国家控件 的名字


--  作者:悦颜
--  发布时间:2014/7/3 21:28:00
--  
sorry ,是我自已不对,我把号数弄错了。。。图片点击可在新窗口打开查看。。。呵呵。。。。