Visual Basic 中学校 掲示板 投稿の管理
タグのない投稿を抽出
統計
RSS
Visual Basic 中学校
投稿一覧
検索結果の表示が出ない。
この投稿へのリンク
https://keijiban.umayadia.com/ThreadDetail.aspx?ThreadId=25982#CommentId70626
この投稿の削除
削除パスワード
削除する
コメント本文
投稿者
yama&kawa
 (社会人)
投稿日時
2015/12/29 17:47:42
取引先を検索して、その詳細をForm1に表示するプログラムを作成しています。
取引先データはSQLで作成し、VB2015でプログラムを組んでいます。
取引先のデータはアプリケーション起動時にModuleを使い、変数に読み込んでいます。
Form1には、取引先のデータを表示するようにTextboxを配置し、検索するサブルーチンはPublic sub を利用して、表示するようにしています。
Form2を別途準備しています。取引先の登録件数に応じて、その絞り込みのためです。地域や取引先の種類に応じて絞り込み、絞り込んだ結果をGridVeiwにて一覧にして、GridVeiwをクリックして、
取引先の詳細をForm1に表示しようとしています。
1. Form2では、次の書式で取引先コードを特定しています。
SeletedItem=GridVeiw.CurrentRow.Cells(0).value.Tostring
2. 特定された取引先コードをForm1のPublic Subに引き渡しています。
Public Sub SerchData_Custmer()
For I as Integer=0 to MaxData
If Custmer(I,0)=SelectedItem Then
txt取引先ID.text=Custmer(I,0)
txt取引先名text=Custmer(I,1)
・・・・
End If
End Sub
3. 以上のようなプログラムですが、検索結果がForm1に表示されません。ブレークポイントを掛けて
経過を確認すると取引先データは変数に入っていますし、それぞれTextBoxにも表示されるはず であるのに、Form1には表示されません。
4. プログラム上で何かが欠けているのでしょうが、原因がわかりません。
どなたかご教示ください。
なお、Form1で取引先コードを入力するTextboxにメソッドLostFocusで検索を掛けるとその結果は
想定の通り表示されます。