Šajā rakstā mēs izveidosim pielāgotu funkciju, lai negatīvās virknes pārvērstu par veselu skaitli.
Šī raksta neapstrādātos datus veido virknes, kam seko mīnusa zīme (-).
Mēs vēlamies pārvērst šīs virknes par veseliem skaitļiem.
Loģisks skaidrojums
Šajā rakstā mēs esam izveidojuši pielāgotu funkciju ConvertNegNumbers, lai pārvērstu virkni par veselu skaitli. Šī funkcija ievada virknes vērtību un atgriež veselu skaitli kā izvadi.
Koda skaidrojums
Pa labi (Var, 1) = "-"
Iepriekš minēto kodu izmanto, lai pārbaudītu, vai virknes pēdējā rakstzīme ir vienāda ar mīnusa zīmi (-).
ConvertNegNumbers = CInt (" -" un pa kreisi (Var, Len (Var) - 1))
Iepriekš minētajā kodā kreisā funkcija tiek izmantota, lai iegūtu visas virknes rakstzīmes, izņemot pēdējo. Funkcija CInt tiek izmantota, lai virknes vērtību pārvērstu par veselu skaitli.
Lūdzu, sekojiet tālāk norādītajam kodam
Opcija Skaidra funkcija ConvertNegNumbers (var mainīties kā virkne) 'Pārbaude, vai virknes pēdējā rakstzīme ir mīnus (-) If Right (Var, 1) = "-" Tad' Virknes vērtības konvertēšana uz negatīvu veselu skaitli ConvertNegNumbers = CInt ("-" & Left (Var, Len (Var) - 1)) Citādi 'Virknes vērtības konvertēšana uz veselu skaitli ConvertNegNumbers = CInt (Var) End If End Function
Ja jums patika šis emuārs, kopīgojiet to ar saviem draugiem Facebook. Varat arī sekot mums Twitter un Facebook.
Mēs labprāt uzklausītu jūsu viedokli, dariet mums zināmu, kā mēs varam uzlabot savu darbu un padarīt to labāku jums. Rakstiet mums e -pasta vietnē