डाक कोडों की श्रेणी के बीच पहचान करने की आवश्यकता

Question

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

उदाहरण के लिए, मैं देखना चाहता हूं कि डाक कोड 2G8 और 2P8 के बीच आता है या नहीं।

दूसरे शब्दों में, मैं के लिए क्या देख रहा हूँ की सीमा 2_8 होगा जहां को रेखांकितP को G हो सकता है, लेकिन मैं पहचान करने के लिए कैसे है कि कोड में पता नहीं है।

मैं वास्तव में इस समस्या से संपर्क करने के तरीके को जानने में कुछ मदद की सराहना करता हूं। धन्यवाद!

Answer 1

आप प्रत्येक चरित्र को खींचने और अपने व्यापार नियमों के अनुसार इसे सत्यापित करने के लिए वीबीए Mid फ़ंक्शन का उपयोग कर सकते हैं।

Function ValidatePostalCode(code As String) 
    ValidatePostalCode = _ 
     (Mid(code, 1, 1) = "2") And _ 
     (Mid(code, 2, 1) >= "G" And Mid(code, 2, 1) <= "P") And _ 
     (Mid(code, 3, 1) = "8") 
End Function 

इस समारोह यह बताते हैं कि इनपुट मान्य है True या False का मान प्रदान करेगा: यहाँ यह कैसे लग सकता है, इसका एक उदाहरण।

Answer 2

LIKE दोहराया स्ट्रिंग परीक्षण

1. सरल टेस्ट

Function ValidString(strIn As String) As Boolean 
ValidString = strIn Like "2[G-P]8" 
End Function 

2. केस संवेदी संस्करण

Function ValidString(strIn As String) As Boolean 
ValidString = LCase$(strIn) Like LCase$("2[G-P]8") 
End Function