Sisältö - Muuttujatyypit - Single
Single luokka
Esimerkkejä luokan
käytöstä.
Dim s, r As Single
Dim Tulos As Integer
Dim Totuus As Boolean
Dim Teksti As String
s = 3 : r = 5
'
' Vertailu
Tulos = s.CompareTo(r)
' Yhtäsuuruus
Totuus = s.Equals(r)
' Tiiviste koodi
Tulos = s.GetHashCode()
' tyyppi
If s.GetType() Is Tulos.GetType Then s = 4
' tyyppikoodi
Dim tc As System.TypeCode = s.GetTypeCode()
' Suurin numeroarvo
s = Single.MaxValue
' Pienin numeroarvo
s = Single.MinValue
' tekstistä numeroksi
s = Single.Parse("543")
' numerosta tekstiksi
Teksti = s.ToString
'
' pienin mahdollinen positiivinen luku
s = Single.Epsilon
' ei numero
s = Single.NaN
' testaa onko ei-numero
Totuus = Single.IsNaN(s)
' onko ääretön
Totuus = Single.IsInfinity(s)
' onko negatiivinen ääretön
Totuus = Single.IsNegativeInfinity(s)
' onko negatiivinen ääretön
Totuus = Single.IsPositiveInfinity(s)
' vakio negatiivinen ääretön
s = Single.NegativeInfinity
' vakio positiivinen ääretön
s = Single.PositiveInfinity