Разделы презентаций
- Разное
- Английский язык
- Астрономия
- Алгебра
- Биология
- География
- Геометрия
- Детские презентации
- Информатика
- История
- Литература
- Математика
- Медицина
- Менеджмент
- Музыка
- МХК
- Немецкий язык
- ОБЖ
- Обществознание
- Окружающий мир
- Педагогика
- Русский язык
- Технология
- Физика
- Философия
- Химия
- Шаблоны, картинки для презентаций
- Экология
- Экономика
- Юриспруденция
Экономическая информатика I Visual Basic for Applications
Содержание
- 1. Экономическая информатика I Visual Basic for Applications
- 2. Константыарифметические (числовые) – 5; -12; 2,4E15текстовые (символьные)
- 3. ПеременныеПеременные – это область памяти, где программы
- 4. Встроенные функции
- 5. Арифметические выражения
- 6. Символы операций сравнения
- 7. Примеры использования операторов сравнения
- 8. Символы логических операций
- 9. Логические выражения
- 10. Приоритеты операций
- 11. Приоритеты операций
- 12. Приоритеты операций
- 13. Оператор присваивания
- 14. Ввод данных в диалоговом режимеSub Приветствие()
- 15. Ввод данных в диалоговом режиме
- 16. Однострочный оператор IF/ThenIf L Then P,где L
- 17. Многострочный If / Then / End IfIf
- 18. Оператор If / Then / Else /
- 19. Оператор Select Case / Case / Case
- 20. Function FunInt(X)Select Case X Case Is 5 FunInt = 1End SelectEnd Function
- 21. Оператор цикла For / NextFor I =
- 22. ПримерFunction Сумм1(N1,N2) Dim k Сумм1 = 0 For k =N1 To N2 Сумм1 = Сумм1 + k Next kEnd Function
- 23. Оператор цикла DO While / LoopDo While
- 24. ПримерFunction Сумм100(Nstart) Dim n Сумм100 = 0 ' начальное
- 25. Оператор цикла Do Until / LoopDo Until
- 26. ПримерSub PassWord() Dim PW PW = " " '
- 27. Оператор выхода ExitExit SubExit FunctionExit ForExit Do
- 28. Скачать презентанцию
Константыарифметические (числовые) – 5; -12; 2,4E15текстовые (символьные) – "пример процедуры"Логические (булевы) – true, falseДаты - #08/30/20012#* ? 31.08.2012
Слайды и текст этой презентации
Слайд 2Константы
арифметические (числовые) – 5; -12; 2,4E15
текстовые (символьные) – "пример процедуры"
Логические
(булевы) – true, false
Слайд 3Переменные
Переменные – это область памяти, где программы сохраняют значения.
Переменные не
должны содержать пробелов, но могут содержать знак подчеркивания (_).
Примеры: x,
y1, mon, Проц_ставка.
Слайд 14Ввод данных в диалоговом режиме
Sub Приветствие()
Dim user
user = InputBox(«Ваше имя? ")
MsgBox "Привет", user
End Sub
Слайд 16Однострочный оператор IF/Then
If L Then P,
где L - логическое выражение,
P - оператор.
Function Частн(x,y)
If y 0 Then Частн =
x/yEnd Function
Слайд 17Многострочный If / Then / End If
If L Then
P1
P2
...
Pn
End If
Здесь
L - логическое выражение
Function Корень4(x)
Dim Кор2
If x >= 0 Then
Кор2
= sqr(x) ' Кор2 - промежуточная переменнаяКорень4 = sqr(Кор2)
End If
End Function
Слайд 18Оператор If / Then / Else / End If
If L
Then
P1
...
Pn
Else
Q1
...
Qm
End If
Здесь L - логическое выражение, P1,..., Pn, Q1,..., Qm
- операторы.
Слайд 19Оператор Select Case / Case / Case Else / End
Select
Select Case A
Case A1
P1
17
....
Case An
Pn
Case Else
Ps
End Sel
Здесь A – выражение,
A1,A2,...,An – подмножества множества значений А. 
Слайд 20Function FunInt(X)
Select Case X
Case Is
текущее значение переменной X.
FunInt = 0
Case -1 To 3
FunInt
= 0,2Case 3 To 5
FunInt = 0,7
Case Else ' эквивалентная запись Case Is > 5
FunInt = 1
End Select
End Function
Слайд 21Оператор цикла For / Next
For I = start To end
P1
...
Pn
Next
I
Здесь I – переменная (счетчик), start – начальное значение счетчика,
end – конечноезначение счетчика, P1, ..., Pn – операторы.
Слайд 22Пример
Function Сумм1(N1,N2)
Dim k
Сумм1 = 0
For k =N1 To N2
Сумм1 =
Сумм1 + k
Next k
End Function
Слайд 23Оператор цикла DO While / Loop
Do While L
P1
...
Pn
Loop
Здесь L -
логическое выражение, P1, ..., Pn - операторы.
Слайд 24Пример
Function Сумм100(Nstart)
Dim n
Сумм100 = 0 ' начальное значение суммы
n =
Nstart
Do While n < =100
Сумм100 = Сумм100 + n
n =
n + 1Loop
End Function
Слайд 25Оператор цикла Do Until / Loop
Do Until L
P1
...
Pn
Loop
Здесь L –
логическое выражение, P1, ..., Pn – операторы.
Слайд 26Пример
Sub PassWord()
Dim PW
PW = " " ' начальное значение пароля
- пробел
Do Until PW = "Stud123"
PW = InputBox( "Пароль?" )
Loop
End
Sub
Похожие презентации
Обратная связь
Если не удалось найти и скачать доклад-презентацию, Вы можете заказать его на нашем сайте. Мы постараемся найти нужный Вам материал и отправим по электронной почте. Не стесняйтесь обращаться к нам, если у вас возникли вопросы или пожелания:
Email: Нажмите что бы посмотреть
Что такое TheSlide.ru?
Это сайт презентации, докладов, проектов в PowerPoint. Здесь удобно хранить и делиться своими презентациями с другими пользователями.