Formilla kysytään yhdessä TextBoxissa tallennettavan tiedoston nimeä, ja TextBoxiinhan voi syöttää myös erikoismerkkejä /\?: jne...
Jos tiedostonimessä on näitä merkkejä, pukkaa tallennettaessa erroria.
Miten kiellettyjen merkkien käytön voi estää kokonaan? Ensiksi tuli mieleen replace(), mutta enhän minä edes tiedä mitkä kaikki merkit ovat kiellettyjä. Neuvokeeh...
Osa merkeistä sensuuriin
3
373
Vastaukset
- Kunde
lisää koodiin kiellettyjä merkkejä, nyt vain /\?
Private Sub Text1_KeyPress(KeyAscii As Integer)
Select Case KeyAscii
Case Asc("/"), Asc("\"), Asc("?") ' tässä voit valita mitä merkkejä ei voida syöttää
KeyAscii = 0
Case Else
End Select
End Sub- lalalallaaaaal
Mitänkä tämä menisi vb.netissä? Googlella löysin tällaista:
Private Sub frmGame_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles MyBase.KeyPress
Dim keyascii As Integer = AscW(e.KeyChar)
End Sub
Ei onnistu pistämällä keyascii = 0. - Orwell
lalalallaaaaal kirjoitti:
Mitänkä tämä menisi vb.netissä? Googlella löysin tällaista:
Private Sub frmGame_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles MyBase.KeyPress
Dim keyascii As Integer = AscW(e.KeyChar)
End Sub
Ei onnistu pistämällä keyascii = 0.Pistä sinne kontrollin KeyPress eventiin ao. koodin pätkä. Pitäisi estää a,b ja c kirjainten kirjoitus.
Select Case e.KeyChar
Case "a","b","c"
e.Handled=True
Case Else
e.Handled=False
End Select
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Vain vasemmistolaiset rakennemuutokset pelastavat Suomen
Kansaa on ankeutettu viimeiset 30+ vuotta porvarillisella minäminä-talouspolitiikalla, jossa tavalliselta kansalta on ot1293917Purra on kantanut vastuuta täyden kympin arvoisesti
Luottoluokituksen lasku, ennätysvelat ja ennätystyöttömyys siitä muutamana esimerkkinä. Jatkakoon hän hyvin aloittamaans143371- 193315
- 793257
Persut huutaa taas: "kato! muslimi!"
Persut on lyhyessä ajassa ajaneet läpi kaksi työntekijöiden oikeuksien heikennystä, joita se on aiemmin vastustanut. Pe573214- 292885
- 472697
- 542617
- 682421
- 192357