当我们在其他文本框中选择州和相关城市时，如何获得自动填充功能？ [英] how to get autocomplete on when we select state and related cities in other textbox?
问题描述
我有两个名为的文本框： txtReceiver_State和txtReceiver_City
I have two textboxes named: txtReceiver_State and txtReceiver_City
问题：当我选择状态然后按Tab键跳到下一个文本框，然后我开始输入它没有显示任何与选定状态相关的城市
Problem: when i select state then pressed tab to jump to next textbox and then i start typing it does not show any cities related to selected state
如何摆脱这个问题!!
How to get rid of this problem!!
Private Sub AutoCompleteState（）
      con =新OleDbConnection（connString）
      con.Open（）
      query =" SELECT * FROM [State]"
      cmd =新OleDbCommand（查询，骗局）
      Dim ds As New DataSet
      da =新OleDbDataAdapter（cmd）
      da.Fill（ds，" State"）
        Dim col As New AutoCompleteStringCollection
      Dim i As Integer
     对于i = 0到ds.Tables（0）.Rows.Count - 1
          col.Add（ds.Tables（0）.Rows（i）（" State_Name"）。ToString（））
       下一步
      txtReceiver_State.AutoCompleteSource = AutoCompleteSource.CustomSource
      txtReceiver_State.AutoCompleteCustomSource = col
      txtReceiver_State.AutoCompleteMode = AutoCompleteMode.SuggestAppend
      con.Close（）
 结束次
Private Sub AutoCompleteState()
con = New OleDbConnection(connString)
con.Open()
query = "SELECT * FROM [State]"
cmd = New OleDbCommand(query, con)
Dim ds As New DataSet
da = New OleDbDataAdapter(cmd)
da.Fill(ds, "State")
Dim col As New AutoCompleteStringCollection
Dim i As Integer
For i = 0 To ds.Tables(0).Rows.Count - 1
col.Add(ds.Tables(0).Rows(i)("State_Name").ToString())
Next
txtReceiver_State.AutoCompleteSource = AutoCompleteSource.CustomSource
txtReceiver_State.AutoCompleteCustomSource = col
txtReceiver_State.AutoCompleteMode = AutoCompleteMode.SuggestAppend
con.Close()
End Sub
  Private Sub AutoCompleteCity（）
      con =新OleDbConnection（connString）
      con.Open（）
      query ="从City中选择City_Name _
          &安培; "where""
      cmd =新OleDbCommand（查询，骗局）
      Dim ds As New DataSet
      Dim da As New OleDbDataAdapter（cmd）
      da.Fill（ds，" City"）
        Dim col As New AutoCompleteStringCollection
      Dim i As Integer
     对于i = 0到ds.Tables（0）.Rows.Count - 1
          col.Add（ds.Tables（0）.Rows（i）（" City_Name"）。ToString（））
       下一步
      txtReceiver_City.AutoCompleteSource = AutoCompleteSource.CustomSource
      txtReceiver_City.AutoCompleteCustomSource = col
      txtReceiver_City.AutoCompleteMode = AutoCompleteMode.SuggestAppend
      con.Close（）
 结束子
Private Sub AutoCompleteCity()
con = New OleDbConnection(connString)
con.Open()
query = "Select City_Name from City" _
& "where "
cmd = New OleDbCommand(query, con)
Dim ds As New DataSet
Dim da As New OleDbDataAdapter(cmd)
da.Fill(ds, "City")
Dim col As New AutoCompleteStringCollection
Dim i As Integer
For i = 0 To ds.Tables(0).Rows.Count - 1
col.Add(ds.Tables(0).Rows(i)("City_Name").ToString())
Next
txtReceiver_City.AutoCompleteSource = AutoCompleteSource.CustomSource
txtReceiver_City.AutoCompleteCustomSource = col
txtReceiver_City.AutoCompleteMode = AutoCompleteMode.SuggestAppend
con.Close()
End Sub
推荐答案
您好，
你在AutoCompleteCity中有一个不完整的SELECT语句
You have a incomplete SELECT statement in AutoCompleteCity
query =" Select City_Name from City" _
            &安培; " where"
你需要完成WHERE = 设置为其他文本框的文本。
这篇关于当我们在其他文本框中选择州和相关城市时，如何获得自动填充功能？的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！
