Predmet:Re: Zabrana Slova Å ,Ć,Č,Đ,Ž
Interesantno a nema ni u helpu.
Za vece asc 0d 256 koristi se chrw naredba i to od verzije 2000,
Stare verzije rade sa chr.
PreuzmiIzvorni kôd (Visual Basic):Private Sub NAZIV_KeyPress(KeyAscii As Integer)
Const Strg = "#@%$#!/*?&+.,;:-<>\|[]{}§Å šŽž
"
Dim Slovo As String
Dim Poz As Integer
Slovo = ChrW(KeyAscii)
Poz = InStr(1, Strg, Slovo)
If Poz > 0 Then
KeyAscii = 0
End If
End Sub
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.