Visual Basic 中学校 掲示板 投稿の管理
タグのない投稿を抽出
統計
RSS
Visual Basic 中学校
投稿一覧
選択行の削除
この投稿へのリンク
https://keijiban.umayadia.com/ThreadDetail.aspx?ThreadId=30267#CommentId82938
この投稿の削除
削除パスワード
削除する
コメント本文
投稿者
ソッケル
 (社会人)
投稿日時
2017/7/31 10:28:17
現在のソースはこんな感じです。
'消去ボタン
Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
Dim conn As New MySqlConnection
Dim myconnectionstring As String = Module1.SQL
Dim table As New DataTable
conn.ConnectionString = myconnectionstring
Try
'接続
conn.Open()
table = DataGridView1.DataSource
Dim delete As String = "DELETE FROM T_ITEM WHERE ITEM_ID ='" & DataGridView1.CurrentCell.RowIndex & "'"
Dim mycomand As New MySqlCommand(delete, conn)
' データを取得
Dim Ds As New DataSet
Dim result As DialogResult = MessageBox.Show("消去してもよろしいですか?", _
"質問", _
MessageBoxButtons.YesNo, _
MessageBoxIcon.Exclamation, _
MessageBoxDefaultButton.Button2)
'何が選択されたか調べる
If result = DialogResult.Yes Then
'「はい」が選択されたら
mycomand.ExecuteNonQuery()
End If
Catch ex As Exception
MsgBox(ex.Message)
Finally
'閉じる
conn.Close()
End Try
End Sub