Springen naar inhoud


- - - - -
VB6

Lus Flexgrid Txt Met Ado Velden



  • Log in a.u.b. om te beantwoorden
Geen reacties in dit onderwerp

#1 Marc_DV

Marc_DV

    Starting Developer

  • Leden
  • 22 berichten
    Laatst bezocht 11 apr 2023 10:57

Geplaatst op 16 april 2021 - 13:22

Hallo,

Ik heb een flexgrid waarin 40 kolommen staan in 1 rij;

Ik wens deze kolommen (0 tot 40) te checken met inhoud ADO veld maar geraak er niet aan uit - wat doe ik verkeerd :
Visual Basic Code:
rs_MySQL_Algemeen.MoveFirst
		Do Until rs_MySQL_Algemeen.EOF = True

			.Col = 0
			For Teller = 0 To .Cols - 1

				If Trim(.Text) = Trim(rs_MySQL_Algemeen!velden) Then

					MsgBox .Text & "  --  " & rs_MySQL_Algemeen!velden

					Else

					.Col = Teller

				End If

			Next Teller

		rs_MySQL_Algemeen.MoveNext
		Loop







Ook met taq VB6 voorzien

0 gebruiker(s) lezen dit onderwerp

0 lid(leden), 0 bezoeker(s), 0 anonieme gebruikers

Inloggen


[VB6] Untitled 1

Met dank aan Jürgen voor de jarenlange inzet van visualbasic.be (anno dec 2000)
Met dank aan Mike en Ronneke voor de jarenlange inzet van vbib.be (anno dec 2010)
Met dank aan PascalBianca voor de jarenlange inzet van vbib.be (anno dec 2016)