0

リストとデータベースから項目を削除したい。これは私が使用したコードです：

Dim nr As Integer
        Dim s As String
        s = lstPatiënten.ToString
        nr = CInt(s.Split("-"c)(0))
        For Each d In patienten
            If d.nr = nr Then
                If patientenDB.PatientVerwijderen(d) > 0 Then
                    initGetPatienten()
                End If
            End If
        Next

しかし、それは動作しません..エラーは次のとおりです。

文字列 "System.Windows.Forms.ListBox, It" から型 'Integer' への変換は無効です。

しかし、Nr = 83 (83 は患者のユーザー ID) と入力すると、うまくいきました。

誰か助けてくれませんか？

4

1 に答える 1

0

s = lstPatiënten.ToStringに変更する必要がありますs = lstPatiënten.SelectedItem.ToString。試してみて、うまくいくかどうか教えてください。

Listbox.SelectedItem

于 2012-11-06T20:09:48.357 に答える