Nessun risultato. Prova con un altro termine.
Guide
Notizie
Software
Tutorial

Funzioni di Conversione

Le Funzioni di Conversione di VBscript per la gestione delle operazioni complesse: sintassi ed utilizzo
Le Funzioni di Conversione di VBscript per la gestione delle operazioni complesse: sintassi ed utilizzo
Link copiato negli appunti

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.


Ti consigliamo anche