reken probleempje

[geenID]

hallo, ik ben de laatste tijd veel bezig met eigen programma's maken,
maar aangezien ik toch niet zo goed ben met het maken/rekenen in visual basic, ben ik op een probleem gestuit:

part1 bevat 4 cijfers
part3 bevat ook 4 cijfer

maar part2, wil ik maken door: "part 1 + part3 - 2000"

het probleem is dat part2 maar 4 cijfers moet bevatten, en niet meer.
Nu is dit niet het geval, en bevat part2 meer dan 4 cijfers.
Dit is een stukje uit mijn programma:


part1 = Rand(1000, 9000)
part2 = part1 + part3 - 2000
part3 = Rand(1000, 9000)

i = part1 + "x" + part2 + "x" + part3

TextBox1.Text = i

 

[bmtvrr]

Misschien door te controleren of part 2 groter is dan 9999(dus meer dan 4 cijfers bevat) en als dat het geval is, delen door 10, als dat niet zo is, laten

 

[geenID]

Misschien door te controleren of part 2 groter is dan 9999(dus meer dan 4 cijfers bevat) en als dat het geval is, delen door 10, als dat niet zo is, laten

thx voor reactie want er zijn vele mensen die dit lezen, de oplossing wel weten, maar geen reactie geven :S

Maar het is gelukt, heel erg bedankt man

 

[bmtvrr]

graag gedaan