[浏览完整版]
标题：关于ComboBox控件问题
1楼
裴保民 发表于：2024/12/9 11:20:00怎样判断组合框ComboBox控件中列表是否有重复值？
2楼
有点蓝 发表于：2024/12/9 12:06:00Dim cmb As WinForm.ComboBox
cmb = e.Form.Controls("ComboBox1")
cmb = e.Form.Controls("ComboBox1")
dim lst as new list(of string)
For i As Integer = 0 To cmb.Items.Count - 1
If lst.contains(cmb.Items(i)) Then
For i As Integer = 0 To cmb.Items.Count - 1
If lst.contains(cmb.Items(i)) Then
msgbox(cmb.Items(i) & "有重复")
exit for
else
lst.add(cmb.Items(i))
End If
Next
End If
Next
3楼
裴保民 发表于：2024/12/9 12:23:00这段代码放入到“valueChanged”事件中判断不了，怎么办？
4楼
有点蓝 发表于：2024/12/9 13:05:00判断列表是否有重复值其实没有什么意义。要做什么功能?
5楼
裴保民 发表于：2024/12/9 13:22:00ComboBox作为一个数据输入控件，可以人工输入但不能和现有的数据重复，当第一次输入不重复数值后离开控件后自动保存数据，以便以后输入数据时可以选择.
代码如下：
Dim s As String = GetConfigValue("List","")
Dim cmb As WinForm.ComboBox
cmb = e.Form.Controls("csComboBox")
Dim lst As new List(of String)
For i As Integer = 0 To cmb.Items.Count - 1
If lst.contains(cmb.Items(i)) Then
msgbox(cmb.Items(i) & "有重复")
Return
Exit For
Else
SaveConfigValue("List",s & "|" & e.Sender.text)
End If
Next
在enter事件中写入如下代码：
e.Sender.ComboList = GetConfigValue("List","")
6楼
有点蓝 发表于：2024/12/9 13:31:00最早的下拉列表是怎么来的
7楼
裴保民 发表于：2024/12/9 13:35:00一开始是在自定义项目中设置了几个，后期考虑用户有可能会扩大选项所有考虑用这个功能
8楼
有点蓝 发表于：2024/12/9 13:42:00最早的下拉列表是怎么来的，用了什么代码？
9楼
裴保民 发表于：2024/12/9 13:47:00是要问这个吗？
此主题相关图片如下：screenshot_20241209_134555.png
此主题相关图片如下：screenshot_20241209_134555.png没有代码
[此贴子已经被作者于2024/12/9 13:48:34编辑过]
10楼
有点蓝 发表于：2024/12/9 13:55:00控件绑定的是什么列？