以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  组团社选择能否不是数字  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=32788)

--  作者:hsjyp0559
--  发布时间:2013/5/8 11:41:00
--  组团社选择能否不是数字

一、组团社选择能否不是数字

二、组团社如何排序


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20130508113813.png
图片点击可在新窗口打开查看


 


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20130508114007.png
图片点击可在新窗口打开查看

--  作者:Bin
--  发布时间:2013/5/8 11:45:00
--  
你取值列为ID 显示的肯定是ID (你ID就是数字的)  你取值列设置为你想要的列即可.

列表项目有个排序方式属性可以设置.

--  作者:hsjyp0559
--  发布时间:2013/5/8 15:24:00
--  已解决

 

Dim cmb As WinForm.ComboBox
cmb = Forms("收款信息列表").Controls("ComboBox1")
cmb.ComboList = "全部|"+DataTables("zts").GetComboListString("ztsmc")

 

 

 

Dim txt As  String=e.Form.controls("combobox1").value
Dim tbl As Table=Tables("收款信息列表_table1")
If txt="" Or txt="全部" Then
    tbl.filter=""
Else
    e.Form.controls("textbox1").text=""
    Dim dr As DataRow
    dr = DataTables("zts").Find("ztsmc = \'" & txt & "\'")
    tbl.filter="ztsid=" & dr("id")
End If

[此贴子已经被作者于2013-5-8 15:24:54编辑过]