Funkcije za konverziju tipa

Svaka funkcija menja izraz na određenu tip podatka.

Sintaksa

CBool( izraz )

CByte( izraz )

CCur( izraz )

CDate( izraz )

CDbl( izraz )

CDec( izraz )

CInt( izraz )

CLng( izraz )

CSng( izraz )

CStr( izraz )

CVar( izraz )

Obavezni argument je bilo koji izraz niske ili brojni izraz.

Tipovi povraćaja

Ime funkcije određuje tip povraćaja kao što je prikazano u sledećem:

Funkcija	Tip povraćaja	Opseg za argument izraza
CBool	Bulov	Bilo koja važeća niska ili numerički izraz.
CByte	bajt	Od 0 do 255.
CCur	Valuta	-922.337.203.685.477,5808 do 922.337.203.685.477,5807.
CDate	Datum	Bilo koji važeći izraz datuma.
CDbl	Double	-1.79769313486231E308 do -4,94065645841247E-324 za negativne vrednosti; 4,94065645841247E-324 do 1,79769313486232E308 za pozitivne vrednosti.
CDec	Decimalni broj	+/-79.228.162.514.264.337.593.543.950.335 za nulte brojeve, to jesti brojeve bez decimalnih mesta. Za brojeve sa 28 decimalnih mesta, opseg je +/-7.9228162514264337593543950335. Najmanji mogući broj koji nije nula jeste 0,0000000000000000000000000001.
CInt	Ceo broj	-32.768 do 32.767; Razlomci se zaokružuju.
CLng	Dugo	-2.147.483.648 do 2.147.483.647; Razlomci se zaokružuju.
CSng	Single	-3,402823E38 do -1,401298E-45 za negativne vrednosti; Od 1,401298E-45 do 3,402823E38 za pozitivne vrednosti.
CStr	String	Rezultati za CStr zavise od argumenta izraza .
CVar	Varijante	Isti opseg kao tip podataka Dvostruki za brojeve. Isto opseg kao tip podataka Niska za nenumeričke vrednosti.

Napomene

Ako je izraz prosleđen funkciji izvan opsega tipa podataka koji se konvertuje, dolazi do greške.

Uopšte uzev, kôd možete da dokumentujte koristeći funkcije za konverziju tipa podataka da biste prikazali da rezultat neke operacije treba da bude izražen u određenom tipu podataka, a ne kao podrazumevani tip podataka. Na primer, koristite CCur da biste nametnuli aritmetiku valute u slučajevima kada obično dolazi do aritmetike jednostruke preciznosti, dvostruke preciznosti ili celobrojne aritmetike.

Trebalo bi da koristite funkcije konverzije tipa podataka umesto funkcije Val da biste obezbedili konverzije sa međunarodne strane iz jednog tipa podataka u drugi. Na primer, kada koristite CCur, različiti znaci za razdvajanje decimala, različiti znakovi za razdvajanje hiljada i različite opcije valute ispravno se prepoznaju u zavisnosti od postavke lokalnog standarda računara.

Kada je razlomljeni deo tačno 0,5, CInt i CLng uvek ga zaokruže na najbliži paran broj. Na primer, 0,5 zaokružuje na 0, a 1,5 zaokružuje na 2. CInt i CLng se razlikuju od funkcija Fix i Int , koje skraćuju, a ne zaokružuju razlomljeni deo broja. Isto tako , fixi Int uvek vraćaju vrednost istog tipa kao što je prosleđeno.

Koristite funkciju IsDate da biste utvrdili da li datum može da se konvertuje u datum ili vreme. CDate prepoznaje literale datuma i literale vremena, kao i neke brojeve koji spadaju u opseg prihvatljivih datuma. Prilikom konvertovanja broja u datum, ceo deo brojeva se konvertuje u datum. Bilo koji razlomak broja se konvertuje u vreme dana, počevši od ponoći.

