Ecco una carrellata di funzioni di conversione:
Abs | Restituisce il valore assoluto di un numero |
MyNumber = Abs(50.3) |
CByte | Converte in un sottotipo Byte |
MyDouble = 125.5678 |
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 |
CLng | Converte in un sottotipo Long |
MyVal1 = 25427.45: MyVal2 = |
CSng | Converte in un sottotipo Single |
MyDouble1 = 75.3421115: MyDouble2 |
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. |