Презентация "РЕШЕНИЕ ЗАДАЧИ В VB, VBA(WORD),VBA(EXCEL)" - скачать презентации по Информатике

Нажмите для полного просмотра!

Презентация "РЕШЕНИЕ ЗАДАЧИ В VB, VBA(WORD),VBA(EXCEL)" - скачать презентации по Информатике, слайд №2

Презентация "РЕШЕНИЕ ЗАДАЧИ В VB, VBA(WORD),VBA(EXCEL)" - скачать презентации по Информатике, слайд №3

Презентация "РЕШЕНИЕ ЗАДАЧИ В VB, VBA(WORD),VBA(EXCEL)" - скачать презентации по Информатике, слайд №4

Презентация "РЕШЕНИЕ ЗАДАЧИ В VB, VBA(WORD),VBA(EXCEL)" - скачать презентации по Информатике, слайд №5

Презентация "РЕШЕНИЕ ЗАДАЧИ В VB, VBA(WORD),VBA(EXCEL)" - скачать презентации по Информатике, слайд №6

Презентация "РЕШЕНИЕ ЗАДАЧИ В VB, VBA(WORD),VBA(EXCEL)" - скачать презентации по Информатике, слайд №7

Презентация "РЕШЕНИЕ ЗАДАЧИ В VB, VBA(WORD),VBA(EXCEL)" - скачать презентации по Информатике, слайд №8

Презентация "РЕШЕНИЕ ЗАДАЧИ В VB, VBA(WORD),VBA(EXCEL)" - скачать презентации по Информатике, слайд №9

Презентация "РЕШЕНИЕ ЗАДАЧИ В VB, VBA(WORD),VBA(EXCEL)" - скачать презентации по Информатике, слайд №10

Презентация "РЕШЕНИЕ ЗАДАЧИ В VB, VBA(WORD),VBA(EXCEL)" - скачать презентации по Информатике, слайд №11

Презентация "РЕШЕНИЕ ЗАДАЧИ В VB, VBA(WORD),VBA(EXCEL)" - скачать презентации по Информатике, слайд №12

Презентация "РЕШЕНИЕ ЗАДАЧИ В VB, VBA(WORD),VBA(EXCEL)" - скачать презентации по Информатике, слайд №13

Содержание ▲

Вы можете ознакомиться и скачать презентацию на тему Презентация "РЕШЕНИЕ ЗАДАЧИ В VB, VBA(WORD),VBA(EXCEL)" - скачать презентации по Информатике. Доклад-сообщение содержит 13 слайдов. Презентации для любого класса можно скачать бесплатно. Если материал и наш сайт презентаций Mypresentation Вам понравились – поделитесь им с друзьями с помощью социальных кнопок и добавьте в закладки в своем браузере.

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

Слайд 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 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