विषय

• दिशाओं

Visual Basic .NET में, टाइमर आपको अपने एप्लिकेशन के रनटाइम के दौरान आवधिक घटनाओं को नियंत्रित करने की अनुमति देता है। टाइमर में इसके लिए कुछ अद्वितीय गुण और विधियाँ हैं। सबसे महत्वपूर्ण संपत्ति "अंतराल" है, जो निर्दिष्ट करता है कि टाइमर को कितनी बार कोड चलाना चाहिए। आप मिलीसेकंड में एक रेंज मान प्रदान करते हैं; हजार मिलीसेकंड एक सेकंड के बराबर होता है। नियंत्रक के साथ आप क्या कर सकते हैं इसके कुछ उदाहरणों में एक उलटी गिनती चलाना, अन्य नियंत्रणों के लिए गतिशील रूप से संपत्ति के मूल्यों को बदलना, और आवेदन के कुछ अन्य हिस्सों पर निरंतर नज़र रखना शामिल है।

दिशाओं

टाइमर अंतराल मान मिलीसेकंड में दिया जाता है (Fotolia.com से पीटर हायर इमेज द्वारा घड़ी की छवि)

1. Visual Basic में एक प्रोजेक्ट खोलें। टाइमर पर डबल-क्लिक करें और "टाइमर 1" जोड़ें और "लेबल 1" जोड़ने के लिए "लेबल" पर डबल क्लिक करें। "सक्षम" नियंत्रण गुण को "ट्रू" में बदलें और सीमा को 1000 में बदलें।

2. कोड विंडो खोलने और निम्नलिखित कोड दर्ज करने के लिए "F7" दबाएं:

   इंजर के रूप में मंद समय = 10

   यह एक वैरिएबल बनाता है और इसे इनिशियलाइज़ करता है।

3. Timer1_Tick एप्लेट खोलें और निम्नलिखित कोड डालें:

   अगर समय> 0 तो समय = समय - 1 लेबल 1। समय = समय समाप्त टाइमर 1। सक्षम = गलत अंत यदि

   जब प्रोग्राम चलता है, तो टाइमर हर सेकंड वैरिएबल को घटायेगा, जब तक कि गणना शून्य पर नहीं पहुंच जाती, तब तक टाइमर बंद हो जाता है।

4. प्रोजेक्ट विंडो खोलने के लिए "Shift" और "F7" दबाएं। टाइमर को डबल-क्लिक करें और प्रोजेक्ट में "टाइमर 2" जोड़ें। "इनेबल" प्रॉपर्टी को "ट्रू" में बदलें और इसकी रेंज 100 तक, फिर टिमर 2_TM सब प्रोग्राम को खोलने के लिए इस पर डबल क्लिक करें। फिर निम्न कोड टाइप करें:

   
   

   अगर (Label1.Left + Label1.Width)> Me.Width तब Label1.Left = Me.Left - 100 अंत अगर Label1.eft = Label1.eft + 5

   यह कोड पैनल को स्क्रीन पर क्षैतिज रूप से स्क्रॉल करने का कारण बनता है, जो एक सेकंड के हर दसवें हिस्से में पांच पिक्सेल आगे बढ़ता है। जब मार्की फॉर्म के दाहिने छोर तक पहुंचता है, तो यह बाईं ओर वापस जाता है और फिर से चलना शुरू करता है।

5. प्रोजेक्ट विंडो खोलने के लिए "Shift" और "F7" दबाएं। नियंत्रक पर डबल-क्लिक करें और प्रोजेक्ट में "टाइमर 3" जोड़ें। "सक्षम" संपत्ति को "ट्रू" में बदलें और इसकी सीमा 500 तक। फिर "टेक्स्टबॉक्स" को जोड़ने के लिए "टेक्स्टबॉक्स" पर डबल-क्लिक करें। Timer3_Tick एप्लेट को खोलने के लिए Timer3 प्रोजेक्ट को डबल-क्लिक करें। फिर निम्न कोड टाइप करें:

   TextBox1.Text = TextBox1.Text.ToUpper TextBox1.Select (TextBox1.TextLength, 0 विकल्प)

   हर 30 सेकंड में, टाइमर "TextBox1" से सभी पाठ को ऊपरी बॉक्स में बदल देता है। डिफ़ॉल्ट रूप से, जब टाइमर बदलाव करता है, तो कर्सर टेक्स्ट बॉक्स की शुरुआत में लौटता है। कोड की दूसरी पंक्ति ऐसा होने से रोकती है।