需要帮助过滤VB.net中的SQL数据库...不同的过滤器

时间:2012-03-16 11:11:55

标签: sql-server vb.net

我需要帮助过滤数据。我想过滤行并将其放在文本框中,并在另一个文本框vb中过滤另一行。
前。
ID ---------日期-------- msg_num ------------消息<<
10001 - 01/01/2012 ------ msg1 ------------- Blah!胡说!
10002 - 01/01/2012 ------ msg2 -------------请帮助!
10003 - 01/01/2012 ------ msg3 -------------开心快乐
10004 - 01/01/2012 ------ msg4 -------------我不知道
10005 - 01/01/2012 ------ msg3 -------------vvvvvvvvvvv
10006 - 01/02/2012 ------ msg1 ------------- dasdasdad
10007 - 01/02/2012 ------ msg2 ------------- qqqqqqqqqqq
10008 - 01/02/2012 ------ msg3 -------------eeeeeeeeeeeeeeeeeee
10009 - 01/02/2012 ------ msg4 ------------- yyyyyyyyyyyyyyyyyyy
10010 - 01/02/2012 ------ msg3 ------------- zzzzzzzzzzzzzzzzzzzz

首先我要过滤日期01/01/2012
然后过滤10004并将其放入Textbox1,
过滤器10002把它放在Textbox2中,
过滤10005到Textbox3

输出:
Textbox1.text =“我不知道”
Textbox2.text =“请帮忙!”
Textbox3.text =“vvvvvvvvvvv”

*消息不能解决它的变化......

1 个答案:

答案 0 :(得分:0)

假设您的数据源位于DataTable(名为dt)中,这应该可以完成工作:

    Dim dr As DataRow

    dt.DefaultView.RowFilter = "Date = '01/01/2012'"
    For Each dr In dt.DefaultView.ToTable.Rows
        Select Case dr("ID")
            Case Is = 10004
                TextBox1.Text = dr("Message")
            Case Is = 10002
                TextBox2.Text = dr("Message")
            Case Is = 10005
                TextBox3.Text = dr("Message")
        End Select
    Next

除此之外,您对IDTextBox的选择似乎相当武断。为什么需要特定订单?此外,数据源中是否还有其他列以这种方式对ID进行排序?