При выводе любого слова букву "а" сделать заглавной - VB
Формулировка задачи:
Привет всем)
Подскажите, пожалуйста. Как сделать так, чтобы при выводе любого слова буква "а" становилась заглавная.?
И вопрос номер два. Как сделать так, чтобы при выводе тоже, любого слова каждая его третья буква становилась заглавной?)
Заранее спасибо)
Решение задачи: «При выводе любого слова букву "а" сделать заглавной»
textual
Листинг программы
- Private Sub Command1_Click()
- Me.Text1.Text = up3(Me.Text1.Text)
- End Sub
- Function up3(S As String) As String
- n% = Len(S)
- up3 = S
- For i% = 3 To n% Step 3
- Mid$(up3, i%, 1) = UCase$(Mid$(up3, i%, 1))
- Next i%
- End Function
- Private Sub Command2_Click()
- Unload Me
- End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д