Разбить строку на 3 части - VB

Узнай цену своей работы

Формулировка задачи:

Есть строка:removed@mail.ru:пароль Нужно поделить её на три части(отдельно логин отдельно домен отдельно пароль) Спасибо!

Решение задачи: «Разбить строку на 3 части»

textual
Листинг программы
Private Sub Command1_Click()
    Dim i As Integer, s As String, a As String, b As String, c As String
      s = "login@yandex.ru:пароль"
      a = Split(Split(s, ":")(0), "@")(0)
      b = Split(Split(s, ":")(0), "@")(1)
      c = Split(s, ":")(1)
    Print a, b, c
End Sub

ИИ для рефератов и докладов


  • Экспорт Word по ГОСТу
  • Минимум 80% уникальности текста
  • Поиск релевантных источников в интернете
  • Готовый документ за 2 минуты

Оцени полезность:

5   голосов , оценка 4 из 5
Похожие ответы