以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]combox和checkedcombox  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=74538)

--  作者:huhu
--  发布时间:2015/9/13 19:12:00
--  [求助]combox和checkedcombox

在checkedcombox框勾选了某几个值,比如图一,列的值为图二。

现在呢,combox是从checkedcombox这列取值,如图三。

但我不希望在combox的list中按照如图三显示,希望10.2.0G和11.0.1F竖排显示。这样能做到吗?

 

checkedcombox控件enter代码如下:

e.Sender.ComboList = DataTables("环境版本号库").GetComboListString("环境版本号","[测试组名] =  \'" & User.group & " \'")

 

 

combox控件enter代码如下:

Dim rjbb As WinForm.ComboBox = e.Form.Controls("软件版本")
Dim csxm As WinForm.ComboBox = e.Form.Controls("测试项目")

If csxm.text = "" Then
    MessageBox.show("请先选择测试项目","博达BUG综合管理系统提醒您",MessageBoxButtons.OK,MessageBoxIcon.Warning)
    Return
Else
    rjbb.ComboList = DataTables("测试项目列表").SQLGetComboListString("绑定版本","测试项目名称 = \'" & csxm.text & "\'")
End If


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

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

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

--  作者:大红袍
--  发布时间:2015/9/13 19:52:00
--  
rjbb.ComboList = DataTables("测试项目列表").SQLGetComboListString("绑定版本","测试项目名称 = \'" & csxm.text & "\'").Replace(",", "|")