Combobox validating event c


Selected Item.tostring() tnx Private Sub Combo Box3_Selected Index Changed(sender As System. Event Args) con = New Ole Db Connection("Provider= Microsoft. To String() & "'" com = New Ole Db Command(ewaaa, con) con. Selected Index Changed con = New Ole Db Connection("Provider= Microsoft.



Read())" statement and last,: You cannot use combo Box3. What you can do, is to ADD a new Item to this combo Box. Has Rows)" out of the code, change it with "if(rid. To String()) -- Hope it helps, bye @Mitja this is my new code that i based from what you said i hope i did it the way you wanted because it still didn't work Private Sub Combo Box3_Selected Index Changed(By Val sender As System. ACE.oledb.12.0; Data Source=C:\Users\edenzam\Desktop\CBFMNHS Enrollment System\CBFMNHS Enrollment System\bin\Debug\Enrollment System.accdb") Dim ewaaa As String = "Select * from Schedulings where Year Levels = '" & Combo Box3. Text & "' " com = New Ole Db Command(ewaaa, con) con. ACE.oledb.12.0; Data Source=C:\Users\edenzam\Desktop\CBFMNHS Enrollment System\CBFMNHS Enrollment System\bin\Debug\Enrollment System.accdb") Dim ewaaa As String = "Select * from Scheduling Twos where Year Levels = '" & Combo Box1. Read=True then Msg Box("Section Already Exist", Msg Box Style. Selected Index = -1 End If End If End Sub Private Sub Combo Box3_Validating(By Val sender As Object, By Val e As System.

Validating Then con = New Ole Db Connection("Provider= Microsoft. ACE.oledb.12.0; Data Source=C:\Users\edenzam\Desktop\CBFMNHS Enrollment System\CBFMNHS Enrollment System\bin\Debug\Enrollment System.accdb") Dim ewaaa As String = "Select * from Schedulings where Year Levels = '" & Combo Box3. Text & "' " com = New Ole Db Command(ewaaa, con) con.

Validating Then con = New Ole Db Connection("Provider= Microsoft.