Hello guys
I stucked on error but my program works fine i just wanna explanation why im getting this error
Here is the code
and the error says "Invalid procedure call or argument"
I stucked on error but my program works fine i just wanna explanation why im getting this error
Here is the code
Code:
Private Sub cmdencrypt_Click()
For i = 0 To Len(txtulaz.Text)
slovo = Mid(txtulaz.Text, i + 1, 1)
asci = Chr(Asc(slovo) + 1)
txtizlaz.Text = txtizlaz.Text + asci
Next
End Sub