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

386

    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. 20v on otettu kiinni

      Tulipalo oli sytytetty joten murhasiko ex omat lapsensa ja heidän Äidin. Tuskin sitä kukaan ohikulkijakaan sytytti.
      Savonlinna
      129
      8835
    2. Somali ei kätellyt Stubbia Linnan juhlissa

      Miksei somali osaa noudattaa hyviä käytöstapoja. https://www.iltalehti.fi/viihdeuutiset/a/563a3dea-fa3f-41f3-b64f-406d2
      Maailman menoa
      673
      5214
    3. Kuka on menehtynyt?

      https://yle.fi/a/74-20198293 Kuulemani mukaan ryyppyporukka ollut hapualla ja kuolemanenkeli (F.G) eli mies jonka seuras
      Kankaanpää
      26
      3516
    4. Mitä meidän välillä

      Tapahtuu lopulta?
      Ikävä
      36
      2414
    5. Savonlinan perhesurma, epäilty mies romani, äiti kantaväestöä

      https://www.is.fi/kotimaa/art-2000011676508.html Savonlinnan seudun romaniyhdistyksestä kerrottiin lauantaina IS:lle, e
      Maailman menoa
      128
      1734
    6. 62
      1667
    7. Savonlinnan murhapolttaja romani

      Ainakin IS kertoo. Arvasin heti ettei ole normi valkolainen suomalainen.
      Maailman menoa
      210
      1501
    8. Nainen, ota nyt rauhallisesti

      Älä ota kaiken maailman murheita päällesi. Sulla on tapana ottaa elämä liian vakavasti. Ei aina, mutta joskus menee vähä
      Ikävä
      138
      1387
    9. Ajattelen sinua kiitollisuudella

      Olet minulle jotain kaunista, jotain, joka tapahtui elämässäni. Et ole minulle pakkomielle enkä vaadi sinulta yhtään mi
      Ikävä
      60
      1139
    10. Ei me taideta

      Pystyä kokonaan olemaan erossa.
      Ikävä
      23
      1111
    Aihe