Создать два текстовых поля - VB

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

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

Вобщем нужно создать два текстовых поля. В одном из них печатаешь слово, а после команды надо чтобы во втором окне печаталось: каждая четная буква была большой. Максимум что я смогла - это чтобы все буквы стали большими. помогите пожалуйста.Заранее спасибо

Решение задачи: «Создать два текстовых поля»

textual
Листинг программы
For i = 1 To Len(Text1.Text)
a = IIf(i Mod 2, UCase(Mid(Text1.Text, i, 1)), LCase(Mid(Text1.Text, i, 1)))
Text2.Text = Text2.Text & a
Next

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

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

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