विज़ुअल बेसिक में ट्रैकबार को कैसे एकीकृत करें: 3 चरण

2024 लेखक: John Day | [email protected]. अंतिम बार संशोधित: 2024-01-30 09:24

ठीक है, तो यह आसान लगता है लेकिन शुरुआती लोगों को यह बिल्कुल पता नहीं है कि यह कैसे करना है। ट्रैकबार उपयोगी उपकरण हो सकते हैं। ट्रैकबार का उपयोग करके बजट तय करने से लेकर कितनी आतिशबाजी का चयन करना है, यह बहुत आसानी से होता है।

नोट: क्या कोई जानता है कि ट्रैकबार पर स्थानों की संख्या कैसे बढ़ाई जाए? मैं केवल 11 प्राप्त कर सकता हूं …

चरण 1: अपना फॉर्म तैयार करें

यह काफी आसान है। जब आप चाहते हैं कि आपका प्रोग्राम जैसा दिखे, तब बनाएं। मैं कुछ खास नहीं बना रहा हूं। मैं कुछ ऐसा बनाऊंगा जो टेक्स्टबॉक्स का रंग बदल दे। == ट्रैकबार जोड़ना न भूलें !!!== ^{_{हाँ, बहुत से लोग भूल जाते हैं कि}}

चरण 2: कोड

तो आपने अपना यूजर इंटरफेस कर लिया है, अब क्या? बेशक कोड !!ट्रैकबार पर डबल क्लिक करें। कोड की 2 लाइनें पॉप अप होनी चाहिए। कुछ इस तरह:

निजी उप TrackBar1_Scroll(ByVal प्रेषक System. Object के रूप में, ByVal e As System. EventArgs) TrackBar1 को हैंडल करता है।अब हम मूल्यों के बारे में सीखते हैं। इस ट्रैकबार पर हम केवल 11 मान, 0-10 प्राप्त कर सकते हैं। मान 0 बहुत बाईं ओर है जबकि मान 10 बहुत दाईं ओर है। मिला क्या? पर चलते हैं।

जीवन को आसान बनाने के लिए इस चरण के सभी पाठ अब से कोड-शैली वाले होने जा रहे हैं

कोड प्रकार की दो पंक्तियों के बीच में: यदि TrackBar1. Value = placcavaluenumber यहाँ तो End ifeplaceavaluenumber को यहाँ उस स्थान की मान संख्या के साथ बदलें जहाँ आप इसे रखना चाहते हैं। अब कोड की उन 4 पंक्तियों के बीच में आप क्या करना चाहते हैं। इस स्थिति में: TextBox1. BackColor = Color. Black एक बार जब आप कर लें तो प्रत्येक स्थान के लिए इसे दोहराएं। जब मैं किया गया था तो यह इस तरह दिखता था: निजी उप ट्रैकबार 1_स्क्रॉल (बायवैल प्रेषक सिस्टम के रूप में। ऑब्जेक्ट, बायवैल ई सिस्टम के रूप में। इवेंटआर्ग) ट्रैकबार 1 को संभालता है। ट्रैकबार 1 स्क्रॉल करें। वैल्यू = 0 फिर टेक्स्टबॉक्स 1. बैककोलर = रंग। ब्लैक एंड अगर ट्रैकबार 1। Value = 1 फिर TextBox1. BackColor = Color. White End यदि TrackBar1. Value = 2 तो TextBox1. BackColor = Color. Red End यदि TrackBar1. Value = 3 तो TextBox1. BackColor = Color. Blue End यदि TrackBar1. Value = 4 फिर TextBox1. BackColor = Color. Yellow End यदि TrackBar1. Value = 5 तो TextBox1. BackColor = Color. Purple End यदि TrackBar1. Value = 6 तो TextBox1. BackColor = Color. Green End यदि TrackBar1. Value = 7 फिर TextBox1. BackColor = Color. Orange End यदि TrackBar1. Value = 8 तो TextBox1. BackColor = Color. Brown End यदि TrackBar1. Value = 9 तो TextBox1. BackColor = Color. White End यदि TrackBar1. Value = 10 तो TextBox1। बैककलर = कलर। व्हाइट एंड अगर एंड सब

चरण 3: हो गया

खैर, मैं वैसे भी था। यदि आपने अपना कार्यक्रम समाप्त नहीं किया है, तो चलते रहें। ओह, और शुभकामनाएँ!लेकिन जो हो चुके हैं, उनके लिए यह बहुत कठिन नहीं था, है ना? और अगर आप सोच रहे थे, तो रीसेट और क्लोज़ के लिए कोड है:

निजी उप Button2_Click(ByVal प्रेषक के रूप में System. Object, ByVal e As System. EventArgs) हैंडल बटन2। एंड सब प्राइवेट सब बटन पर क्लिक करें = 0 अंत उप