एक्सेस वीबीए फाइंडफर्स्ट

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

हमारे पास नीचे दिखाए गए उत्पाद टी नामक एक तालिका है:

VBA के साथ FindFirst का उपयोग करना

.FindFirst विधि का सिंटैक्स अभिव्यक्ति है। FindFirst (मानदंड) जहां:

अभिव्यक्ति - रुचि का रिकॉर्डसेट।

मानदंड - एक स्ट्रिंग जिसका उपयोग रिकॉर्ड की पहचान करने के लिए किया जाता है। यह SQL में WHERE क्लॉज के समान है।

ध्यान दें: हमें IF ELSE कथन और .NoMatch विधि के संयोजन में Recordset.FindFirst विधि का उपयोग करना होगा। यह वीबीए को बताता है कि अगर कोई मैच मिलता है तो उसे क्या करना चाहिए।

निम्नलिखित कोड आपको दिखाएगा कि पहला उत्पाद नाम कैसे खोजा जाए जिसकी कीमत $15 से अधिक है:

सब यूजिंग फाइंडफर्स्ट () डिम हमारे डाटाबेस को डाटाबेस के रूप में मंद करें रिकॉर्डसेट के रूप में हमारा रिकॉर्डसेट सेट करें हमारा डाटाबेस = करंट डीबी सेट हमारा रिकॉर्डसेट = हमारा डाटाबेस। ओपन रिकॉर्डसेट ("उत्पाद टी", टाइप करें: = रिकॉर्डसेट टाइप एनम। MsgBox "कोई मिलान नहीं मिला" और MsgBox "उत्पाद मिल गया है और उसका नाम है:" और हमारे रिकॉर्डसेट! उत्पाद का नाम अंत यदि DoCmd के साथ समाप्त होता है। acTable, "ProductsT", acSaveNo DoCmd.OpenTable "ProductsT" एंड सब 

परिणाम है: