Dim sorgu1 As String = "insert into derskayit(ders1, ders2, ders3) values('"&ListBox.items[0].ToString()&"','"& ListBox2.items[1].ToString()&"','"& ListBox2.items[2].ToString()&"')"