textboxiin pelkästään numeroita

aapuuva......

Elikkäs törmäsin tallaiseen ongelmaan ohjelmoidessani yhtä ohjelmaa (VB6). Elikkä mulla on lomakkeella textbox joka pitäisi saada ymmärtämään pelkkiä numeroita, eikä kirjaimia. Vielä parempi olisi että kirjaimia siihen ei voisi laittaa ollenkaan. Jos kirjaimia siihen kirjottaa, niin silloin pukkaa erroria. Onhan tämä nyt vähän noob kysymys, mutta apua tarvitseisin :D

2

290

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • Etsija vaihda

      Ainakin Pascalista (Delphi/Lazarus) löytyy sellainen kuin MaskEdit johon voi määritellä mitä merkkejä kyseinen komponentti lukee. On todennäköistä että myös VB:ssä on samantapainen Edit(text)-käyttöliittymäkomponentti jossa on tämä ominaisuus (eli etsi ja vaihda sopiva komponentti vanhan tilalle).

      • xxxxx

        On Visual Basicissakin tuo maskaus, mutta itse käytän Keypress-eventissä tarkastusta.

        Sivulla http://www.woodger.ca/vbsamp.htm on esimerkki:

        'this is brute-force method of limiting to number but mask is easier.
        Sub Text1_KeyPress (KeyAscii As Integer)
        If KeyAscii = 8 Then 'Allow BACKSPACE through
        Exit Sub
        End If
        'Only digits are valid characters.
        If Chr(KeyAscii) < "0" Or Chr(KeyAscii) > "9" Then
        KeyAscii = 0 'Set character to null if out of range
        Beep
        End If
        End Sub


    Ketjusta on poistettu 0 sääntöjenvastaista viestiä.

    Luetuimmat keskustelut

    1. Tällä kertaa Marinia kadehtii Minäminä Päivärinta

      Kokoomuksen tyhjäntoimittelija itkeä tuhertaa, kun kansainvälinen superstaramme ei leiki hänen kanssaan. Oikean puoluee
      Maailman menoa
      376
      1426
    2. Minua itkettää tämä tilanne

      Meidän pitäisi jutella. Eikö niin? Miehelle.
      Ikävä
      104
      1243
    3. Miksi koulut pakottavat

      Lapset uimaan sekaryhmänä? Murrosikäiset tunnetusti häpeilevät vartalossa tapahtuvia muutoksia. Tulee turhia poissaoloja
      Maailman menoa
      113
      1180
    4. Miksi jollain jää "talvi päälle"

      Huvittaa kastoa ullkona jotain vahempaa äijää joka pukeutuu edelleen kun olisi +5 astetta lämmittä vaikka on helle keli
      Maailman menoa
      158
      1052
    5. Mitkä oli suurimmat

      Syyt mihin hänessä ihastuit alussa ja pikkuhiljaa tunteiden edetessä
      Ikävä
      40
      930
    6. Minulla oli tunteita

      Tein itsestäni pellen. Sait hyvät naurut ja minä 💔
      Ikävä
      63
      876
    7. Se katse silloin

      Oli hetki, jolloin katseemme kohtasivat. Oli talvi vielä. Kerta toisensa jälkeen palaan tuohon jaettuun katseeseen. Tunt
      Ikävä
      32
      786
    8. Suomen Pallolitto: Tasoryhmät lasten jalkapallossa - Erätauko-tilaisuus ma 20.5.2024

      Tasoryhmät lasten ja nuorten jalkapallossa herättävät paljon keskustelua. Mitä tasoryhmät ovat ja mikä on niiden tarkoit
      Suomi24 Blogi ★
      0
      780
    9. Susanne Päivärinta kirjassaan: Sannalla nousi valta päähän, Big Time!

      Päivärinta toteaa ettei ole nähnyt kenenkään muuttuvan niin totaalisesti kuin Marinin, eikä siis todellakaan parempaan s
      Maailman menoa
      85
      767
    10. Tuhdit oluet kauppoihin. Miksi vastustaa?

      8% oluet kauppoihin mutta mikä siinä on että osa politikoista vstustaa ? Kauppa kuitenkin hinnoittelee vahvan oluen ni
      Maailman menoa
      166
      662
    Aihe