एकल चर प्रकार
वीबीए एकल डेटा प्रकार का उपयोग उन संख्याओं को संग्रहीत करने के लिए किया जाता है जिनके लिए दशमलव स्थानों की आवश्यकता होती है। यह नकारात्मक मूल्यों के लिए -3.4028235E+38 से -1.401298E-45 तक और सकारात्मक मूल्यों के लिए 1.401298E-45 से 3.4028235E+38 तक स्टोर कर सकता है।
एकल चर घोषित करने के लिए, आप डिम स्टेटमेंट (आयाम के लिए छोटा) का उपयोग करते हैं:
| 1 | सिंगल के रूप में डिम एसएनजीए |
फिर, एक चर के लिए एक मान निर्दिष्ट करने के लिए, बस बराबर चिह्न का उपयोग करें:
| 1 | एसएनजीए = 3658.25 |
इसे एक प्रक्रिया में रखना इस तरह दिखता है:
| 12345678 | उप एसएनजी उदाहरण ()'डबल वैरिएबल घोषित करें'सिंगल के रूप में डिम एसएनजीए'डबल वेरिएबल को पॉप्युलेट करें'एसएनजीए = 3658.25'संदेश बॉक्स दिखाएं'MsgBox sngAअंत उप |
यदि आप ऊपर दिए गए कोड को चलाते हैं, तो निम्न संदेश बॉक्स दिखाया जाएगा।
डबल डेटा प्रकार
डबल डेटा प्रकार का सिर्फ एक लंबा संस्करण है एकल डाटा प्रकार। इस तथ्य के कारण, यह एक प्रक्रिया में उपयोग किए जाने पर गोलाई को प्रभावित कर सकता है: एकल डेटा प्रकार 4 दशमलव स्थानों पर होगा, जबकि दोहरा डेटा प्रकार 12 दशमलव स्थानों तक होगा। यदि आपको 4 से अधिक दशमलव स्थानों की आवश्यकता है, तो आप डबल डेटा प्रकार का उपयोग कर सकते हैं।
इंट या लांग डेटा प्रकार
यदि आपको दशमलव स्थान की आवश्यकता नहीं है, तो आप या तो इंट डेटा प्रकार या लंबे डेटा प्रकार का उपयोग कर सकते हैं।
| 1 | पूर्णांक के रूप में मंद intA |
| 1 | मंद lngB के रूप में Long |
वीबीए प्रोग्रामिंग | कोड जेनरेटर आपके लिए काम करता है!
मॉड्यूल या वैश्विक स्तर पर एकल चर घोषित करें
पिछले उदाहरणों में, हमने घोषित किया है एकल एक प्रक्रिया के भीतर परिवर्तनशील। एक प्रक्रिया के साथ घोषित चर का उपयोग केवल उस प्रक्रिया के भीतर ही किया जा सकता है।
इसके बजाय, आप मॉड्यूल या वैश्विक स्तर पर एकल चर घोषित कर सकते हैं।
मॉड्यूल स्तर
मॉड्यूल स्तर कोड मॉड्यूल के शीर्ष पर चर घोषित किए जाते हैं धुंधला बयान।
इन चरों का उपयोग उस कोड मॉड्यूल में किसी भी प्रक्रिया के साथ किया जा सकता है।
वैश्विक स्तर
वैश्विक स्तर कोड मॉड्यूल के शीर्ष पर चर भी घोषित किए जाते हैं। हालांकि, का उपयोग करने के बजाय धुंधला कथन, का उपयोग करें सह लोक यह इंगित करने के लिए कथन कि एकल वेरिएबल आपके वीबीए प्रोजेक्ट में उपयोग करने के लिए उपलब्ध है।
| 1 | एकल के रूप में सार्वजनिक SngA |
यदि आप घोषित करने वाले थे एकल एक मॉड्यूल स्तर पर चर और फिर इसे एक अलग मॉड्यूल में उपयोग करने का प्रयास करें, एक त्रुटि होगी।
हालाँकि, यदि आपने सार्वजनिक कीवर्ड का उपयोग घोषित करने के लिए किया था एकल चर, त्रुटि नहीं होगी और प्रक्रिया पूरी तरह से चलेगी।
VBA कोड उदाहरण खोज कर थक गए हैं? ऑटोमैक्रो का प्रयास करें!
स्ट्रिंग के रूप में एकल संग्रहीत प्रारूपित करें
एक समय हो सकता है जब आप एक एकल डेटा प्रकार को एक स्ट्रिंग में प्रारूपित करना चाहते हैं - उदाहरण के लिए आप एक मुद्रा प्रतीक प्रदर्शित करना चाहते हैं और संख्या को 2 दशमलव स्थानों पर गोल कर सकते हैं।
इसे प्राप्त करने के लिए, आप प्रारूप फ़ंक्शन का उपयोग करते हैं।
निम्नलिखित प्रक्रिया
| 1234567891011 | उप टेस्टसिंगलटोक्यूरेंसीस्ट्रिंग ()'स्ट्रिंग वैरिएबल घोषित करें'स्ट्रिंग के रूप में मंद strMoney'एकल घोषित करें और मान को पॉप्युलेट करें'मंद sngValue एकल के रूप मेंsngValue = ४४०५५.२५६'सिंगल को 2 दशमलव स्थानों के साथ मुद्रा प्रतीक के साथ स्ट्रिंग में कनवर्ट करें'strMoney = प्रारूप (sngValue, "$#,##0.00")'परिणाम देखें'MsgBox strMoneyअंत उप |
यह परिणाम लौटाएगा:
इसी प्रकार, हो सकता है कि आप किसी संख्या को स्वरूपित फ़ोन नंबर के रूप में प्रदर्शित करना चाहें।
यह कार्यविधि:
| 1234567891011 | सब टेस्ट सिंगल टॉफोन ()'स्ट्रिंग वैरिएबल घोषित करें'स्ट्रिंग के रूप में मंद strPhone'एकल घोषित करें और मान को पॉप्युलेट करें'मंद sglValue एकल के रूप मेंsglValue = ५५५९६८५४१'सिंगल को एक मुद्रा प्रतीक के साथ एक स्ट्रिंग में कनवर्ट करें'strPhone = प्रारूप (sglValue, "(000) -000 0000")'परिणाम देखें'MsgBox strPhoneअंत उप |
यह परिणाम लौटाएगा:
