ik ben bezig met een lcd proggie en dan moet ik dus een woord afbreken in aparte letters en die dan versturen naar de lcd, maar ik krijg het niet voorelkaar, ik ben pas sinds kort bezig met programmeren in vb.
waarom gebeurd er niets?
code:
1
2
3
4
5
6
7
8
9
10
| Private Sub Command1_Click() txtString.Text = Tekst i = 1 For i = 1 To Len(Tekst) Mid(Tekst, i, 1) = TePrintenText DlPortWritePortUchar 890, 6 DlPortWritePortUchar 888, Asc(TePrintenText) DlPortWritePortUchar 890, 5 Next End Sub |
waarom gebeurd er niets?