satriano17
Gebruiker
- Lid geworden
- 30 sep 2012
- Berichten
- 331
dag
ik heb:
een commbutton
een textbox'woordinp'
met onderstand code wordt een willekeurige woord gesplitst
en de afzonderlijke letters 'geprint' op een picturebox
werkt alles perfect. Echter, de verschillende letters worden uiteraad opgestapeld de een op de ander.
Ik zou willen dat de letters geprint worden maar niet een op andere, maar wel
verbonden op een vaste of willekeurige zijde. Zeg maar zoals een sigil.
zie twee afb
ik heb:
een commbutton
een textbox'woordinp'
met onderstand code wordt een willekeurige woord gesplitst
en de afzonderlijke letters 'geprint' op een picturebox
Code:
Dim woord As String
Dim i As Integer
woord = woordinp
Picture1.AutoRedraw = True
For i = 1 To Len(woord)
Picture1.CurrentX = 1050
Picture1.CurrentY = 700
Picture1.Print Mid(woord, i, 1)
Next i
End Sub
werkt alles perfect. Echter, de verschillende letters worden uiteraad opgestapeld de een op de ander.
Ik zou willen dat de letters geprint worden maar niet een op andere, maar wel
verbonden op een vaste of willekeurige zijde. Zeg maar zoals een sigil.
zie twee afb