Access VBA မှတစ်ဆင့် အက္ခရာစဉ်မဟုတ်သော အက္ခရာ (ဂဏန်းမဟုတ်သော) အက္ခရာပါရှိမရှိ စစ်ဆေးနည်း

ယခုမျှဝေပါ-

သင့်ဒေတာဘေ့စ်ထဲသို့ တင်သွင်းခြင်းမပြုမီ အချက်အလက်များကို "ရှင်းလင်းခြင်း" သည် အတော်လေး ပုံမှန်ဖြစ်သည် - နောက်ဆုံးတွင်၊ ဒေတာဘေ့စ်ကို သင်စတင်အသုံးပြုရခြင်း၏ အကြောင်းရင်းတစ်ခုမှာ သတ်မှတ်ထားသော စံနှုန်းများအတွက် ထိုဒေတာဘေ့စ်ကို ခန့်မှန်း၍ မေးမြန်းနိုင်စေရန်ဖြစ်သည်... မဟုတ်လား။ ဥပမာအားဖြင့်၊ တစ်ယောက်က "$" ရိုက်ထည့်သော်လည်း နောက်တစ်ယောက်က ငွေကြေးတန်ဖိုးတစ်ခုဖြစ်ကြောင်း သင်သိသည်ဟု ယူဆသည့် ဖိုင်တစ်ခုမှ အချက်အလက်ကို တင်သွင်းရမည့် ပြင်ပအခြေအနေများကို သင်မည်သို့ကိုင်တွယ်ဖြေရှင်းရမည်နည်း - သို့မဟုတ် ပိုဆိုးသည်မှာ၊ တစ်ယောက်က "am" သို့မဟုတ် "pm" ရိုက်ထည့်သော်လည်း နောက်တစ်ယောက်က ၂၄ နာရီနာရီကို အသုံးပြုသည့်နေရာ။ ပုံမှန်အတိုင်း၊ ပြဿနာကို ချဉ်းကပ်ရန် နည်းလမ်းများစွာရှိသော်လည်း တစ်နည်းမှာ string သည် ဂဏန်းအစုံတစ်ခုသာလား သို့မဟုတ် "ဂဏန်းမဟုတ်သော" များပါဝင်ခြင်းရှိမရှိ စစ်ဆေးရန်ဖြစ်သည်။ VBA အနည်းငယ်ဖြင့်၊ ဤစစ်ဆေးမှုမျိုးသည် ရိုးရှင်းပါသည် - ဤဆောင်းပါးသည် မည်မျှရိုးရှင်းကြောင်း ပြသပါမည်...

ငါတို့ဘာကြောင့်ဒီလိုလုပ်ဖို့လိုတာလဲ။

ဒေတာအက္ခရာများသင်ဘယ်လိုထည့်သွင်းမလဲ ဒါမှမဟုတ် ထုတ်ယူမလဲဆိုတာကို ထိန်းချုပ်လို့မရတဲ့ မည်သည့်အချက်အလက်မျိုးကိုမဆို တင်သွင်းနေတယ်ဆိုရင် ဒီပြဿနာကို အကြိမ်ပေါင်းများစွာ (အကြိမ်ပေါင်းများစွာ!) ကြုံတွေ့ဖူးပါလိမ့်မယ်။ လူတွေက အသေးစိတ်အချက်အလက်တွေကို တစ်ပုံစံတည်းနည်းလမ်းနဲ့ မဟုတ်ဘဲ သူတို့အတွက် အဆင်ပြေဆုံးနည်းလမ်းနဲ့ ရိုက်ထည့်ကြပါတယ်။ ဆိုလိုတာက သင်လုပ်ရမယ့်အချိန်ရောက်ဖို့ အချိန်တစ်ခုပဲ လိုတော့တယ်။ လုပ် မတင်သွင်းခင်မှာ ယူနီဖောင်းနဲ့။

ဤအရာ၏ သာမာန်ဥပမာတစ်ခုသည် ကိန်းဂဏာန်းအကွက်တစ်ခုသို့ ဒေတာတင်သွင်းရန် လိုအပ်သော်လည်း ဒေတာကိုကြည့်လိုက်သောအခါ အချို့မှာ ထောင်ပေါင်းများစွာသော ကော်မာများဖြင့် ခွဲထားသည်ကို တွေ့ရသည်၊ အချို့မှာ ငွေကြေးနိမိတ်ကို ပေါင်းထည့်ထားသည်—နှင့် အခြားမည်သည်များကို သိနိုင်မည်နည်း။

အမြန်သတိထားပါ။

