[VB.NET]datagridviewの複数行選択について

Question

vb.netで商品登録プログラムを作成しています。
DBと接続してデータグリットビューにテーブルを表示しています。
そこでデータグリットビューに表示している行を複数選択して削除ボタンを押下したら選択行のデータを削除したいです。

 Dim result As DialogResult = MessageBox.Show(" '" & DataGridView1.SelectedRows.Count & "'件削除しますか？", _
                                                   
      "確認", _
                                                         
MessageBoxButtons.YesNo, _
                                                         
MessageBoxIcon.Warning, _
                                                         
MessageBoxDefaultButton.Button1)
            'はいが選択されたら
            If result = Windows.Forms.DialogResult.Yes Then

                'SQL文
                Dim delete As String = " " _
                               + "DELETE FROM T_ITEM " _
                               + " WHERE NUMBER IN('" & DataGridView1.CurrentRow.Cells("注文番号").Value & "')"

                Dim command As New MySqlCommand(delete, cn)


                For Each row As DataGridViewRow In DataGridView1.SelectedRows

                    'クエリ実行
                    command.ExecuteNonQuery()
                    DataGridView1.Rows.RemoveAt(DataGridView1.CurrentCell.RowIndex)

                Next

            End If

SQLをforeachの中に持っていけば複数削除できるのですが、このままでSQL文を変えて複数削除したいのですが、WHEREくで複数の値を持たせるSQL文の書き方がわかりません。お願いします。

Answer 1

DELETE FROM T_ITEM WHERE NUMBER IN (2,3,5)的なクエリを投げてみるとか

Comments

[reeeo]

回答ありがとうございます。そのおように条件をNUMBERで指定すれば削除できるのですが、ユーザーに選択された行を削除したいです。。。

[dojikko]

INで指定する値を DataGridViewのSelectedRowsから取ってきてはダメなんですか？

[reeeo]

SelectedRowsで指定しても最初の一行分しか取れていませんでした。

[dojikko]

For EachループにSQL文を入れて正しく動作する=削除に必要なNUMBERは取得できると思うのですが..

[reeeo]

+ " WHERE NUMBER IN('" & DataGridView1.SelectedRows(0).Cells("注文番号").Value & "',)"
こう書いたのですが書き方が間違っているのでしょうか？

[toro1]

" WHERE NUMBER IN('" & DataGridView1.SelectedRows(0).Cells("注文番号").Value & "',)"
だと選択した内の一行目の注文番号しか取れていません。SelectedRowsをfor eachで回して取得してみては？
Dim list as new list(of string)
for each c as DataGridViewRow in DataGridView1.SelectedRows
list.add( c("注文番号").value)
next
…
+ " WHERE NUMBER IN('" & string.join(",",list) & "',)"

[reeeo]

toro1さん回答ありがとうございます。
上記のコードで試したところlist.add( c("注文番号").value)のcの箇所で既定のプロパティが無い為....とエラーが出てしまいました。

[toro1]

list.add( c("注文番号").value)　ではなくて
list.add(c.Cells("注文番号").value)　の誤りですね。

補足ですが
list(of string)のところは、c("注文番号").valueの型が質問ではわからなかったので念のため、string型にしています。型に合わせて変えて下さい。

[reeeo]

正常に動くようになりました。
listに追加していくという考えがあるんですんね！！
とても勉強になりました。ありがとうございました。