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

327

Äänestä

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

    Takaisin ylös

    Luetuimmat keskustelut

    1. Nainen, yrittäessäsi olla vahva olet heikoksi tullut

      Tiedätkö mitä todellinen vahvuus on? Selviätkö, kun valtakunnat kukistuvat? Miten suojaudut kun menetät kaiken? :/
      Ikävä
      191
      1294

    2. Miettimisen aihetta.

      Kannattaa yrittää vain niitä oman tasoisia miehiä. Eli tiputa ittes maan pinnalle. Tiedoksi naiselle mieheltä.
      Ikävä
      122
      1128

    3. Mitkä on 3 viimeistä sanaa

      sun ja kaivattusi viesteilyssä? Ensin sun, sitten kaivatun?
      Ikävä
      48
      854

    4. Kai sä näät

      Ku sua katson et olen aika rakastunut. Rakkaus ei vain ole aina niin yksinkertaista
      Ikävä
      70
      850

    5. Just nyt mä

      En haluais sanoa sulle mitään. Voisi vaikka istua vierekkäin hiljaa. Ehkä nojaten toisiimme. Tai maata vierekkäin, ilman
      Ikävä
      53
      780

    6. Nainen miltä tuntuu olla ainoa nainen Suomessa, joka kelpaa ja on yheen sopiva minulle

      Sydämeni on kuin muuri, valtavat piikkimuurit, luottamusongelmat, ulkonäkövaatimukset, persoonavaatimukset ja älykkyysva
      Ikävä
      50
      725

    7. Kuinka hyvin tunnet mut?

      Kerro musta mies jotain.
      Ikävä
      33
      692

    8. Piristä mua ystävä

      Hyvä💫...
      Ikävä
      60
      679

    9. Hakeudu hoitoon.

      En oo kiinnostunut susta.
      Ikävä
      50
      665

    10. Nainen, mitä ajattelet minusta?

      Mitä tuntemuksia saan aikaan sinussa? :/
      Ikävä
      52
      657
    Aihe
    TietosuojaselosteKäyttöehdotEvästeasetuksetSäännöt