သင့်ဒေတာဘေ့စ်သို့ မသန့်စင်ရသေးသော ဒေတာတင်သွင်းခြင်းသည် အလွန်ဆိုးရွားစေနိုင်သည် – အကောင်းဆုံးမှာ သင့်အစီရင်ခံချက်ကို လှည့်စားနိုင်ပြီး ပိုဆိုးသည်မှာ သင်ပျက်စီးသွားသည့်အရာအားလုံးနှင့် အဆုံးသတ်နိုင်သည် – ဒေတာတင်သွင်းမှုများကို “ညစ်ညမ်းခြင်း” မဖြစ်ပါစေနှင့်။ ကြိုးစားနေပါတယ်။ Access ပြဿနာကိုဖြေရှင်းပါ။ စနေ၊

အက္ခရာစဉ်အက္ခရာများကို "ဖယ်ရှားရန်" မည်ကဲ့သို့ပြုလုပ်မည်နည်း။

သင်ရှာဖွေခြင်းနှင့် အစားထိုးခြင်းတို့ကို သင်ကိုယ်တိုင်လုပ်ဆောင်နိုင်သော်လည်း ၎င်းသည် အချိန်ယူနိုင်ပြီး တစ်ခုခုကို ကောင်းစွာလွဲချော်နိုင်သည် (ဥပမာ၊ ဒေါ်လာသင်္ကေတများကို သင်ရှာဖွေနေပါက၊ ယူရိုသင်္ကေတ သို့မဟုတ် ကော်မာ၊ နေရာလွတ်များ စသည်ဖြင့်) ကို သင်လွတ်သွားနိုင်သည်။ . ဒါကြောင့် အလွယ်ဆုံးနဲ့ ပိုစိတ်ချရတဲ့နည်းလမ်းက Access ကို အောက်ဖော်ပြပါ ကုဒ်ကိုသုံးပြီး အလုပ်ကြိုးစားလုပ်ခွင့်ပြုဖို့ပါပဲ။

ကုဒ်ပေါ်...

Public Function removeNonNumeric(inString As String) As Long
    Dim outputString, chrString As String
    Dim strPos As Integer
    
    For strPos = 1 To Len(inString)
        chrString = Mid(inString, strPos, 1)
        If IsNumeric(chrString) Then outputString = outputString & chrString
    Next
    
    removeNonNumeric = CLng(outputString)
End Function

ကုဒ်ကဘာလဲ

VBA ကုဒ်ဒီမှာ function က အရမ်းရိုးရှင်းပါတယ်။ ဒီမှာ ကျွန်တော်တို့လုပ်ရမှာက တစ်ကြိမ်မှာ character တစ်လုံးစီထည့်ထားတဲ့ string ကို loop ပတ်ပြီး loop ပတ်ရုံပါပဲ။ character က ဂဏန်းတစ်ခုဖြစ်ရင် အဲဒါကို temporary string ထဲထည့်ပြီး ပြီးသွားတဲ့အခါ "long" အဖြစ်ပြောင်းပါတယ်။

ကုဒ်ကို သင့်အတွက် လိုက်လျောညီထွေဖြစ်အောင် ပြုလုပ်ခြင်း။

သင်တွေ့မြင်ရသည့်အတိုင်း - function သည် "long" ၏ data type ကို return ပြန်သည် - အကယ်၍ သင်သည် ကိန်းပြည့်များ၊ သို့မဟုတ် floating point စသည်တို့ဖြင့် လုပ်ဆောင်နေပါက၊ ထို့နောက် သင့်ဒေတာဘေ့စ်အတွက် မှန်ကန်သောတန်ဖိုးအမျိုးအစားကို ပြန်ပေးနိုင်ရန် လုပ်ဆောင်ချက်ကို ပြောင်းလဲလိုမည်ဖြစ်သည်။

စာရေးသူနိဒါန်း:

Mitchell Pond သည် ဒေတာပြန်လည်ရယူရေးဆိုင်ရာ ကျွမ်းကျင်သူဖြစ်သည်။ DataNumen, Inc. အပါအဝင် ဒေတာပြန်လည်ရယူရေးနည်းပညာများတွင် ကမ္ဘာ့ခေါင်းဆောင်ဖြစ်သည်။ ပြုပြင် SQL Server ဒေတာဘေ့စ နှင့် excel recovery software ထုတ်ကုန်များ။ ပိုမိုသိရှိလိုပါကသွားရောက်ကြည့်ရှု www ။datanumen.com

ယခုမျှဝေပါ-

မှတ်ချက်များကိုပိတ်ထားကြသည်။