Презентация Скачать презентацию Решение задачи в VB, VBA(Word),VBA(Excel) онлайн

На нашем сайте вы можете скачать и просмотреть онлайн доклад-презентацию на тему Скачать презентацию Решение задачи в VB, VBA(Word),VBA(Excel) абсолютно бесплатно. Урок-презентация на эту тему содержит всего 13 слайдов. Все материалы созданы в программе PowerPoint и имеют формат ppt или же pptx. Материалы и темы для презентаций взяты из открытых источников и загружены их авторами, за качество и достоверность информации в них администрация сайта не отвечает, все права принадлежат их создателям. Если вы нашли то, что искали, отблагодарите авторов - поделитесь ссылкой в социальных сетях, а наш сайт добавьте в закладки.

Презентации » Информатика » Скачать презентацию Решение задачи в VB, VBA(Word),VBA(Excel)

Просмотр ВСЕЙ презентации! ЖМИТЕ

Оцените презентацию от 1 до 5 баллов!

Смотреть онлайн
Скачать

Тип файла:

ppt / pptx (powerpoint)
Всего слайдов:

13 слайдов
Для класса:

1,2,3,4,5,6,7,8,9,10,11
Размер файла:

5.72 MB
Просмотров:

65
Скачиваний:

0
Автор:

неизвестен

Слайды и текст к этой презентации:

№1 слайд

Содержание слайда:

№2 слайд

Содержание слайда: Запустить Visual Basic Запустить Visual Basic

№3 слайд

Содержание слайда: Программа, в которой вывод идет на форму Form1 Двойным щелчком зайти в программный код, в окне событий выбрать Activate, ввести программу.

№4 слайд

Содержание слайда: Программа, в которой вывод идет в файл C:\out.txt Private Sub Form_Activate() Dim A(1 To 100) As Integer Dim i As Byte Dim k As Integer Open “c:\out.txt” For output as #1 k = 2 A(1) = Val(InputBox("", "")) A(2) = Val(InputBox("", "")) i = 1 Do Until A(i + 1) = A(i) A(i + 2) = Val(InputBox("", "")) i = i + 1 k = k + 1 Loop For i = 1 To k Print #1, A(i); Next I Print #1, Print #1, k Close #1 End Sub

№5 слайд