2012-03-16 3 views
0

私はデータをフィルタリングするのに助けが必要です。私は行をフィルタリングし、テキストボックスに入れ、別の行を別のテキストボックスにフィルタリングしたい。
ex。
ID ---------日付-------- msg_num ------------メッセージ< <
10001 - 01/01/2012 --- --- msg1 ------------- Blah!ブラッ!
10002 - 01/01/2012 ------ msg2 -------------お手伝いください!
10003 - 01/01/2012 ------ msg3 ------------- happy happy happy
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 ------------- eeeeeeeeeeeeeeeeee
10009 - 01/02/2012 ------ msg4 ------------- yyyyyyyyyyyyyyyyyy
10010 - 01/02/2012 ------ msg3 ----------- - - zzzzzzzzzzzzzzzzzzzzVB.netでSQLデータベースをフィルタリングするためのヘルプが必要です... diffent filter

は、最初のiは、日付2012年1月1日
をフィルタリングしたいその後、10004をフィルタリングし、TextBox1テキストボックスに入れて、
フィルタ10002は、TextBox2をに入れ

出力Textbox3する10005をフィルタリング:
のTextBox1を.text = "わからない"
Textbox2.text = "助けてください!"
Textbox3.textは= "vvvvvvvvvvv"

*メッセージのそのchangableを固定していない...

+0

VBAまたはVBのいずれかを選択し、使用しているデータベースとどちらか一方を含めるようにタグを修正してください。 – Fionnuala

+0

MS Access、sql、VB.net vb6、vbaですか? –

+0

私のデータベースとVISUAL STUDIO 2010にSQL Server管理スタジオを使用しています – rayskull

答えて

0

あなたのデータソースが(dtという名前)のDataTableであると仮定すると、これは仕事を得る必要があります。

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を並べ替える他の列がデータソースにありますか?

関連する問題