首頁 > 程式設計 > VB中..使用文字輸入方塊加資料庫完成"自動完成功能"

VB中..使用文字輸入方塊加資料庫完成"自動完成功能"

2008年4月8日 imusm 發表評論 閱讀評論

在藍色小舖找到的解決方法
原PO網址


使用北風資料庫的Customers資料表的Customerid欄位做為
自動完成的欄位,在表單裡放入一個TextBox,程式如下:

    Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        TextBox1.AutoCompleteMode = AutoCompleteMode.SuggestAppend
        TextBox1.AutoCompleteSource = AutoCompleteSource.CustomSource

        Dim cn As New SqlConnection("server=db-machine;database=northwind;user id=sa;password=sa")
        Dim cmd As New SqlCommand("select customerid from customers", cn)

        cn.Open()
        Dim reader As SqlDataReader = cmd.ExecuteReader

        Do While reader.Read
            TextBox1.AutoCompleteCustomSource.Add(reader(0))
        Loop

        reader.Close()
        cmd.Dispose()
    End Sub

Popularity: 10% [?]

  • Share/Bookmark

相關文章

Categories: 程式設計 Tags: ,
  1. 目前尚無任何的評論。
  1. 目前尚無任何 trackbacks 和 pingbacks。