您可以选择使用CheckListBox控件。CheckListBox支持多选。
创新互联公司服务项目包括青州网站建设、青州网站制作、青州网页制作以及青州网络营销策划等。多年来,我们专注于互联网行业,利用自身积累的技术优势、行业经验、深度合作伙伴关系等,向广大中小型企业、政府机构等提供互联网行业的解决方案,青州网站推广取得了明显的社会效益与经济效益。目前,我们服务的客户以成都为中心已经辐射到青州省份的部分城市,未来相信会继续扩大服务区域并继续获得客户的支持与信任!
由于不清楚您用什么语言,所以我写了VB点虐 、C#点虐
vb点虐 Code
' Determine if there are any items checked.
If CheckedListBox1.CheckedItems.Count 0 Then
' If so, loop through all checked items and print results.
Dim x As Integer
Dim s As String = ""
For x = 0 To CheckedListBox1.CheckedItems.Count - 1
s = s "Checked Item " (x + 1).ToString " = " CheckedListBox1.CheckedItems(x).ToString ControlChars.CrLf
Next x
MessageBox.Show(s)
End If
C#点虐 Code
// Determine if there are any items checked.
if(checkedListBox1.CheckedItems.Count != 0)
{
// If so, loop through all checked items and print results.
string s = "";
for(int x = 0; x = checkedListBox1.CheckedItems.Count - 1 ; x++)
{
s = s + "Checked Item " + (x+1).ToString() + " = " + checkedListBox1.CheckedItems[x].ToString() + "\n";
}
MessageBox.Show (s);
}
vb点虐 Code
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim selectstr As String = ""
For i As Integer = 0 To Me.CheckedListBox1.Items.Count - 1
If Me.CheckedListBox1.GetItemChecked(i) Then
selectstr = Me.CheckedListBox1.Items(i).ToString
End If
Next
MsgBox(selectstr)
End Sub
希望能帮到您。
设置一个全局变量:
Public item As String
然后在第一个窗口那里取:
item = ComboBox1.SelectedItem.ToString()
然后加到第二个窗口那里:
ComboBox2.DropDownStyle = ComboBoxStyle.DropDownList(这个不可改内容的设定可以在建立ComboBox的时候就设定了)
ComboBox2.Items.Add(item) (加入内容,你或者也可以用别的,比如insert,这个可以加到指定的位置)
ComboBox2.SelectedItem = item (显示那个刚加进来的内容)
这样应该可以了,建议你多看MSDN。
你是数据库查询吧,SQL之类的,很容易啊:
这很容易,要做几个combobox出来好了,里面是条件,比如 A大于0 ,A等于0,A小于0
然后用selece Case combo1.text 判断一下。如:
dim A as string
A ="select * form XXX where 1=1 and "
selece Case combo1.text
Case "A大于0"
A = A "a0"
Case "A等于0"
A = A "a=0"
...
select end
下面比如B列判断之类的,到最后执行SQL查询命令,把结果显示出来就OK了。
VB6里面实现不了。只能做成一个一览。可以利用部分功能满足你的需求。listbox里面有个属性Style。设置为1:CheckBox就可以了。
想做成你说的那样的话,得自己自定义插件。