Kod:
Private Sub Timer4_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer4.Tick
ListBox1.SelectedIndex = o
parametre(0) = New OleDbParameter
parametre(1) = New OleDbParameter
Label1.Text = ListBox1.Items(o)
parametre(0).Value = Label1.Text
parametre(1).Value = "boş"
'__________________________________________________________
komutum.Parameters.Add(parametre(0))
komutum.Parameters.Add(parametre(1))
komutum.ExecuteNonQuery()
o = o + 1
End Sub