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

359

    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. Laitetaas nyt kirjaimet tänne

      kuka kaipaa ja ketä ?
      Ikävä
      89
      7295
    2. Pieni häivähdys sinusta

      Olet niin totinen
      Ikävä
      38
      3449
    3. Lähetä terveisesi kaipaamallesi henkilölle

      Vauva-palstalta tuttua kaipaamista uudessa ympäristössä. Kaipuu jatkukoon 💘
      Ikävä
      102
      1826
    4. Missä olet ollut tänään kaivattuni?

      Ikävä sai yliotteen ❤️ En nähnyt sua tänään söpö mies
      Ikävä
      24
      970
    5. Valtimon Haapajärvellä paatti mäni nurin

      Ikävä onnettomuus Haapajärvellä. Vene hörpppi vettä matkalla saaren. Veneessä ol 5 henkilöä, kolme uiskenteli rantaan,
      Nurmes
      27
      891
    6. Taas ryssittiin oikein kunnolla

      r….ä hyökkäsi Viroon sikaili taas ajattelematta yhtään mitään https://www.is.fi/ulkomaat/art-2000011347289.html
      NATO
      32
      863
    7. Rakastuminenhan on psykoosi

      Ei ihme että olen täysin vailla järkeä sen asian suhteen. Eipä olis aikoinaan arvannut, että tossa se tyyppi menee, jonk
      Ikävä
      48
      773
    8. Tähän vaivaan ei auta kuin kaksi asiaa

      1. Tapaaminen uudestaan tai 2. Dementia Anteeksi kun olen olemassa🙄
      Ikävä
      60
      719
    9. Olisinko mä voinut käsittää sut väärin

      Nyt mä kelaan päässäni kaikkea meidän välillä tapahtunutta. Jos mä sit kuitenkin tulkitsin sut väärin? Se, miten sä käyt
      Ikävä
      29
      686
    10. Känniläiset veneessä?

      Siinä taas päästiin näyttämään miten tyhmiä känniläiset on. Heh heh "Kaikki osalliset ovat täysi-ikäisiä ja alkoholin v
      Nurmes
      26
      642
    Aihe