Visual Basic 6 खोलें, और नए प्रोजेक्ट मेनू से "Standard EXE" चुनें। आपको स्क्रीन पर एक खाली फॉर्म दिखाई देगा।
प्रोजेक्ट सूची में, स्क्रीन के दाईं ओर "Project1" पर क्लिक करके अपने प्रोजेक्ट और अपने फॉर्म का नाम बदलें, और गुण बॉक्स की "नाम" पंक्ति में एक नया नाम दर्ज करना, जो परियोजना सूची के नीचे दिखाई देना चाहिए चूक। नया नाम स्वीकार करने के लिए "एंटर" दबाएं। अपने फॉर्म के लिए भी ऐसा ही करें (एक सुझाया गया फॉर्म नाम "कैलकुलेटरयूआई" है), सुनिश्चित करें कि "कैप्शन" संपत्ति में भी एक समान नाम दर्ज करना सुनिश्चित करें, जो फॉर्म के शीर्ष बार में टेक्स्ट को बदल देगा। प्रोजेक्ट को अपने कंप्यूटर पर एक नए फ़ोल्डर में सहेजें।
प्रपत्र में बटन और एक टेक्स्ट बॉक्स जोड़ें। सबसे पहले, एक टेक्स्ट बॉक्स जोड़ें, जहां कैलकुलेटर में दर्ज किए गए नंबर दिखाई देंगे, साथ ही गणना के परिणाम भी। स्क्रीन के बाईं ओर टूलबार से टेक्स्टबॉक्स बटन का चयन करके और फिर अपने माउस से टेक्स्टबॉक्स के लिए इच्छित आकार और स्थान को खींचकर ऐसा करें। एक बार जब आप टेक्स्टबॉक्स रख लेते हैं तो आप आकार और स्थान को फॉर्म के किसी अन्य स्थान पर खींचकर या टेक्स्टबॉक्स की सीमा के साथ हैंडल (छोटे वर्ग) खींचकर बदल सकते हैं। चयनित टेक्स्टबॉक्स के साथ गुण विंडो में निम्नलिखित पंक्तियों को बदलना सुनिश्चित करें: "(नाम)" = tbResult, "संरेखण" = 1- राइट जस्टिफाई, "डेटा फॉर्मेट" = (चयन करने के लिए "..." बटन पर क्लिक करें) नंबर, "लॉक्ड" = ट्रू, और "पाठ" = 0।
टूलबार पर कमांडबटन आइकन का चयन करें और पहले बटन को उसी तरह बनाएं जैसे आपने बटन जोड़ने के लिए टेक्स्टबॉक्स बनाया था। संदर्भ के लिए, "एमसी", "एमआर", "एमएस" और "एम+" बटनों को छोड़कर, अपने कैलकुलेटर लेआउट के आधार के रूप में मानक दृश्य (प्रोग्राम> सहायक उपकरण> कैलकुलेटर) में विंडोज कैलकुलेटर का उपयोग करें। प्रत्येक बटन पर, निम्नलिखित गुणों को बदलें (उदाहरण के रूप में "+" बटन का उपयोग करके): "(नाम)" = btnPlus, "कैप्शन" = +। कैलकुलेटर के बाकी बटनों के लिए भी ऐसा ही करें और फिर अपना काम सेव करें। आपका फॉर्म अब यहां दिखाए गए उदाहरण जैसा होना चाहिए।
कोड जोड़ें। ध्यान दें कि यदि आपके बटन और टेक्स्टबॉक्स का नाम वही नहीं है जो यहां सूचीबद्ध कोड की अपेक्षा है, तो आपको इसकी आवश्यकता होगी अपने बटन और टेक्स्टबॉक्स से मिलान करने के लिए नाम बदलने के लिए, या इससे मिलान करने के लिए अपने बटन और टेक्स्टबॉक्स बदलें कोड। पहले हमें कैलकुलेटर इनपुट को संसाधित करने के लिए कुछ चर बनाने की आवश्यकता है:
स्ट्रिंग के रूप में डिम sLeft, स्ट्रिंग के रूप में sRight, स्ट्रिंग के रूप में sOperator मंद iLeft डबल के रूप में, iRight डबल के रूप में, iResult डबल मंद के रूप में bLeft बूलियन के रूप में
प्रत्येक गणना में चार भाग होते हैं: ऑपरेटर के बाईं ओर एक संख्या (sLeft, iLeft), एक ऑपरेटर (sOperator), ऑपरेटर के दाईं ओर एक संख्या (sRight, iRight), और एक परिणाम (iResult)। यह ट्रैक करने के लिए कि उपयोगकर्ता बाएँ या दाएँ नंबर दर्ज कर रहा है, हमें एक बूलियन वैरिएबल, bLeft बनाने की आवश्यकता है। यदि bLeft सत्य है, तो गणना के बाईं ओर दर्ज किया जा रहा है; यदि bLeft गलत है, तो दाईं ओर प्रवेश किया जा रहा है।
bLeft वैरिएबल को इनिशियलाइज़ करें। हम ऐसा एक फॉर्म_लोड सबरूटीन बनाकर करते हैं, जिसे आप या तो यहां सूचीबद्ध के रूप में टाइप कर सकते हैं या किसी बटन या टेक्स्टबॉक्स द्वारा कवर नहीं किए गए फॉर्म के किसी भी हिस्से पर डबल-क्लिक करके स्वचालित रूप से बना सकते हैं। फ़ंक्शन के अंदर, हमें bLeft को True पर सेट करने की आवश्यकता है, क्योंकि दर्ज किया गया पहला नंबर बायां भाग होगा:
एक सबरूटीन बनाएं जो किसी भी नंबर बटन को क्लिक करने का काम संभाल सके। हम इसे एक सबरूटीन के रूप में बनाते हैं क्योंकि हम प्रत्येक बटन के लिए समान कोड का उपयोग करते हैं, और सबरूटीन का उपयोग करने का अर्थ है एक ही कोड को दस बार दोहराना नहीं है। फॉर्म_लोड सबरूटीन की एंड सब लाइन के नीचे निम्नलिखित दर्ज करें:
जैसा कि आप देख सकते हैं, यह फ़ंक्शन एक स्ट्रिंग पैरामीटर लेता है, sNumber, जिसमें वह नंबर होगा जिस पर उपयोगकर्ता ने क्लिक किया है। यदि bLeft सत्य है, तो यह संख्या उस स्ट्रिंग में जोड़ दी जाती है जो दर्ज की जा रही संख्या का प्रतिनिधित्व करती है, sLeft, और टेक्स्टबॉक्स, tbResult, को नया नंबर प्रदर्शित करने के लिए अद्यतन किया जाता है। यदि bLeft गलत है, तो वही ऑपरेशन sRight का उपयोग करके किया जाता है।
अंत में, हमारे AddNumber सबरूटीन को कॉल करने वाले प्रत्येक नंबर के लिए एक क्लिक इवेंट फ़ंक्शन बनाएं। आप प्रत्येक नंबर बटन पर डबल-क्लिक करके इसे आसानी से कर सकते हैं, जो आपके लिए सबरूटीन संरचना तैयार करेगा। फिर कॉल को AddNumber में जोड़ें, नंबर को कोट्स में बटन से जुड़े नंबर से बदलें। शून्य बटन के लिए, आपका कोड इस तरह दिखेगा:
इसी तरह, एक बटन के लिए, आपका कोड इस तरह दिखेगा:
ऑपरेटरों को संभालें: प्लस, माइनस, टाइम्स और डिवाइड। हम इसे अंतिम चरण की तरह करेंगे, एक सबरूटीन बनाएंगे जिसे ऑपरेटर बटन के लिए क्लिक ईवेंट में कहा जाता है। सबरूटीन निम्न की तरह दिखेगा:
यदि bLeft सत्य है, जिसका अर्थ है कि उपयोगकर्ता ने गणना के बाएं हिस्से में प्रवेश किया है, तो यह सबरूटीन सेट करता है sOperator चर जिसे हमने चरण 5 में बनाया है, दर्ज किए गए ऑपरेटर के बराबर है, जो AddOperator को स्ट्रिंग के रूप में पास किया जाता है एसन्यूऑपरेटर। दूसरा चरण bLeft को गलत पर सेट करना है, क्योंकि एक ऑपरेटर के प्रवेश का मतलब है कि उपयोगकर्ता समीकरण के बाईं ओर प्रवेश कर रहा है। ऐसी प्रविष्टियों को संभालने के लिए जो कई ऑपरेटरों को एक साथ स्ट्रिंग करती हैं, जैसे 9 * 3 * 2 * 6, हमें करने की आवश्यकता है यह भी जांचें कि क्या bLeft गलत है, जिसका अर्थ है कि उपयोगकर्ता ने एक ऑपरेटर में प्रवेश किया है जहां हम उम्मीद कर रहे थे बराबर। पहले हम बराबर बटन (अगले चरण में वर्णित) के लिए क्लिक ईवेंट को कॉल करते हैं, जो गणना करता है और जो पहले से दर्ज किया गया है उसके परिणाम के लिए tbResult सेट करता है। फिर हम sRight को साफ़ करते हैं ताकि उपयोगकर्ता अगला नंबर दर्ज कर सके, और bLeft को False पर सेट कर सके ताकि प्रोग्राम को पता चले कि हम अगली गणना के दाहिने हाथ में प्रवेश कर रहे हैं।
अंत में, प्रत्येक ऑपरेटर बटन के क्लिक ईवेंट में एक AddOperator कॉल जोड़ें, उसी विधि का उपयोग करके जैसा कि हमने चरण 7 में नंबर बटन के लिए क्लिक ईवेंट बनाने के लिए किया था। प्लस बटन के लिए आपका कोड इस तरह दिखेगा:
बराबर बटन के लिए क्लिक इवेंट बनाएं, जो इस प्रोग्राम का सबसे जटिल कोड है। अपने प्रपत्र पर बराबर बटन पर डबल-क्लिक करके सबरूटीन संरचना बनाएं जैसे आपने अन्य बटनों के लिए किया था। जब आप कोड दर्ज करेंगे तो आपका सबरूटीन इस तरह दिखेगा:
कोड की पहली तीन पंक्तियाँ यह देखने के लिए जाँच करती हैं कि क्या गणना के दोनों पक्षों को एक ऑपरेटर के साथ दर्ज किया गया है। यदि केवल बाईं ओर और एक ऑपरेटर दर्ज किया जाता है, तो बाईं ओर का मान दाईं ओर कॉपी किया जाता है, इसलिए हम नकल कर सकते हैं 9 * = जैसी प्रविष्टि को संभालने के लिए मानक कैलकुलेटर व्यवहार, जो 81 का परिणाम प्राप्त करने के लिए 9 को स्वयं से गुणा करता है। शेष कोड केवल तभी चलेगा जब बाएँ, दाएँ, और ऑपरेटर दर्ज किए गए हों, और कॉपी करके शुरू होते हैं हमारे iLeft और iRight डबल-टाइप किए गए चर में संख्याओं के तार, जो वास्तविक कर सकते हैं गणना। सेलेक्ट केस स्टेटमेंट हमें अलग-अलग कोड चलाने की अनुमति देता है, जिसके आधार पर ऑपरेटर दर्ज किया गया था, और वास्तविक गणना करता है, परिणाम को iResult में रखता है। अंत में, हम परिणाम के साथ टेक्स्टबॉक्स को अपडेट करते हैं, परिणाम को sLeft में कॉपी करते हैं, sRight को रीसेट करते हैं, और bLeft = True सेट करते हैं। ये अंतिम पंक्तियाँ हमें गणना का परिणाम लेने और दूसरी गणना करने के लिए इसका उपयोग करने की अनुमति देती हैं।
अंतिम तीन ऑपरेशन बटन को संभालें: sqrt,%, और 1/x। वर्गमूल बटन के क्लिक इवेंट के लिए, आपका कोड इस तरह दिखेगा:
कोड की पहली 11 पंक्तियाँ सुनिश्चित करती हैं कि यदि हमारे पास समीकरण के दोनों ओर कोई मान दर्ज नहीं है, हम खाली स्ट्रिंग को iLeft या iRight में कॉपी करने की कोशिश करने के बजाय शून्य को प्रतिस्थापित करते हैं, जो एक उत्पन्न करेगा त्रुटि। मध्य रेखाएं गणना के वर्तमान भाग पर या तो बाएँ या दाएँ वर्गमूल कार्य करती हैं। अंत में, हम शुरुआत में किए गए चेक को उलट देते हैं ताकि शून्य को एक खाली स्ट्रिंग के रूप में वापस sLeft और sRight में कॉपी किया जा सके।
प्रतिशत बटन के लिए, कोड समान है, एक अपवाद के साथ: प्रतिशत ऑपरेशन केवल तभी किया जा सकता है जब दोनों बाएँ और दाएँ पक्ष दर्ज किए गए हों।
अंत में, 1/x, या भिन्न, क्लिक ईवेंट, जो ऊपर दिए गए कोड के समान है:
C और CE बटन को हैंडल करने के लिए कोड जोड़ें। सी कैलकुलेटर के सभी इनपुट को साफ़ करता है, जबकि सीई केवल वर्तमान में दर्ज की जा रही संख्या को साफ़ करता है।
अपना कैलकुलेटर प्रोग्राम चलाएं और अपनी इच्छानुसार कोई भी गणना करें। अधिक संचालन, अधिक जटिल गणनाओं को संभालने के लिए या थोड़े अतिरिक्त काम के साथ वैज्ञानिक कैलकुलेटर होने के लिए इस कैलकुलेटर को आसानी से विस्तारित किया जा सकता है।
टिप
यदि आप त्रुटियों का सामना करते हैं, तो अपनी कोड लाइन को लाइन से जांचें, उन लाइनों पर ध्यान केंद्रित करें जिन्हें वीबी ने त्रुटियों के रूप में बुलाया है, और इसकी तुलना ऊपर दिए गए कोड से करें। इस लेख में निहित कोड को त्रुटि मुक्त होने के लिए पूरी तरह से परीक्षण किया गया है, इसलिए इसे ईमानदारी से कॉपी करने से एक कार्यात्मक कार्यक्रम बन जाएगा। यदि आप Visual Basic के पिछले संस्करण का उपयोग कर रहे हैं, तो आपको कुछ समस्याएँ आ सकती हैं जहाँ सभी संस्करणों में भाषा में परिवर्तन किए गए हैं। VB के पिछले संस्करण, उदाहरण के लिए, Math. गणित के बजाय sqrt()। Sqr() एक वर्गमूल ऑपरेशन करने के लिए। यह देखने के लिए कि क्या कोई परिवर्तन आवश्यक है, अपने विशिष्ट संस्करण के लिए संदर्भ देखें।