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

376

    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. Hyvää syntymäpäivää Sanna 40 vee!!!!

      ᕼᗩᑭᑭY ᗷIᖇTᕼᗞᗩY Sister ❣️🥰 🎉🎂✨🍰🥳 🥳🎂🥂 🎉🎊🎁🎈🎂
      Maailman menoa
      58
      5080
    2. Suomen kaksikielisyys - täyttä huuhaata

      Eivätkö muuten yksilöt pysty arvioimaan mitä kieliä he tarvitsevat? Ulkomaalaiselle osaajalle riittää Suomessa kielitai
      Maailman menoa
      54
      4582
    3. Työeläkeloisinta 27,5 mrd. per vuosi

      Tuo kaikki on pois palkansaajien ostovoimasta. Ja sitten puupäät ihmettelee miksei Suomen talous kasva. No eihän se kas
      Maailman menoa
      122
      4519
    4. Mikä on vaikeinta siinä, että menetti yhteyden kaivattuun, jota vielä ajattelee?

      Mikä jäi kaihertamaan? Jos jokin olisi voinut mennä toisin, mitä se olisi ollut? Mitä olisit toivonut vielä ehtiväsi san
      Ikävä
      296
      1737
    5. 91
      1412
    6. Kerro kaivattusi etunimi

      Miehille..
      Ikävä
      81
      1368
    7. Sulla on mies

      Aivan liikaa naisia.
      Ikävä
      228
      1328
    8. 313
      1036
    9. Kadutko mitään?

      Minä kadun ikävässä kirjoittamista, mutta en saa sitä tekemättömäksi.
      Sinkut
      199
      950
    10. Pääsit koskettamaan

      Sellaista osaa minussa jota kukaan ei ole ennen koskettanut. Siksi on hyvin vaikea unohtaa sinut kokonaan.
      Ikävä
      50
      850
    Aihe