问答文章1 问答文章501 问答文章1001 问答文章1501 问答文章2001 问答文章2501 问答文章3001 问答文章3501 问答文章4001 问答文章4501 问答文章5001 问答文章5501 问答文章6001 问答文章6501 问答文章7001 问答文章7501 问答文章8001 问答文章8501 问答文章9001 问答文章9501

VB 编程中COMBOX 增加数据的时候如何判断有重复,且不再添加重复的.不使用数据库写入的情况下哟.感谢

发布网友 发布时间:2022-04-14 10:17

我来回答

3个回答

懂视网 时间:2022-04-14 14:38

关于comBox绑定SQL Server数据库中时间字段中的不重复的年份如下: private void Education_Training_Load(object sender, EventArgs e) { MyDBase DB = new MyDBase(DBUser.sserver, DBUser.DBName, DBUser.suser, DBUser.spasswd); DataSet DS = DB.GetRec

  关于comBox绑定SQL Server数据库中时间字段中的不重复的年份如下:

  private void Education_Training_Load(object sender, EventArgs e)

  {

  MyDBase DB = new MyDBase(DBUser.sserver, DBUser.DBName, DBUser.suser, DBUser.spasswd);

  DataSet DS = DB.GetRecordset("select distinct (year(date)) as date from education_train ");

  if (DS.Tables[0].Rows.Count == 0) return;

  comboBox_Year.DataSource = DS.Tables[0];

  comboBox_Year.DisplayMember = "date";

  comboBox_Year.ValueMember = "date";

  comboBox_Year.SelectedIndex = comboBox_Year.Items.Count - 1;//选中最大年份

  if (DB.ErrorCode())

  {

  MessageBox.Show(DB.ErrMessage(), "提示", MessageBoxButtons.OK, MessageBoxIcon.Error);

  return;

  }

  dataGridView1.DataSource = DS.Tables[0];

  DB.DBClose();

  }

热心网友 时间:2022-04-14 11:46

dim j
for j=0 to combox.listcount-1
if combo1.list(i)=你要对比的字符串 then
msgbox("存在相同项目")
end if
next j
就是用list属性,后面的括号是数字,就是combo控件中的项目号,
明白这个属性了,你就知道咋做了。追问感谢你的回答.
当数据库循环的时候,再次执行COMBO 循环时,COMBO是累计循环.并不会从0开始.而是从上一次库据库WHLIE循环结束的地方开始继续循环.据这时并不可用FOR循环.

追答你不是不使用数据库么??
如果你使用数据库,加多一层循环就可以了,这个很简单的。

热心网友 时间:2022-04-14 13:04

* from dl where yhm='" & combo1.text & "' "
RS.Open strSQL, db, 3, 3
RS.Delete
RS.CLOSE
SET RS=NOTHING

一、
Dim db As New ADODB.Connection
Dim RS As New ADODB.Recordset

Private Sub Form_Load()
Combo1.Clear
db.ConnectionString = "DRIVER=Microsoft Access Driver (*.mdb);DBQ=" & App.Path & "\db1.mdb"
db.Open
strSQL = "select * from dl Order By yhm"
RS.Open strSQL, db, 2, 2
Do While Not RS.EOF
Combo1.AddItem RS("yhm")
RS.Movenext
Loop
RS.Close
db.Close
声明声明:本网页内容为用户发布,旨在传播知识,不代表本网认同其观点,若有侵权等问题请及时与本网联系,我们将在第一时间删除处理。E-MAIL:11247931@qq.com
草青青,青青草,草上接谢珍珠宝,怕日晒怕风摇,摇看珍珠得起早 谜底是... 一加9R要不要升级ColorOS 13正式版 一加9pro怎么coloros12一加9pro升级coloros12的方法 coloros12支持哪些一加机型?coloros12支持一加机型介绍 一加9pro如何coloros12?一加9pro升级coloros12的方法 一加9pro升级coloros12拍照改善吗 我是一个高中生,职教的,我们班上有5个女生,我喜欢有一个,但追她又有... 自动挡d挡旁边的 -是什么意思? 自动挡位上的加减是什么意思? 宣传这个职位是干什么的 为什么银行那么早关门啊,气死了 银行关门营业时间规谁管 为什么农业银行的很多营业点中午都关门,下午 今天怎么银行都关门了呢? 中行网点合并会怎样 数字化转型致使2784个银行网点关门,数字化还会对什么企业有冲击? 海尔洗衣机留水功能是什么原理? 年内431家银行网点终止营业,银行业这是不是衰落了? 行业巨变上千家银行网点关闭? 1730家银行“关门”,6万员工离职,银行是不是成夕阳行业了呢? 年内超千家银行网点关门意味着什么 将近千家网点关闭,银行这是怎么回事? 请问海尔洗衣机是如何自动化控制排水的 WIN7系统64位怎么双击没有反应 电脑管家打不开,貌似被360屏蔽了 电脑管家个人中心为什么打开后,怎么点击都没反应,点x也没反应,无法刷新 电脑管家点登陆没反应怎么回事? 为什么点击QQ电脑管家页面没反应呢! 电脑管家都突然打不开怎么回事 双击一点反应都没有 为啥点击腾讯电脑管家,没反应。 国庆结束想和同学一起去黄山玩,求旅游攻略 黄山旅游是应该选择跟团游还是自由行? 求黄山旅游自助攻略(3 or 4日游) 柳树叶像什么? 柳树的叶子像什么? 走进看柳树的叶子像什么? 什么样的叶子像什么造句3句 填空:柳树叶子像什么…又像什么 柳树树叶像什么? 1、 柳树的叶子像什么? 2、银杏的叶子像什么? 摄像头的驱动在电脑上哪个位置? 华泰人寿少儿超能保医疗险靠不靠谱?适合哪些人买? 华泰人寿少儿超能保医疗险值得买吗?靠谱吗? 请问柳树的叶子像什么? 摄像头的驱动在哪里面能找到啊? 华泰人寿少儿超能保医疗险靠不靠谱?有必要买? 柳树的叶子像什么形状? 用“柳树像什么”造句,可以有哪些句子? 华泰人寿少儿超能保医疗险每年花多少钱?可靠吗? 本人男,今年22岁,现在在广东中山做java工程师,最近想换工作,武汉、广州、深圳