Public VorFillChkListBox (ByVal lbs als CheckedListBox, ByVal sql als Schnur, ByVal ParameterName als Schnur, ByVal ParameterValue als Schnur)
Schwaches connetionString als Schnur
Schwacher Anschluss als SqlConnection
Schwacher Befehl als SqlCommand
Schwaches Papierlösekorotron als DataTable
Schwacher Adapter als neues SqlDataAdapter
'Schwacher ds als neuer Datensatz
I als Int32 verdunkeln
connetionString = myCN
Anschluss = neues SqlConnection (connetionString)
Versuch
Anschluss. Öffnen ()
Befehl = neues SqlCommand (sql, Anschluss)
command.CommandType = CommandType.StoredProcedure
Befehl. Parameters.AddWithValue (ParameterName.ToString, ParameterValue.ToString)
Papierlösekorotron = neues DataTable
Papierlösekorotron. Last (command.ExecuteReader)
Adapter. Abschaffen ()
Befehl. Abschaffen ()
Anschluss. Schließen ()
lb.DataSource = Papierlösekorotron
lb.DisplayMember = Papierlösekorotron. Spalten (1).ColumnName
lb.ValueMember = Papierlösekorotron. Spalten (0) .ColumnName
Fang ex als Ausnahme
Enden-Versuch
Enden-Unterseeboot
Privates VorlblAddToList_Click (ByVal Absender als System.Object, ByVal e als System.EventArgs) behandelt lblAddToList.Click
Für jedes x in Me.chkBoxAvailable.CheckedIndices
'' Ich möchte den Wert gefangennehmen nicht der Text jedes überprüften Einzelteils
MsgBox (Me.chkBoxAvailable.Text.ToString)
MsgBox (Me.chkBoxAvailable.SelectedValue.ToString)
Zunächst
Enden-Unterseeboot
|