2016-10-27 10 views
0

vb.netのテキストボックスからAccessデータベースを更新する方法はありますか。私の現在のプログラムは、Accessデータベースから値を表示することができます。vb.netからデータベースを更新

Private Sub DateTimePicker1_ValueChanged(sender As Object, e As EventArgs) Handles DateTimePicker1.ValueChanged 

    Dim ds As New DataSet 

    Dim sql As String = 
    "Select TOP 1 GEUR,GUSD FROM GBPtb WHERE Date= ?" 

    Using connection As New OleDb.OleDbConnection(strConnectionString), 
     command As New OleDb.OleDbCommand(sql, connection), 
     adapter As New OleDb.OleDbDataAdapter(command) 

     connection.Open() 

このプログラムを変更して、ユーザーがプログラムのテキストボックスから換算レートを編集できるようにするにはどうすればよいですか?

+0

を呼び出すことができ、コマンドビルダーを使用します: 'tbxGBPUSD.DataBinding.Addを( "Text"、ds.Tables( "rates")、 "GEUR"、true、DataSourceUpdateMode.OnPropertyChanged) ' –

+1

DataBinding ** s **。インテリセンスはありませんか? –

+0

バインドは成功しますが、値は変更されません。また、Ifステートメントのすぐ上にデータバインディングを追加しました。申し訳ありませんが、私はこれに新しいです。ご協力ありがとうございました。 –

答えて

0

[更新]ボタンとして機能するボタンを追加できます。 開き、再び接続、例えば新しい更新クエリを作成し、

Dim updateStr As String ="UPDATE yourTable SET col1 = col1 + 1" 
Dim myCommand As New OleDbCommand(updateStr,yourConnection) 
myCommand.ExecuteNonQuery() 

それとも、単にあなたがデータバインディングを使用することができます

adapter.Update(ds) 
関連する問題