Funzioni di Conversione

Ecco una carrellata di funzioni di conversione:

Abs Restituisce il valore assoluto di un numero MyNumber = Abs(50.3)
Restituisce 50,3
MyNumber = Abs(-50.3)
Restituisce 50,3
CByte Converte in un sottotipo Byte MyDouble = 125.5678
MyDouble è un valore di tipo Double.
MyByte = CByte(MyDouble)
Il valore di MyByte è 126.
CDate Converte in un sottotipo Date MyDate = “October 19, 1962″
Definisce la data.
MyShortDate = CDate(MyDate)
Converte nel tipo di dati Date.
MyTime = “4:35:47 PM”
Definisce l’ora.
MyShortTime = CDate(MyTime)
Converte nel tipo di dati Date.
CDbl Converte in un sottotipo Double MyCurr = CCur(234.456784) 
MyCurr è un valore di tipo Currency (234.4567).
MyDouble = CDbl(MyCurr * 8.2 * 0.01)
Converte il risultato in un valore di tipo Double (19.2254576).
CInt Converte in un sottotipo Integer MyDouble = 2345.5678
MyDouble è un valore di tipo Double.
MyInt = CInt(MyDouble)
Il valore di MyInt è 2346.
CLng Converte in un sottotipo Long MyVal1 = 25427.45: MyVal2 = 25427.55
Sono valori di tipo Double.
MyLong1 = CLng(MyVal1)
Il valore di MyLong1 è 25427.
MyLong2 = CLng(MyVal2)
Il valore di MyLong2 è 25428.
CSng Converte in un sottotipo Single MyDouble1 = 75.3421115: MyDouble2 = 75.3421555
MySingle1 = CSng(MyDouble1) 
Il valore di MySingle1 è 75,34211.
MySingle2 = CSng(MyDouble2)
Il valore di MySingle2 è 75,34216.
CStr Converte in un sottotipo String MyDouble = 437.324
MyDouble è un valore di tipo Double.
MyString = CStr(MyDouble)
Il valore di MyString è “437,324″.
Fix Restituisce la parte intera di un numero MyNumber = Fix(99.2)
Restituisce 99.
MyNumber = Fix(-99.8)
Restituisce -99.
MyNumber = Fix(-99.2)
Restituisce -99.
Hex Restituisce la stringa che rappresenta il valore esadecimale di un numero MyHex = Hex(5)
Restituisce 5.
MyHex = Hex(10)
Restituisce A.
MyHex = Hex(459)
Restituisce 1CB.
Int Restituisce la parte intera di un numero MyNumber = Int(99.8) ‘ Restituisce 99
MyNumber = Int(-99.8) ‘ Restituisce -100
MyNumber = Int(-99.2) ‘ Restituisce -100.
Oct Restituisce una stringa che rappresenta il valore ottale di un numero MyOct = Oct(4) ‘ Restituisce 4.
MyOct = Oct(8) ‘ Restituisce 10.
MyOct = Oct(459) ‘ Restituisce 713
Round Arrotonda ad un numero di decimali specificato Dim MyVar, pi
pi = 3.14159
MyVar = Round(pi, 2) ‘ Il valore di MyVar è 3,14
Sgn Restituisce un intero che rappresenta il segno di un numero MyVar1 = 12: MyVar2 = -2.4: MyVar3 = 0
MySign = Sgn(MyVar1) ‘ Restituisce 1.
MySign = Sgn(MyVar2) ‘ Restituisce -1.
MySign = Sgn(MyVar3) ‘ Restituisce 0.
Both comments and pings are currently closed.

Comments are closed.