以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]帮忙看看这个问题  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=51463)
--  作者：aduydgd
--  发布时间：2014/5/27 9:41:00
--  [求助]帮忙看看这个问题

下面的代码看看有什么问题没有？我操作后没有任何效果，但是我加上msg看看结果时，奇迹发生了，我点完MSG的确定后，该得到的信息就有了，不知道什么原因，去掉MSG，就不行了

 

Valuechanged：事件

 

Dim sxr As WinForm.ComboBox = e.Form.Controls("ComboBox2")
Dim cj As WinForm.ComboBox = e.Form.Controls("ComboBox1")
Dim ly As WinForm.TextBox = e.Form.Controls("TextBox2")
Dim cmd As New SQLCommand
Dim dt As DataTable
Dim dr As String = e.Form.Controls("ComboBox3").value
cmd.C
cmd.CommandText = "SELECT * From kehu Where mingcheng = \'" & dr & "\'"

MessageBox.Show(dr)
dt = cmd.ExecuteReader
If dt.DataRows.Count > 0 Then
    cj.Text = dt.DataRows(0)("jigou")
    ly.Text = dt.DataRows(0)("laiyuanjigou")
    sxr.Text = dt.DataRows(0)("sxren")
Else
    cj.Text = Nothing
    ly.Text = Nothing
    sxr.Text = Nothing
End If

[此贴子已经被作者于2014-5-27 9:41:38编辑过]
--  作者：Bin
--  发布时间：2014/5/27 9:43:00
--  
Dim dr As String = e.Form.Controls("ComboBox3").value

改为

Dim dr As String = e.Form.Controls("ComboBox3").Text
--  作者：aduydgd
--  发布时间：2014/5/27 9:48:00
--  
我之前就是TEXT，不行，我就该为Value了，还是不行
--  作者：Bin
--  发布时间：2014/5/27 9:52:00
--  
上个例子看看.
--  作者：有点甜
--  发布时间：2014/5/27 9:54:00
--  
 Valuechanged 事件，需要你修改了值，并离开这个文本框，才会触发的......
--  作者：Bin
--  发布时间：2014/5/27 9:55:00
--  
你要放到TextChanged事件,刚才没注意看你事件.