解决学生信息管理系统之List列表中重复添加相同数据问题。
来源:互联网 发布:oanda 数据接口 编辑:程序博客网 时间:2024/06/08 02:12
学生信息管理系统有很多错误需要我们去解决,下面我就解决一下在学生信息管理系统中的“年级课程设置”窗体里出现的一个错误,“ list列表中重复添加数据”,当设置一个年级时课程时,你可重复添加一门课程好几次!
下面我展示一下解决“在list重复添加数据”的代码!
Private Sub cmdAdd_Click() Dim i As Integer '定义两个整型变量 Dim j As Integer '往 listSelectcourse列表中添加课程 If listAllcourse.ListIndex <> -1 Then listSelectcourse.AddItem listAllcourse.List(listAllcourse.ListIndex) End If For i = 0 To listSelectcourse.ListCount - 1 '外循环 For j = i + 1 To listSelectcourse.ListCount '内循环 '判断在list列表中是否有相同的数据 if listSelectcourse.list(i)=listSelectcourse.list(j) then listSelectcourse.RemoveItem j '删除添加的数据 msgbox"已有添加课程,请先删除在添加!" exit sub end if next j next i end sub
这样就可以了,list表中不会再重复添加相同的数据了。
- 解决学生信息管理系统之List列表中重复添加相同数据问题。
- 学生信息管理系统之日期添加方式自动转换问题
- 学生信息管理系统“重复设置”问题
- 学生信息管理系统之 添加用户流程
- 学生信息管理系统中系统登录问题
- 学生信息管理系统——防止重复添加!
- 学生信息管理系统之修改数据信息
- 学生信息管理系统之查询数据信息
- 学生信息管理系统——双击添加列表选项
- 学生信息管理系统之问题汇总
- 学生信息管理系统之问题集锦
- 学生信息管理系统之ASCII问题汇总
- 学生信息管理系统之ASCII问题汇总
- 学生信息管理系统之优化问题
- 学生信息管理系统之优化问题续
- 学生信息管理系统之优化问题
- 学生信息管理系统中遇到的问题
- 学生信息管理系统问题集锦
- 韩信点兵
- 嵌入式面试题(转)
- hdu 4640 Island and study-sister(压缩DP+最短路,5级)
- Cloud Foundry中 JasperReports service集成
- linux主机改名以及oracle启动问题
- 解决学生信息管理系统之List列表中重复添加相同数据问题。
- u-boot串口初始化全过程
- HDOJ 4628 - Pieces 状态压缩DP..枚举所有子集进行更新
- 容斥原理应用(求1~r中有多少个数与n互素)
- mysql pod 插入 乱码的解决方案
- 排序算法(个人总结)
- 05-php中的全局变量和静态变量
- hdu 4635 Strongly connected (tarjan强连通分量)
- hdu 2895 (水)