Ændre værdi på Tal/Bogstav!

Hej..


Hvordan kan man ændre på en værdi af f.eks et tal eller bogstav?

Dvs. at hvis nu jeg trykke 'B' så skriver den istedet 'O' ? eller noget andet ....

Jeg vil egentlig lave så at når man taster ',' skriver den '.' altså den skriver punktum istedet for komma tegnet!...


Men how?

Mvh.
Shouresh

Det er simpelt, du skal bare skrive denne kode:

<pre>
Private Sub Text1_KeyPress(KeyAscii As Integer)

If KeyAscii =12 then
KeyAscii=14
end if

End Sub

</pre>

Som gør at hver gang den skal til at skrive et tegn, finder den ud af om det er kommer, hvis dette er tilfældet skriver den punktum istedet for!

-Thomas

Hey Mikkel C.

Du skal bare indsætte følgende kode:

Også kan du faktisk rette Tekst til lige det du har lyst til

Const Tekst As String = "hej "

Private Sub Command1_Click()
Dim CurrentLetter As String
Dim CurrentString As String
Dim I As Integer
    For I = 1 To Len(Text1.Text)
        CurrentLetter = Mid(Tekst, ((I - 1) Mod Len(Tekst)) + 1, 1)
        CurrentString = CurrentString & CurrentLetter
    Next I
    MsgBox CurrentString
End Sub

// Great programs often follow great brains!

Er det så muligt at gøre sådan her,
ALT man skriver, F.eks Jeg hedder kaj,
Så skriver den
Hej Hej Hej Hej <--?
Altså oversætter alt man skriver til hej.
som
K = H
a = e
n = j
. = ! så den skriver Hej! , Hvis man ville have skrevet Kan.
// CoolKiller @ CoolKiller.1go.dk