Создайте Ваш сайт учителя Видеоуроки Олимпиады Вебинары для учителей
VISUAL BASIC6.0
Практическая работа «Слово-ПЕРЕВЕРТЫШ»
9 класс_УгриновичН.Д Информатика и ИКТ
Dim S As String, N As Byte
Private Sub Command1_Click()
Label1.Caption = " "
N = 1
Do While N <= Len(Text1.Text)
S = Mid(Text1.Text, N, 1)
Label1.Caption = S + Label1.Caption
N = N + 1
Loop
End Sub
Сохранение продукта и компилирование
Нажмите File- Save Project As-сохранение продукта (для дальнейшего редактирование) «Исходники»
Make Project.exe –компилирование продукта для запуска без VB
* Свидетельство о публикации выдается БЕСПЛАТНО, СРАЗУ же после добавления Вами Вашей работы на сайт
