Osa merkeistä sensuuriin

lalalallaaaaal

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...

3

330

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • 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

    1. Mitään järkeä?

      Että ollaan erillään? Kummankin pää on kovilla.
      Ikävä
      127
      2024
    2. Noniin rakas

      Annetaanko pikkuhiljaa jo olla, niin ehkä säilyy vienot hymyt kohdatessa. En edelleenkään halua sulle tai kenellekään mi
      Ikävä
      102
      1815
    3. Kumpi vetoaa enemmän sinuun

      Kaivatun ulkonäkö vai persoonallisuus? Ulkonäössä kasvot vai vartalo? Mikä luonteessa viehättää eniten? Mikä ulkonäössä?
      Ikävä
      83
      1611
    4. Lasten hyväksikäyttö netissä - Joka 3. nuori on saanut seksuaalisen yhteydenoton pedofiililtä

      Järkyttävää! Lapsiin kohdistuva seksuaalinen hyväksikäyttö verkossa on yhä pahempi ongelma. Ulkolinja: Lasten hyväksikäy
      Maailman menoa
      61
      1474
    5. Multa sulle

      Pyörit 24/7 mielessä, kuljet mun mukana, mielessä kyselen sun mielipiteitä, vitsailen sulle, olen sydän auki, aitona. M
      Ikävä
      33
      1172
    6. Tavoitteeni onkin ärsyttää

      Sua niin turhaudut ja unohdat koko homman
      Ikävä
      110
      1093
    7. Nainen, olen tutkinut sinua paljon

      Salaisuutesi ei ole minulle salaisuus. Ehkä teimme jonkinlaista vaihtokauppaa kun tutkisimme toisiamme. Meillä oli kumm
      Ikävä
      51
      1063
    8. Ei se mene ohi ajan kanssa

      Näin se vaan on.
      Ikävä
      75
      1056
    9. Mies, eihän sulla ole vaimoa tai naisystävää?

      Minusta tuntuu jotenkin, että olisit eronnut joskus, vaikka en edes tiedä onko se totta. Jos oletkin oikeasti edelleen s
      Ikävä
      47
      1046
    10. Onko sulla empatiakykyä?

      Etkö tajua yhtään miltä tämä tuntuu minusta? Minä ainakin yritän ymmärtää miltä sinusta voisi tuntua. En usko, että olet
      Ikävä
      44
      1003
    Aihe