Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky

Domáce Hardware Siete Programovanie Softvér Otázka Systémy

Ako Skontrolujte , či reťazec k abecede iba v VB

Visual Basic aplikácie obvykle umožňujú používateľom vstupných dát pomocou klávesnice . Dezinfekcia a transformáciu tejto surové informácie do použiteľnej dát je zásadným úlohou pre vývojárov . Napríklad , to je často nutné filtrovať a odstrániť non - abecedné znaky pre ochranu aplikácií z bezpečnostných exploitov . Očista dát a zachovanie jednotnosti je dôležité pri ukladaní dát , ktorá zabráni vytváraniu duplicitných záznamov . Visual Basic 6 poskytuje mnoho funkcií pre manipuláciu s reťazec , čo je jednoduchá úloha písať kód , ktorý kontroluje non - abecedné znaky . Pokyny dovolená 1

Otvorte Visual Basic 6 z ikony " Štart " , ktorý sa nachádza na paneli úloh systému Windows .
2

Vyberte " Standard.exe " a kliknite na " Otvoriť " spustiť novú aplikáciu Visual Basic 6 aplikácií .
3

Presuňte ikonu " textové pole " do okna s nápisom " Form1 " , vytvorenie textového poľa s označením " Text1 . "

4

Pretiahnite ikonu " CommandButton " do okna s nápisom " Form1 " , vytvára tlačidlo označené " Command1 . "
5

Dvojitým kliknutím na tlačidlo označené " Command1 " otvorte kód okno . Pod riadkom " Private Sub Command1_Click ( ) " vložte kód :

dim scompare As String

dim iCount As Integer

iCount = 1 Ľan ( Text1. text )

scompare = Mid $ ( Text1.Text , iCount , 1 )

Text1.Text = Mid $ ( Text1.Text , iCount + 1 , Ľan _ ( Text1.Textt ) )

Ak scompare Like ( " [ aZ ] " ) Alebo _

scompare Like ( " [ az ] " ) Alebo _

scompare Like ( " # " ) Potom

MsgBox ( " iba Alpa znaky " )

Else

MsgBox ( nájdených Non - abecedné znaky " )

Exit Function

Koniec ak

Ďalšie iCount
6

Stlačte klávesu " F5 " , na vykonanie aplikácie Visual Basic . Zadajte text , ktorý chcete skontrolovať v textovom poli . Kliknite na tlačidlo označené " Command1 , " a správa sa bude zobrazovať overenie , či text je abecedný , alebo nie .

Najnovšie články

Copyright © počítačové znalosti Všetky práva vyhradené