Keskustelu: Ohjelmointikysymykset: VB6: Visual basic 6

Pystyykö InputBox:ista kattoon mitä siihen on syötetty? Tarkoitan, että jos InputBox:iin syöttää aakkosen niin ohjelma valittaa siittä ja pyytää syöttämään uudestaan ja kun taas numeron ohjelma jatkaa eteenpäin.

Ohjelman pitäsis katsoa onko syötetty kirjain (virheilmoitus, ja pitää syöttää uudestaan) vai numeroa (ohjelma jatkaa eteenpäin)
Esim. koodista

maara = InputBox("Anna määrä", "Määrä")

Kiitos kaikille vastaajille!

1 juttu=inputbox("anna jotain")
if (juttu>="0")and(juttu<="9") then msgbox "Vain numeroi!":goto 1
nih ja huono otsikko...

Esimerkiksi IsNumeric-funktion avulla voi tarkistaa, onko muuttujan arvo numeerinen. Tässä on esimerkki, joka kysyy käyttäjältä numeroa aina vain uudestaan niin kauan kunnes käyttäjä oikeasti kirjoittaa numeron. Tämän jälkeen numero tallennetaan kokonaislukumuuttujaan.

Dim luettu As String, numero As Integer
Do
    luettu = InputBox("Kirjoita numero:")
'"palaa alkuun kunnes luettu on numeerinen"
Loop Until IsNumeric(luettu)
numero = Val(luettu)