我需要帮助来过滤数据。我想筛选行并将其放入文本框中,并在另一个文本框中筛选另一行。
例如。
ID-日期- msg_num -消息<<
10001 -- 01/01/10001- msg1 -!胡说八道!
10002 -- 01/01/10002- msg2 -请帮助我们!
10003 -- 01/01/10003- msg3 -快乐快乐
10004 -- 01/01/2012 - msg4 -我不知道
10005 -- 01/01/2012 - msg3 - vvvvvvvvvvv
10006 -- 01/02/2012 - msg1 - dasdasdad
10007 -- 01/02/2012 - msg2 -
10008 -- 01/02/2012 - msg3
10009 -- 01/02/2012 - msg4 -
10010 -- 01/02/2012 - msg3 - zzzzzzzzzzzzzzzzzz
首先我想过滤一下2012年1月1日的日期
然后过滤10004并将其放入Textbox1,
过滤器10002将其放入Textbox2,
并将过滤器10005转换为Textbox3
输出:
Textbox1.text =“我不知道”
Textbox2.text =“请帮助!”
Textbox3.text = "vvvvvvvvvvv“
*消息它不能修复它的可变...
发布于 2012-03-18 02:24:46
假设您的数据源在一个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除此之外,您对TextBox的ID选择似乎相当随意。为什么你需要那个特定的订单?另外,数据源中是否还有其他列会以这种方式对ID进行排序?
https://stackoverflow.com/questions/9736216
复制相似问题