|
Ответы на вопросы по VBA. 1 Опишите модификатор Public. Для чего он, с какими элементами языка vba. Приведите 3 примера и в каждом укажите, что означает в примере использование Public
53. Запишите в общем виде составной оператор присваивания, который увеличивает значение переменной слева от оператора на значение выражения в правой части. Приведите 4 примера.
Общий вид: variableorproperty += expression. Variableorproperty – может быть числовая переменная, текстовая переменная или свойство. Expression - любое числовое или текстовое выражение.
Dim num1 As Integer = 10
Dim num2 As Integer = 3
num1 += num2
' num1 - теперь значение равно 13
|
Dim str1 As String = "10"
Dim str2 As String = "5"
str1 += str2
' значение str1 равно "105"
|
Dim num1 As Integer = 15
Dim num2 As Integer = 5
num1 += num2
' num1 - теперь значение равно 20
|
Dim n As Integer
n += 1
' значение n равно 1 (аналог счетчика)
|
Приведенные выше примеры используются только в Visual Basic, их нет в VBA.
54. Запишите в общем виде форму вызова оператора присваивания объединения для добавления строки в конец уже существующих строк. Приведите 3 примера.
Общий вид: variableorproperty &= expression. Variableorproperty – любая текстовая переменная или свойство. Expression – любое текстовое выражение.
Dim var1 As String = "Hello "
Dim var2 As String = "World!"
var1 &= var2
'var1–строка равна "Hello World!"
|
Dim var1 As String = "Лимо"
Dim var2 As String = "над"
var1 &= var2
'var1–строка равна "Лимонад"
|
Dim var1 As String = "Кто "
Dim var2 As String = "ест?"
var1 &= var2
'var1–строка равна "Кто ест?"
|
Приведенные выше примеры используются только в Visual Basic, их нет в VBA.
55. Запишите в общем виде форму вызова оператора для деления двух чисел и получения остатка от их деления. Приведите 3 примера с демонстрацией результата выполнения.
Общий вид: result = number1 Mod number2. Result - любая числовая переменная или свойство. Number1 - произвольное числовое выражение. Number2 - произвольное числовое выражение.
Dim res As Integer
res = 10 Mod 5
Debug.Print res
' вывод: 0
|
Dim res As Integer
res = 10 Mod 3
Debug.Print res
' вывод: 1
|
Dim res As Integer
res = -10 Mod 3
Debug.Print res
' вывод: -1
| |
|
|
Скачать 245.69 Kb.