Как перебрать все символы в строке?
Категория: Basic
2012-09-17 15:45:49
code: #vba
iText = "Строка, содержащая $, №, ?, а также A, B, C" For iCount = 1 To Len(iText) iSymbol = Mid(iText, iCount, 1) MsgBox iSymbol Next
Поделиться:
iText = "Строка, содержащая $, №, ?, а также A, B, C" For iCount = 1 To Len(iText) iSymbol = Mid(iText, iCount, 1) MsgBox iSymbol Next