データグリッドでDeleteキーを使ってデータを削除するには？ (ID:108297)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 それと、データグリッドの商品番号という列に商品コードを入力するとデータグリッドの商品名列と商品単価列を表示するようにしてあげたく、参考書を見て、自分なりに作ってみたのですが。入力しても表示されません。一度閉じてもう一度開くと表示されているのですが・・・。（これと削除されないのも関係するのでしょうか？）下記がそのコードです。 Dim RS As New ADODB.Recordset Dim strSQL As String strSQL = "SELECT M2_ID, M2_DENPYO_NO AS 伝票番号, " _ & "M2_SYOHIN_CD AS 商品番号 , " _ & "M1_SYOHIN_NM AS 商品名 , " _ & "M1_TAN AS 商品単位 ,M2_SU AS 数量 " _ & "FROM M2_SUB_TBL INNER JOIN M1_SYOHIN_TBL " _ & "ON M2_SYOHIN_CD = M1_SYOHIN_CD " _ & "WHERE M2_SYOHIN_CD = '" & Me.Syohin_No.Text & "'" RS.CursorLocation = adUseClient RS.Open strSQL, CN, adOpenStatic, adLockOptimistic Set Me.DataGrid.DataSource = RS