Dvojitý variabilní typ
VBA Dvojnásobek datový typ se používá k ukládání čísel, která vyžadují desetinná místa. Může ukládat od -1,79769313486231E308 do -4,94065645841247E -324 pro záporné hodnoty a 4,94065645841247E -324 až 1,79769313486232E308 pro kladné hodnoty.
Chcete -li deklarovat proměnnou Double, použijte příkaz Dim (zkratka pro Dimension):
| 1 | Dim dblA jako Double |
Potom k přiřazení hodnoty proměnné jednoduše použijte znaménko rovnosti:
| 1 | dlbA = 3658,25 |
Uvedení do postupu vypadá takto:
| 12345678 | Sub dblExample ()'deklarujte dvojitou proměnnouDim dblA jako Double'naplňte dvojitou proměnnoudblA = 3658,25'zobrazit pole se zprávouMsgBox dblAEnd Sub |
Pokud spustíte výše uvedený kód, zobrazí se následující okno se zprávou.
Jeden datový typ
Datový typ Single je pouze kratší verzí datového typu Double. Vzhledem k této skutečnosti může ovlivnit zaokrouhlení při použití v proceduře, protože jeden datový typ se zaokrouhlí na 4 desetinná místa, zatímco typ dat Double zaokrouhlí na 12 desetinných míst. Pokud nepotřebujete datový typ Double, můžete použít datový typ Single
Interní nebo dlouhé datové typy
Pokud nepotřebujete desetinné místo, můžete použít datový typ Int nebo datový typ Long.
| 1 | Dim intA jako Integer |
| 1 | Dim lngB as Long |
Deklarujte dvojitou proměnnou na úrovni modulu nebo na globální úrovni
V předchozích příkladech jsme deklarovali proměnnou Double v proceduře. Proměnné deklarované pomocí procedury lze použít pouze v rámci této procedury.
Místo toho můžete deklarovat Double proměnné na úrovni modulu nebo na globální úrovni.
Úroveň modulu
Úroveň modulu proměnné jsou deklarovány v horní části modulů kódu pomocí Ztlumit tvrzení.
Tyto proměnné lze použít s jakoukoli procedurou v tomto modulu kódu.
Globální úroveň
Globální úroveň proměnné jsou také deklarovány v horní části modulů kódu. Místo použití Ztlumit prohlášení, použijte Veřejnost prohlášení, které naznačuje, že proměnná Double je k dispozici pro použití v celém vašem projektu VBA.
| 1 | Veřejné DblA jako Double |
Pokud byste deklarovali dvojitou proměnnou na úrovni modulu a poté ji zkusili použít v jiném modulu, došlo by k chybě.
Pokud byste k deklaraci dvojité proměnné použili klíčové slovo Public, k chybě by nedošlo a procedura by proběhla perfektně.
Formát dvakrát uložen jako řetězec
Může nastat čas, kdy budete chtít formátovat dvojitý datový typ na řetězec - například budete chtít zobrazit symbol měny a zaokrouhlit číslo na 2 desetinná místa.
Chcete -li toho dosáhnout, použijte funkci Formát.
Následující postup
| 1234567891011 | Dílčí testDoubleToCurrencyString ()'deklarujte proměnnou řetězceDim strMoney As String'deklarujte dvojnásobek a naplňte hodnotu.'Dim dblValue as DoubledblValue = 44055.256'převeďte dvojník na řetězec se symbolem měny se 2 desetinnými místystrMoney = Formát (dblValue, "$#, ## 0,00")'zobrazit výsledekMsgBox strMoneyEnd Sub |
vrátí tento výsledek:
Podobně můžete chtít zobrazit číslo jako formátované telefonní číslo.
Tento postup:
| 1234567891011 | Dílčí testDoubleToPhone ()'deklarujte proměnnou řetězceDim strPhone jako řetězec'deklarujte dvojnásobek a naplňte hodnotu.'Dim dblValue as DoubledblValue = 555968541'převeďte dvojníka na řetězec se symbolem měny.'strPhone = Formát (dblValue, "(000) -000 0000")'zobrazit výsledekMsgBox strPhoneEnd Sub |
vrátí tento výsledek:
