Toon posts:

geheel getal

Pagina: 1
Acties:
  • 142 views sinds 30-01-2008

Verwijderd

Topicstarter
Ik ben op zoek naar een manier om in ASP/vbScript te controleren of een nummer een geheel getal is d.m.v. een boolean

WaardeGeheel getal?
10True
10,5False
300True
999,12314False


Iemand een idee?

  • Murcielago
  • Registratie: September 2003
  • Laatst online: 02-04 18:13
iets met mod?

PSN: djmurcielago


Verwijderd

Heb je hier wat aan? http://www.codecomments.com/archive299-2004-4-182840.html

code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
msgbox isInt("23.3")
msgbox isInt(23.42)
msgbox isInt("fourtytwo")
msgbox isInt(23)
msgbox isInt("42")
msgbox isInt("&H100")
msgbox isInt("-100")
msgbox isInt(ScriptEngineBuildVersion)

Function isInt (val)
Dim dblVal
If isNumeric(val) Then
If VarType (val) = vbString Then _
Execute "dblVal = CDbl( " & val & ")" _
Else dblVal = CDbl(val)
isInt = CInt(dblVal) = dblVal
Else
isInt = False
End if
End function

  • Gonadan
  • Registratie: Februari 2004
  • Laatst online: 20:13

Gonadan

Admin Beeld & Geluid, Harde Waren
Maak er een string van en zoek op de komma.

Of met modulo 1 inderdaad, als je dan niet op 0 uit komt is het geen geheel getal.

Look for the signal in your life, not the noise.

Canon R6 | RF 24-70 f/2.8 L | 50 f/1.8 STM | 430EX II
Sigma 85 f/1.4 Art | 100-400 Contemporary
Zeiss Distagon 21 f/2.8


  • Ciqniz
  • Registratie: Oktober 2002
  • Laatst online: 07-09-2023

Ciqniz

On the move...

Een hele simpele manier is,

Visual Basic:
1
If Len(Replace(CStr(Getal), ".", "")) < Len(CStr(Getal)) Then HeelGetal = False


Uiteraard wel een vieze manier.

[ Voor 16% gewijzigd door Ciqniz op 15-02-2006 16:09 ]


  • BraveWorld
  • Registratie: September 2001
  • Niet online
IsGeheelGetal = (AfgerondGetal == OrigineelGetal)

Dit is geen signature...


  • Ciqniz
  • Registratie: Oktober 2002
  • Laatst online: 07-09-2023

Ciqniz

On the move...

BraveWorld schreef op woensdag 15 februari 2006 @ 16:08:
IsGeheelGetal = (AfgerondGetal == OrigineelGetal)
Visual Basic:
1
If Getal <> Round(Getal, 0) Then HeelGetal = False


Zoiets, helemaal niet meer aan gedacht :)

  • NMe
  • Registratie: Februari 2004
  • Laatst online: 17:49

NMe

Quia Ego Sic Dico.

Dit is dus niet de bedoeling hier. Ik mis hier een hele lading eigen inzet. Je geeft niet aan wat je zelf al geprobeerd hebt om tot een oplossing te komen, en dus is dit alleen maar te interpreteren als een scriptrequest, en die hoeven we hier niet. ;) Lees meteen ook Algemene gedragsregels (Netiquette) even door, en daarna P&W FAQ - De "quickstart", want dergelijke topics zijn eigenlijk overal op GoT ongewenst.

'E's fighting in there!' he stuttered, grabbing the captain's arm.
'All by himself?' said the captain.
'No, with everyone!' shouted Nobby, hopping from one foot to the other.

Pagina: 1

Dit topic is gesloten.