Van 1000 naar 1 - 0 - 0 - 0 ?

[joeri01]

Van 1234 naar 1 - 2 - 3 - 4 ?

Hallo,

Als ik een getal in een textboxs heb (bv. 1234) dan wil ik deze in 4 losse strings in vier tekstboxen laten weergeven.
zodat:
textbox1 = 1
textbox2 = 2
textbox3 = 3
textbox4 = 4

Zou iemand mij hiermee kunnen helpen, alvast bedankt.

Joeri.

 

[dejobse]

in excel? of ergens anders?

 

[huijb]

in excel? of ergens anders?

In Visual Basic, in deze sectie staat nl. de vraag.

 

[dejobse]

ow sorry was me niet opgevallen

 

[JHx]

txtUit1 = Mid(txtIn, 1, 1)
txtUit2 = Mid(txtIn, 2, 1)
txtUit3 = Mid(txtIn, 3, 1)
txtUit4 = Mid(txtIn, 4, 1)

Of je kan het in een loop zetten als je een array maakt van txtUit,

  For i = 1 To 4
    txtUit(i) = Mid(txtIn, i, 1)
  Next

 

[joeri01]

Bedankt JHX. :thumb:

MvG, Joeri