Miten katson onko muuttuja merkki ???
Osaan kyl kattoo onko numero, mut miten katotaan onko merkki (kirjain) ?
IsNumeric(numero)
??????????(kirjain)
Osaan kyl kattoo onko numero, mut miten katotaan onko merkki (kirjain) ?
IsNumeric(numero)
??????????(kirjain)
Vastaukset 6
Vanhimmat
Tuolla IsNumeric() funktiolla.
Jos arvo on numeerinen, ei siis sisällä merkkejä, se palauttaa arvon True,
jos siinä on merkki, tai merkkejä, arvo on False.
Vaikkapa näin.
Text1.Text = "1234"
Print IsNumeric(Text1.Text)
(tulostuu "True"
Text1.Text = "abcd"
Print IsNumeric(Text1.Text)
(tulostuu "False")
Kiitti, niinpä tietysti :). Jatkokysymys: miten tarkistan onko kokonaisluku?
Jos numeerisen muuttujan määrittelee Integer, se on kokonaisluku, sen arvoksi voi kyllä antaa vaikka 1.123, mutta tulostettaessa se on kuitenkin 1, eli desimaaliosa katoaa.
Siksi tarvitaan määrittelyä Double jos halutaan käsitellä desimaalilukuja.
Kokeile näin:
Dim luku1 As Integer
Dim luku2, luku3 As Double
Private Sub Command1_Click()
Print "luku1 = " & luku1 & " kokonaislukuesityksenä se on " & Int(luku1)
Print "luku2 = " & luku2 & " kokonaislukuesityksenä se on " & Int(luku2)
Print "luku3 = " & luku3 & " kokonaislukuesityksenä se on " & Int(luku3)
Print
'tutkitaan onko luku2 kokonaisluku ottamalla siitä Int-funktiolla kokonaislukuarvo
'ja vertaamalla saatua arvoa alkuperäiseen lukuun
If Int(luku2) = luku2 Then Print "luku2 on kokonaisluku"
If Int(luku2) luku2 Then Print "luku2 ei ole kokonaisluku"
End Sub
Private Sub Form_Load()
luku1 = 1.234
luku2 = 12.34
luku3 = 123
End Sub
Dim i As Integer
Dim d As Double
Dim s As Single
Dim l As Long
MsgBox TypeName(i) & ", " & VarType(i)
MsgBox TypeName(d) & ", " & VarType(d)
MsgBox TypeName(s) & ", " & VarType(s)
MsgBox TypeName(l) & ", " & VarType(l)
ex_vbguruksi.
Joo, eihän sitä ole viitsinyt opetella VB:sta kuin jotain.
Tuo VarType -funktiokin on ollut näkymättömissä ja noin hyvä "kätsä" judanssi oli.
Kiitos.
>sitä ole viitsinyt opetella VB:sta kuin jotain
kukapa sitä kaikkia kirjastoja luokkineen ja funktioineen ulkoa muistaa. sitä varten on helpit ja manuaalit.