satriano17
Gebruiker
- Lid geworden
- 30 sep 2012
- Berichten
- 331
dag
Ik heb een textbox text1.text
In deze text1 komen een antal getallen te staan (ook dubbel) van 1-9
BV. 133567
dan in text2.text kan ik de getallen weergeven die in text1.text
niet voorkomen
met deze code
dus 2489
Tot hier alles ok.
Ik wou nu in text2.text de gefiltreerde getallen gewoon scheiden met een spatie zo
2 4 8 9
en heb ik de code zo verbeterd
maar dan werkt niet. Ik kan de getallen niet correct scheiden met een spatie
Waar maak ik fout?
dank u
Ik heb een textbox text1.text
In deze text1 komen een antal getallen te staan (ook dubbel) van 1-9
BV. 133567
dan in text2.text kan ik de getallen weergeven die in text1.text
niet voorkomen
met deze code
Code:
c00 = "123456789"
For j = 1 To Len(Text1.Text)
c00 = Replace(c00, Mid(Text1.Text, j, 1), "")
Next j
Text2.Text = c00
Tot hier alles ok.
Ik wou nu in text2.text de gefiltreerde getallen gewoon scheiden met een spatie zo
2 4 8 9
en heb ik de code zo verbeterd
Code:
c00 = Replace(c00, Mid(Text1.Text, j, 1), " ")
maar dan werkt niet. Ik kan de getallen niet correct scheiden met een spatie
Waar maak ik fout?
dank u