Sendkeys

[ganjin]

Hallo ich möchte das mein Programm den Text aus textbox1 + Zahlen die von 1000 - 9999 in reienfolge oder durcheinenader dazu gesendet werden, wie geht das?

SendKeys.Send(TextBox2.Text + vbCrLf)

is ja klar aber wie mach ich das mit den Zahlen?
Hoffe es kann mir wer helfen
mfg ganjin

 

[Dario Linsky]

Hi,

zum Beispiel mit einer Schleife:

Dim i As Integer
For i = 1000 To 9999
    SendKeys.Send(TextBox2.Text + CStr(i) + vbCrLf)
Next i

Grüße, D.