tagCANDY CGI VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板) [ツリー表示へ]   [Home]
一括表示(VB.NET VB2005)
タイトルListBoxの選択したものが削除できない
記事No2145
投稿日: 2005/09/16(Fri) 16:38
投稿者ジェット
[OSのVer]:WindowsXP    [VBのVer]:VB.NET
<内容>
SQLSeverからデータをListBoxに表示しListBoxで選択されたものを削除(削除ボタン)しようとすると
エラーが出る
なぜエラーが出るのかわかりませんので教えてください。
*ListBoxには商品名は表示できます。
以下にコードを記述しときます

Private Sub txt商品_LostFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles
txt商品.LostFocus
        Dim scn As SqlClient.SqlConnection = New SqlClient.SqlConnection( _
                "Data Source = localhost;Persist Security Info=False" _
                & ";Integrated Security=SSPI;database=Yuukari")
        Dim dSet As DataSet = New DataSet("t_商品マスタ")
        Dim dAdp As SqlClient.SqlDataAdapter

        dAdp = New SqlClient.SqlDataAdapter("SELECT * FROM T_M_商品マスタ", scn)
        dAdp.Fill(dSet, "t_商品マスタ")

        list商品.DataSource = dSet.Tables("t_商品マスタ")
        list商品.DisplayMember = "商品名"
        list商品.ValueMember = "商品コード"

        btn削除.Enabled = True
        txt数量.Enabled = True
        txt数量.Focus()

    End Sub

Private Sub btn削除_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
Handles btn削除.Click
        '***今現在の削除方法 2005/09/15 始め***
        '選択された商品を削除する
        If MsgBox("削除してもよろしいですか?", MsgBoxStyle.YesNo) = MsgBoxResult
.Yes Then
            list商品.Items.Remove(list商品.SelectedItem)
        End If

        '***今現在の削除方法 2005/09/15 終わり***
    End Sub


<エラー発生場所>
  
list商品.Items.Remove(list商品.SelectedItem)

の所で発生します。
どこがいけないのかわかりません。教えていただけないでしょうか。

[ツリー表示へ]
タイトルRe: ListBoxの選択したものが削除できない
記事No2148
投稿日: 2005/09/16(Fri) 17:28
投稿者なおこ(・∀・)
お世話になります。

とりあえず、どんな例外が出たか書きましょう。
で、ListBoxにデータベースなどのデータをバインドした場合、
Item.Removeはできないです。

なので、DataSource(DataTable)から削除しましょう。

Private Sub btn削除_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
Handles btn削除.Click
  Dim dt As DataTable = CType(list商品.DataSource, DataTable)
  dt.Rows.RemoveAt(Me.list商品.SelectedIndex)
  Me.list商品.Refresh()
End Sub

[ツリー表示へ]
タイトルRe^2: ListBoxの選択したものが削除できない
記事No2149
投稿日: 2005/09/16(Fri) 17:38
投稿者じゅん
解決できました。
本当にありがとうございました!!

[ツリー表示へ]
タイトルRe^2: ListBoxの選択したものが削除できない
記事No2150
投稿日: 2005/09/16(Fri) 17:38
投稿者jetto
解決できました。
本当にありがとうございました!!

[ツリー表示へ]