Текст этой презентации
Слайд 1
Презентация к уроку по теме«Строковый тип данных Операции со строками и стандартные функции »
Выполнил преподаватель ГБПОУ «АПК им. П.И. Пландина»
Боков Р.А.
Слайд 2
Тема Строковый тип данных Операции со строками и стандартные функции
Цели занятия: изучить строковый тип данных научиться работать со строковым типом данных
Дата: 23.03.2016
Слайд 3
Задачи занятия: вспомнить типы данных
узнать как задается строковый тип данных
изучить основные операции со строками
изучить основные стандартные функции для работы со строковыми переменными
разобрать задачи по работе со строковым типом данных
Слайд 4
Строковый тип в VBA обозначается как String
Dim A as String Значением строковой переменной является строка символов, заключённых в кавычки
A =“Демо функции Len”
Слайд 5
Sub Pr1 ()
Dim A as Integer
Dim B as Integer
Dim C as Integer
A=19 B=51 C=A+B MsgBox “C=” & C
End Sub
Sub Pr2 ()
Dim A as String
Dim B as String
Dim C as String A= “19” B=“51” C=A+B MsgBox “C=” & C
End Sub
Рассмотрим следующие примеры
Слайд 6
Операция слияния в VBA выполняется с помощью знаков «+» и «&» Основные функции при работе со строковыми переменными:
• Len(MyString) - определяет количество символов ( т.е. находит длину строки) в строковой переменной MyString, значением является число;
• Mid(MyString,I,N) - вырезает в строке MyString, начиная с позиции I, N символов;
Слайд 7
Рассмотрим задачи Дан текст, найти количество символов в нём Sub Pr3_len() Dim MyString as String Dim Dl as Integer MyString = "Демо функции Len" Dl = Len(MyString) MsgBox “Длина=” & Dl
End Sub
Слайд 8
Рассмотрим следующую программу
Какие слова из текста получим после выполнения программы?
Sub Pr4_mid() Dim MyString as String Dim Word1 as String Dim Word2 as String MyString = “Демо функция Mid”
Word1 = Mid(MyString, 1, 4) MsgBox Word1
Word2 = Mid(MyString, 14, 3) MsgBox Word2
Word3 = “э”+Mid(MyString, 3, 2)+Mid(MyString, 10, 3) MsgBox Word3
End Sub
Слайд 9
Самостоятельная работа Карточка №1
1) Набрать программу Pr3 и проверить её. 2) Самостоятельно. Даны две фамилии. Определить, какая из них длиннее.
3) Набрать программу Pr4 и проверить её.
4) Самостоятельно вывести слово «функция».
5)Путём вырезок и склеек букв из слова programma получить rom и rampa
Слайд 10
Игра «Звездный час» Необходимо придумать и вывести на экран, как можно больше слов из слова «Информатика» Буквы из слова не должны дважды повторяться. Победителям - дополнительная оценка!
Слайд 11
Рассмотрим задачу Дано слово «барабан», найти количество повторений буквы «а»
MyString = "барабан"
Y = Len(MyString) k = 0
For I = 1 To Y Bukva = Mid(MyString, I, 1) If Bukva = "а" Then k = k + 1 Next I MsgBox "Кол-во букв а в слове " & MyString & " = " & k
End Sub
Sub Pr6_mid() Dim MyString As String Dim Bukva As String Dim Y As Integer Dim k As Integer
Слайд 12
Самостоятельная работа Карточка№2
1)Набрать программу Pr6 и проверить её.
2)Дано слово. Подсчитать количество любого запрашиваемого символа.
3) Дано слово. Верно ли, что оно начинается и оканчивается на одну и ту же букву?
4) Дано предложение. Все буквы «е» в нем заменить на букву «и». 5)Дано предложение. Определить, каких букв в нем больше: «м» или «н».
Оформление отчёта по самостоятельной работе в тетради
Слайд 13
Домашнее задание: 1. Дана фраза. Определить, сколько в ней предложений.
2. Дано слово, определить является ли оно перевертышем. Пример: казак, доход, ДОМ МОД.
Слайд 14
Спасибо за занятие!!!