TOP

VBA-पाठ 6.1. डेटा प्रकार (Variables)

YouLibreCalc for Excel logo

वेरिएबल्स की सहायता से हम सभी प्रकार की जानकारी रिकॉर्ड कर सकते हैं, जैसे: संख्याएँ, पाठ, दिनांक, आदि।

एक वेरिएबल (Variable) मेमोरी का एक नामित क्षेत्र है जिसका उपयोग एकल मान को संग्रहीत करने के लिए किया जाता है। कोड निष्पादन के दौरान एक वेरिएबल का मान बदला जा सकता है।

जब हम एक वेरिएबल घोषित करते हैं (Dim निर्देश का उपयोग करके), हम मेमोरी का एक विशिष्ट क्षेत्र आवंटित करते हैं और इसे आसान संदर्भ के लिए एक नाम निर्दिष्ट करते हैं।

वेरिएबल नामकरण के लिए बुनियादी नियम नीचे दिए गए हैं:

  • आपको पहले अक्षर के रूप में एक अक्षर का उपयोग करना होगा;
  • आप नाम में रिक्त स्थान, अवधि (.), विस्मयादिबोधक चिह्न (!) या @, &, $, # प्रतीकों का उपयोग नहीं कर सकते;
  • नाम 255 अक्षरों से अधिक नहीं हो सकता;
  • आप आरक्षित कीवर्ड Visual Basic को वेरिएबल नाम के रूप में उपयोग नहीं कर सकते।

  • पहले उदाहरण पर विचार करें:

    Sub variables()
       'वेरिएबल को पूर्णांक के रूप में घोषित करें
       Dim my_variable As Integer
       'हम वेरिएबल को एक निश्चित मान निर्दिष्ट करते हैं
       my_variable = 12
       'हम संदेश विंडो में वेरिएबल का मान प्रदर्शित करते हैं
       MsgBox my_variable
    End Sub
    

    कोड की पहली पंक्ति एक वैरिएबल घोषित करती है:

       Dim my_variable As Integer
    
  • Dim: परिवर्तनीय परिभाषा
  • my_variable: परिवर्तनीय नाम
  • As: परिवर्तनीय प्रकार की परिभाषा
  • Integer: परिवर्तनीय प्रकार
  • सामान्य तौर पर, वेरिएबल घोषित करना आवश्यक नहीं है और कोड काम करेगा, लेकिन इसकी दृढ़ता से अनुशंसा की जाती है। इससे उनके साथ काम करना, उन्हें ढूंढना और विभिन्न समस्याओं का समाधान करना आसान हो जाता है। सिद्धांत रूप में, वेरिएबल घोषित करना एक अच्छी प्रोग्रामिंग आदत है।

    किसी चर का प्रकार उसकी सामग्री की प्रकृति (पाठ, संख्या, दिनांक, आदि) को इंगित करता है।

    दूसरा रिबन एक वेरिएबल को एक मान निर्दिष्ट करता है:

       my_variable = 12
    

    और अंत में, तीसरा रिबन संदेश विंडो में चर का मान प्रदर्शित करता है:

       MsgBox my_variable
    

    कोड निष्पादित करने का परिणाम इस प्रकार होगा:

    चर के प्रकार

    नाम प्रकार विवरण प्रतीक
    Byte संख्यात्मक 0 और 255 के बीच एक पूर्णांक
    Integer संख्यात्मक -32'768 और 32'767 के बीच एक पूर्णांक %
    Long संख्यात्मक - 2'147'483'648 और 2'147'483'647 के बीच एक पूर्णांक &
    Currency संख्यात्मक -922'337'203'685'477.5808 और 922'337'203'685'477.5807 के बीच निश्चित दशमलव @
    Single संख्यात्मक -3.402823E38 और 3.402823E38 के बीच एक फ्लोटिंग पॉइंट दशमलव संख्या !
    Double संख्यात्मक -1.79769313486232D308 और 1.79769313486232D308 के बीच एक फ्लोटिंग पॉइंट दशमलव संख्या #
    String मूलपाठ मूलपाठ $
    Date तारीख तिथि और समय
    Boolean बूलियन सत्य (हाँ) या असत्य (नहीं)
    Object वस्तु Microsoft Object
    Variant एक और कोई भी डेटा प्रकार (डिफ़ॉल्ट प्रकार यदि चर परिभाषित नहीं है)

    आइए विभिन्न प्रकार के चर वाले कई उदाहरणों पर विचार करें:

     'पूर्णांक
     Dim nbInteger As Integer
     nbInteger = 12345
       
     'दशमलव संख्या
     Dim nbComma As Single
     nbComma = 123.45
    
     'मूलपाठ
     Dim varText As String
     varText = "moonexcel.com.ua"
    
     'तारीख
     Dim varDate As Date
     varDate = "24.08.2012"
    
     'बूलियन सही/गलत
     Dim varBoolean As Boolean
     varBoolean = True
       
     'ऑब्जेक्ट (परिवर्तनीय प्रकार के रूप में वर्कशीट)
     Dim varSheet As Worksheet
     Set varSheet = Sheets("Sheet2") 'Set => "ऑब्जेक्ट" प्रकार के एक वेरिएबल को मान निर्दिष्ट करना
       
     '"ऑब्जेक्ट" प्रकार के एक चर का उपयोग करने का एक उदाहरण: एक शीट को सक्रिय करना
     varSheet.Activate
    

    तालिका में सूचीबद्ध प्रतीकों का उपयोग छोटी चर घोषणाओं के लिए किया जा सकता है:

     Dim example As Integer
     Dim example%
    

    ये दोनों प्रविष्टियाँ समान हैं.

    आप मॉड्यूल की शुरुआत में Option Explicit कमांड लिखकर उपयोगकर्ता को वेरिएबल घोषित करने के लिए बाध्य भी कर सकते हैं। इस मामले में, यदि एक अघोषित चर दर्ज किया गया था तो एक त्रुटि संदेश दिखाई देगा।