以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  会计科目-末级科目问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=77816)

--  作者:mamuaiqing
--  发布时间:2015/11/25 22:01:00
--  会计科目-末级科目问题

Dim cmd As New SQLCommand
Dim dt As DataTable
cmd.C
cmd.CommandText =

dt = cmd.ExecuteReader

Dim ary As List(Of String())  = dt.GetValues("科目编号|科目名称")
Dim str As String = ""
For Each a As String() In ary
    str &= a(0) & " " & a(1) & "|"
Next
Dim nm As WinForm.ComboBox = e.Form.Controls("科目")
nm.ComboList = str

学生想实现打开窗口后,ComboBox控件中加载了不重复的末级科目,这个该怎么实现,请教老师


--  作者:大红袍
--  发布时间:2015/11/25 22:31:00
--  

表格加一列【是否末级】,然后用递归一次性找出并给其赋值。

 

http://www.foxtable.com/help/topics/2502.htm

 


--  作者:mamuaiqing
--  发布时间:2015/11/25 22:35:00
--  
就这么简单的设置,居然没想出来,感谢老师的帮助