以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]combobox自定义项目怎么指定用户名  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=72739)

--  作者:script
--  发布时间:2015/8/5 14:05:00
--  [求助]combobox自定义项目怎么指定用户名

老师  项目直接用默认的用户管理,没有专门的用户表

我想用combobox控件的下拉项目获取用户名列 这该怎么写啊

我用下面代码只能获取到当前用户名

 

Dim cmb As WinForm.ComboBox
cmb = Forms("编辑器").Controls("ComboBox2")
cmb.ComboList = user.name


--  作者:大红袍
--  发布时间:2015/8/5 14:54:00
--  

Dim str As String = ""
For Each us As UserInfo In Users
    str &= us.Name & "|"
Next

Dim cmb As WinForm.ComboBox
cmb = Forms("编辑器").Controls("ComboBox2")
cmb.ComboList = str.Trim("|")