Sveikasis skaičius yra duomenų tipas VBA, kuris suteikiamas bet kuriam kintamajam, kad būtų galima laikyti sveikojo skaičiaus vertes. Sveiko skaičiaus kintamojo skaičiaus apribojimai arba skliaustas VBA yra panašus į kitų kalbų skaičių, bet kuris kintamasis apibrėžiamas kaip sveikasis skaičius kintamasis naudojant DIM sakinį ar raktinį žodį VBA.
„Excel VBA“ sveikasis skaičius
Duomenų tipai yra tokie svarbūs bet kuria kodavimo kalba, nes po visų kintamųjų deklaracijos turėtų būti duomenų tipas, priskirtas šiems kintamiesiems. Mes dirbame su keliais duomenų tipais ir kiekvienas duomenų tipas turi savo privalumų ir trūkumų, susijusių su jais. Kai deklaruojame kintamuosius, svarbu žinoti išsamią informaciją apie konkretų duomenų tipą. Tai straipsnis, skirtas VBA duomenų tipui „Sveikasis skaičius“. Mes parodysime jums visą duomenų tipo „Sveikasis skaičius“ vaizdą.
Koks yra sveikųjų duomenų tipas?
Sveikieji skaičiai yra sveiki skaičiai, kurie gali būti teigiami, neigiami ir nulis, bet ne trupmeninis skaičius. VBA kontekste „Sveikasis skaičius“ yra duomenų tipas, kurį priskiriame kintamiesiems. Tai skaitinių duomenų tipas, kuriame gali būti sveiki skaičiai be dešimtainių pozicijų. Sveiko skaičiaus 2 tipo duomenų saugojimo baitai, kurie yra pusė VBA LONG duomenų tipo, ty 4 baitai.
„Excel VBA“ sveikojo duomenų tipo pavyzdžiai
Toliau pateikiami VBA sveikųjų duomenų tipo pavyzdžiai.
1 pavyzdys
Kai mes deklaruojame kintamąjį, jam reikia priskirti duomenų tipą ir skaičių iš jų, kurį paprastai naudoja visi vartotojai, atsižvelgdami į reikalavimus.
Kaip sakiau, sveikasis skaičius gali turėti tik sveikus skaičius, o ne trupmeninius skaičius. Atlikite toliau nurodytus veiksmus, kad pamatytumėte VBA sveikojo skaičiaus duomenų tipo pavyzdį.
1 veiksmas: paskelbkite kintamąjį kaip sveikąjį skaičių.
Kodas:
Sub Integer_Pavyzdys () Dim k As Integer End Sub
2 žingsnis: priskirkite kintamajam „k“ 500 vertę.
Kodas:
Antrinis skaičius_pavyzdys1 () Dim k As Sveikasis skaičius k = 500 Pabaiga Sub
3 žingsnis: rodykite vertę VBA pranešimų laukelyje.
Kodas:
Antrinis skaičius_pavyzdys1 () Dim k As Sveikasis skaičius k = 500 MsgBox k Pabaiga Sub
Kai paleidžiame kodą naudodami F5 klavišą arba rankiniu būdu, pranešimų laukelyje galime pamatyti 500.
2 pavyzdys
Dabar kintamajam „k“ priskirsiu vertę –500.
Kodas:
Antrasis sveikasis_pavyzdys2 () Dim k As Sveikasis k = -500 MsgBox k Pabaiga Sub
Paleiskite šį kodą rankiniu būdu arba paspauskite F5. Tada pranešimo laukelyje taip pat bus rodoma vertė -500.
3 pavyzdys
Kaip sakiau VBA, sveikame duomenų tipe gali būti tik sveiki skaičiai, o ne trupmeniniai skaičiai, tokie kaip 25,655 arba 47,145.
Tačiau bandysiu priskirti trupmenos skaičių VBA sveikojo duomenų tipui. Pavyzdžiui, pažvelkite į žemiau pateiktą kodą.
Kodas:
Antrasis skaičius_pavyzdys3 () Dim k As sveikasis skaičius k = 85.456 MsgBox k End Sub
Aš priskyriau 85.456 kintamajam „k“. Aš paleisiu šį VBA kodą, norėdamas sužinoti, koks yra rezultatas.
- Rezultatas buvo 85, nors aš priskyriau trupmenos skaičiaus vertę. Taip yra dėl to, kad VBA trupmenos skaičius apvalina iki artimiausio sveiko skaičiaus.
- Visi trupmenos skaičiai, kurie yra mažesni nei 0,5, bus suapvalinti žemyn iki artimiausio sveiko skaičiaus. Pavyzdžiui, 2,456 = 2, 45,475 = 45.
- Visi trupmenos skaičiai, kurie yra didesni nei 0,5, bus suapvalinti iki artimiausio sveiko skaičiaus. Pavyzdžiui, 10,56 = 11, 14,789 = 15.
Jei norite dar kartą pažvelgti į apvalinamąjį sveikąjį skaičių, „k“ reikšmė bus 85,58.
Kodas:
Antrasis sveikasis_pavyzdys3 () Dim k As Sveikasis skaičius k = 85,58 MsgBox k Pabaiga Sub
Kai paleisiu šį kodą naudodamas F5 klavišą arba rankiniu būdu, jis grąžins 86, nes viskas, kas daugiau nei 0,5, bus suapvalinta iki kito sveiko skaičiaus.
„Excel VBA“ sveikojo duomenų tipo apribojimai
Perpildymo klaida: sveikųjų duomenų tipas turėtų veikti gerai, jei priskirta reikšmė yra nuo -32768 iki 32767. Tuo metu, kai ji peržengs ribą iš abiejų pusių, bus sukelta klaida.
Pavyzdžiui, pažvelkite į žemiau pateiktą kodą.
Kodas:
Antrinis skaičius_pavyzdys4 () Dim k As Sveikasis skaičius = 40000 MsgBox k Pabaiga Sub
Kintamajam „k“ priskyriau 40000 vertę.
Kadangi tikrai turiu išsamių žinių apie sveikąjį duomenų tipą, žinau, kad jis neveikia, nes sveikojo skaičiaus duomenų tipas negali laikyti vertės daugiau nei 32767.
Paleiskime kodą rankiniu būdu arba naudodami klavišą F5 ir pažiūrėkime, kas vyksta.
Oi !!!
Klaidą gavau kaip „perpildymą“, nes sveikųjų duomenų tipas negali turėti daugiau nei 32767 teigiamiems skaičiams ir -32768 neigiamiems skaičiams.
Tipo Neatitikimas klaida: sveikieji duomenys gali turėti tik skaitines reikšmes nuo -32768 iki 32767. Tarkime, kad bet kuris skaičius, priskirtas daugiau nei šie skaičiai, parodys perpildymo klaidą.
Dabar pabandysiu priskirti jam teksto ar eilutės reikšmes. Toliau pateiktame kodo pavyzdyje aš priskyriau vertę „Sveiki“.
Kodas:
Sub Integer_Pavyzdys4 () Dim k As Integer k = "Sveiki" MsgBox k End Sub
Aš paleisiu šį kodą naudodamas paleidimo parinktį arba rankiniu būdu ir pamatysiu, kas atsitiks.
Klaida rodoma kaip „Tipo neatitikimas“, nes mes negalime priskirti teksto vertės kintamajam „sveiko skaičiaus duomenų tipas“.
