8 lines
176 B
VB.net
8 lines
176 B
VB.net
|
Dim PlusInfinity as Double
|
||
|
|
Dim MinusInfinity as Double
|
||
|
|
Dim IndefiniteNumber as Double
|
||
|
|
On Error Resume Next
|
||
|
|
PlusInfinity = 1 / 0
|
||
|
|
MinusInfinity = -1 / 0
|
||
|
|
IndefiniteNumber = 0 / 0
|