2017-10-27 4 views
-3

すべて 私はvb.netとMySQLデータベースを使ってプロジェクトを進めています。 ここで情報を得るために、私はいくつかのチェックボックスを追加しました。ユーザーが他の名前のチェックボックスを選択した場合、ウィンドウが表示され、テキストボックスが表示されます。そして、ユーザーがそのボックスにテキストを入力すると、 db。チェックボックスをオンにした後、テキストボックス付きのポップアップウィンドウ

+1

質問には助けがありませんし、質問もありません。 [質問]を読んで、[ツアー]に行き、あなたが持っているコードを投稿して、あなたがどこにいるか、あなたが抱えている問題を説明してください。あなたのコードを書くつもりはありません。 – Plutonix

答えて

0

多くの情報を提供していないので、あなたの質問に正確に答えることはできませんが、これが役立つかどうか確認してください。

まずSQL(.dbmlファイル)にLINQを追加 - のは、XYZとデータセット(の.xsdファイル)としてそれを名前を付けましょう - のプロジェクトに、あまりにもとしてXYZを、この名前を付けてみましょうと、あなたのデータベーステーブルをドラッグ&ドロップ両方のファイルに保存し、すべてを保存します。

ここに記載したチェックボックスを含むフォームに移動します。

このコードをあなたに追加するclick_event。

If checkbox1.checked = True Then 
    Dim insertValue As String = "" 
    insertValue = InputBox("Enter text to insert", YourTitle, "") 
    If inserValue <> "" Then 
     Dim db as New XYZDataContext 
     Dim NewRec As New YourTableName With {.ColumnName = insertValue} 
     db.YourTableName.InsertOnSubmit(NewRec) 
     db.SubmitChanges() 
     Msgbox("Value added!") 
    End If 
    checkbox1.checked = False 
End If 
0

デザイナーでウィンドウを作成し、someWindowのような名前を付けます。コードで、チェックボックスのクリックイベントからウィンドウを開きます。ウィンドウを閉じるときにそれを破棄しないでください。それを隠すだけです。ウィンドウが閉じると、テキストボックスからデータを取得できます。

Sub Test() 
     Dim wd_SomeInfo as new someWindow 
     wd_SomeInfo.showdialog() 
     Dim result As String = wd_SomeInfo.txt_sometextbox.text 
     If result = "" Then cancel.... 

    End Sub 
+0

このウィンドウを複数の入力に使用できるようにすることができます。実行時にフォームの入力メッセージを変更するだけで、カスタム入力ボックス() –

関連する問題