Teď jste offline a čekáte, až se znova připojí internet.

Použití funkce Rozdělit ke vložení s oddělovači řetězec do String Array

Důležité: Tento článek byl přeložen pomocí software společnosti Microsoft na strojový překlad, ne profesionálním překladatelem. Společnost Microsoft nabízí jak články přeložené překladatelem, tak články přeložené pomocí software na strojový překlad, takže všechny články ve Znalostní databázi (Knowledge Base) jsou dostupné v češtině. Překlad pomocí software na strojový překlad ale není bohužel vždy dokonalý. Obsahuje chyby ve skloňování slov, skladbě vět, nebo gramatice, podobně jako když cizinci dělají chyby při mluvení v češtině. Společnost Microsoft není právně zodpovědná za nepřesnosti, chyby nebo škody vzniklé chybami v překladu, nebo při použití nepřesně přeložených instrukcí v článku zákazníkem. Společnost Microsoft aktualizuje software na strojový překlad, aby byl počet chyb omezen na minimum.

Projděte si také anglickou verzi článku:266289
Souhrn
Tento článek ukazuje, jak pomocí funkce rozdělit do samostatných oddělovači řetězec do pole řetězců. Ačkoli v dokumentaci k produktu Microsoft Visual Basic popisuje, jak pomocí funkce rozdělit, dokumentaci k produktu neobsahuje příklad používá funkci rozdělit.
Další informace
Split Function Vrátí jednorozměrné pole, která obsahuje zadaný počet podřetězců. Pomocí této funkce lze vložit řetězec odděleny znakem oddělovače do pole řetězců získat hodnotu každého podřetězec.

Vytvoření projektu ukázkové následujícím postupem:
  1. Vytvoření nového projektu Standardní EXE. Jako výchozí je vytvořen formulář Form1.
  2. Přidat CommandButton Form1.
  3. Přidejte následující kód do okna kódu Form1:
    Option ExplicitPrivate Sub Command1_Click()   Dim strTest As String   Dim strArray() As String   Dim intCount As Integer      strTest = "Fred & Wilma & Barney & Betty"   strArray = Split(strTest, "&")      For intCount = LBound(strArray) To UBound(strArray)      Debug.Print Trim(strArray(intCount))   NextEnd Sub					
  4. V nabídce Zobrazit klepněte na tlačítko okno Immediate.
  5. V nabídce Run klepněte na tlačítko Start nebo stisknutím klávesy F5 spustíte program.
  6. Klepněte na Command1 příkazového tlačítka. VÝSLEDKY: každý název v strTest proměnné se zobrazí na jednotlivém řádku.

Upozornění: Tento článek je přeložený automaticky

Vlastnosti

ID článku: 266289 - Poslední kontrola: 07/15/2004 20:33:30 - Revize: 1.3

Microsoft Visual Basic 6.0 Professional Edition, Microsoft Visual Basic Enterprise Edition for Windows 6.0

  • kbmt kbhowto kbstring KB266289 KbMtcs
Váš názor