Страница: 1 |
Страница: 1 |
Вопрос: Как писать код
Добавлено: 08.05.08 15:14
Автор вопроса: Inoyat
я навичок !!!!!!!!!!
как пистаь код
например при нажатии комманд1
слова появилось обратный
например
Иноят=тяони и.т.д
создал text1 text2 и Command1
Заране огромный спасибо
Ответы
Всего ответов: 2
Номер ответа: 1
Автор ответа:
User Unknown
Вечный Юзер!
ICQ: uu@jabber.cz
Вопросов: 120
Ответов: 3302
Профиль | | #1
Добавлено: 08.05.08 15:43
В кнопку вставь:
Dim lLen As Long, lCtr As Long
Dim sChar As String
Dim sAns As String
lLen = Len(Text1.text)
For lCtr = lLen To 1 Step -1
sChar = Mid(Text1.text, lCtr, 1)
sAns = sAns & sChar
Next
Text2.text = sAns
Номер ответа: 2
Автор ответа:
D o c a l
ICQ: 408802757
Вопросов: 76
Ответов: 985
Web-сайт:
Профиль | | #2
Добавлено: 08.05.08 23:54
Strreverse