CDate prepoznaje formate datuma u lokalni postavke sistema. Nije moguće utvrditi ispravan redosled dana, meseca i godine ako je obezbeđen u formatu različitom od jedne od prepoznatih postavki datuma. Pored toga, dugačak format datuma nije prepoznat ako takođe sadrži nisku dana u sedmici.

Funkcija CVDate je takođe obezbeđena zbog kompatibilnosti sa prethodnim verzijama programa Visual Basic. Sintaksa funkcije CVDate je identična funkciji CDate, ali CVDate vraća varijantu čiji je podtip Datum umesto stvarnog tipa datuma. Buduci da sada postoji neki spoljni tip datuma, više nema potrebe za CVDate. Isti efekat se može postići konvertovanjem izraza u datum, a zatim dodeljivanjem varijanti. Ova tehnika je u skladu sa konverzijom svih drugih intrinsnih tipova u njihove podtipove varijanta.

Napomena: Funkcija CDec ne daje diskretni tip podataka; umesto toga, uvek vraća varijantu čija je vrednost konvertovana u decimalni podtip.

Primeri upita

Izraz	Rezultati
SELECT SalePrice,FinalPrice,CBool(SalePrice>FinalPrice) AS Izraz1 FROM prodaja proizvoda;	Daje "SalePrice", "FinalPrice" i procenjuje da li je ProdajaCena veća od konačne cene. Daje "-1" ako je true i "0" ako je netačno.
SELECT ProductID, CByte(Količina) AS Izraz1 FROM Prodaja proizvoda;	Daje "ID proizvoda", konvertuje vrednosti u polju "Količina" u format bajtova i prikazuje u koloni Izraz1 Daje "ID proizvoda", konvertuje vrednosti iz polja "Količina" u format valute i prikazuje se u koloni Izraz1.
SELECT ProductID, CDate(DateofSale) AS Izraz1 FROMProdajaProdaja;	Daje "ID proizvoda", konvertuje vrednosti iz polja "DateofSale" u format datuma i prikazuje u koloni Izraz1.
SELECT ProductID, CDbl(Discount) AS Expr1 FROM ProductSales;	Daje "ID proizvoda", konvertuje vrednosti u polju "Popust" u dvostruki format i prikazuje se u koloni Izraz1.
SELECT ProductID, CInt(Discount) AS Expr1 FROM ProductSales;	Daje "ID proizvoda", konvertuje vrednosti u polju "Popust" u format celog broja i prikazuje se u koloni Izraz1.
SELECT ProductID, CLng(Discount) AS Expr1 FROM ProductSales;	Daje "ID proizvoda", konvertuje vrednosti u polju "Popust" u dugački format i prikazuje u koloni Izraz1.
SELECT ProductID, CSng(Discount) AS Expr1 FROM ProductSales;	Daje "ID proizvoda", konvertuje vrednosti u polju "Popust" u jednostruki format i prikazuje se u koloni Izraz1.
SELECT ProductID, CStr(Discount) AS Expr1 FROM ProductSales;	Daje "ID proizvoda", konvertuje vrednosti u polju "Popust" u format niske i prikazuje se u koloni Izraz1.
SELECT ProductID, CVar(Discount) AS Expr1 FROM ProductSales;	Daje "ID proizvoda", konvertuje vrednosti u polju "Popust" u "Dvostruki" za numeričke vrednosti i nisku za vrednosti koje nisu numeričke.

VBA primeri

Napomena: Primeri koji slede pokazuju upotrebu ove funkcije u Visual Basic for Applications (VBA) modulu. Više informacija o radu sa VBA programom potražite u članku Access VBA referenca.

Funkcija "CBool"

Ovaj primer koristi funkciju CBool za konvertovanje izraza u Bulovu vrednost. Ako izraz kao rezultat daje vrednost koja nije zero, funkcija CBool vraća vrednost True; u suprotnom, daje False.

