none
請問各位大大如何避免按BUTTON後資料被重複加入COMBOBOX中 RRS feed

  • 問題

  • 請問各位大大如何避免按BUTTON後資料被重複加入COMBOBOX中

    我有一個BUTTON1 只要按一次就會重新呼叫 Form3_Load

    然後執行

      Dim conn As SqlConnection
                Dim strDbCon As String
            Dim dgs As New DataSet
            Dim sqlstr As String
                strDbCon = "Persist Security Info=False;User ID=sa;pwd=****;Initial Catalog=***;Data Source="
                conn = New SqlConnection(strDbCon)
                conn.Open()
                sqlstr = " SELECT  姓名  FROM  固資使用者 order by 姓名"
                'cmd = New SqlCommand(sqlstr, conn)
                'cmd.ExecuteNonQuery()
                Dim fgs As New SqlDataAdapter(sqlstr, strDbCon)
                fgs.Fill(dgs, "固資使用者")
            Dim jgs As New DataTable
            jgs = dgs.Tables("固資使用者")
                For i = 0 To jgs.Rows.Count - 1
                    CBB1.Items.Add(Trim(dgs.Tables.Item(0).Rows(i).Item("姓名")))
                Next

    請問如何避免資料每案一次BUTTON1後資料重複被添加在CBB1(為combobox名)中

    請各位大大指教

    謝謝

    2014年12月30日 上午 09:43

解答

  • 不能在加入之前先清空嗎?

    在 For i = 0 To jgs.Rows.Count - 1 之前加一行

    CBB1.Items.Clear()

    • 已標示為解答 MichaelTsai10 2014年12月31日 上午 01:03
    2014年12月30日 下午 12:13