Dim A, B, Check
A = 5: B = 5    ' Initialize variables.
Check = CBool(A = B)    ' Check contains True.
A = 0    ' Define variable.
Check = CBool(A)    ' Check contains False.

Funkcija CByte

Ovaj primer koristi funkciju CByte za konvertovanje izraza u bajt.

Dim MyDouble, MyByte
MyDouble = 125.5678    ' MyDouble is a Double.
MyByte = CByte(MyDouble)    ' MyByte contains 126.

Funkcija "CCur"

Ovaj primer koristi funkciju CCur za konvertovanje izraza u valutu.

Dim MyDouble, MyCurr
MyDouble = 543.214588    ' MyDouble is a Double.
MyCurr = CCur(MyDouble * 2)    
' Convert result of MyDouble * 2 (1086.429176) to a 
' Currency (1086.4292).

Funkcija "CDate"

Ovaj primer koristi funkciju CDate za konvertovanje niske u datum. Obično se ne preporučuje čvrsto kodiranje datuma i vremena kao niski (kao što je prikazano u ovom primeru). Umesto toga koristite literale datuma i vremenske literale, kao što su #12/1969# i #4:45:23 PM#.

Dim MyDate, MyShortDate, MyTime, MyShortTime
MyDate = "February 12, 1969" 
' Convert to Date data type.
MyShortDate = CDate(MyDate)
MyTime = "4:35:47 PM" 
' Convert to Date data type.
MyShortTime = CDate(MyTime)

Funkcija "CDbl"

Ovaj primer koristi funkciju CDbl za konvertovanje izraza u tip podataka Dvostruki.

Dim MyCurr, MyDouble
MyCurr = CCur(234.456784)
' Convert result to a Double.
MyDouble = CDbl(MyCurr * 8.2 * 0.01)

Funkcija "CDec"

Ovaj primer koristi funkciju CDec za konvertovanje numeričke vrednosti u decimalnu vrednost.

Dim MyDecimal, MyCurr
MyCurr = 10000000.0587    ' MyCurr is a Currency.
MyDecimal = CDec(MyCurr)     ' MyDecimal is a Decimal.

Funkcija "CInt"

Ovaj primer koristi funkciju CInt za konvertovanje vrednosti u ceo broj.

Dim MyDouble, MyInt
MyDouble = 2345.5678    ' MyDouble is a Double.
MyInt = CInt(MyDouble)    ' MyInt contains 2346.

Funkcija "CLng"

Ovaj primer koristi funkciju CLng za konvertovanje vrednosti u dugačku vrednost.

Dim MyVal1, MyVal2, MyLong1, MyLong2
MyVal1 = 25427.45
MyVal2 = 25427.55  ' MyVal1, MyVal2 are Doubles.
MyLong1 = CLng(MyVal1)
' MyLong1 contains 25427.
MyLong2 = CLng(MyVal2)
' MyLong2 contains 25428.

Funkcija CSng

Ovaj primer koristi funkciju CSng za konvertovanje vrednosti u jednostruki.

Dim MyDouble1, MyDouble2, MySingle1, MySingle2
' MyDouble1, MyDouble2 are Doubles.
MyDouble1 = 75.3421115: MyDouble2 = 75.3421555
MySingle1 = CSng(MyDouble1)
' MySingle1 contains 75.34211.
MySingle2 = CSng(MyDouble2)
' MySingle2 contains 75.34216.

Funkcija "CStr"

Ovaj primer koristi funkciju CStr za konvertovanje numeričke vrednosti u nisku.

Dim MyDouble, MyString
MyDouble = 437.324    ' MyDouble is a Double.
MyString = CStr(MyDouble)
' MyString contains "437.324".

Funkcija "CVar"

Ovaj primer koristi funkciju CVar za konvertovanje izraza u varijantu.

Dim MyInt, MyVar
MyInt = 4534    ' MyInt is an Integer.
MyVar = CVar(MyInt & "000") 
' MyVar contains the string 4534000.