Студопедия

Главная страница Случайная страница

Разделы сайта

АвтомобилиАстрономияБиологияГеографияДом и садДругие языкиДругоеИнформатикаИсторияКультураЛитератураЛогикаМатематикаМедицинаМеталлургияМеханикаОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРелигияРиторикаСоциологияСпортСтроительствоТехнологияТуризмФизикаФилософияФинансыХимияЧерчениеЭкологияЭкономикаЭлектроника






Переменная s принимает значение, равное.






Установите, сколько раз выполнится тело цикла в последовательности инструкций?

s=10

x=5

Do While x< =s

s=s-1

x=x+1

Loop

При выполнении последовательности инструкций

s=3

x=10

Do Until x< 7

s=s+1

x=x-2

Loop

Переменная s принимает значение, равное...

Сколько раз выполнится тело цикла в последовательности инструкций?

s=3

x=10

Do Until x< 7

s=s+1

x=x-2

Loop

Выберите цикл, который используется для повторения операций до тех пор, пока условие ложно:

Do...Until

Укажите, какая функция производит замену одного символа в строке на другой?

Replace

Какие объекты используются при программировании действий с массивами в MS Excel?

сells(i, j)

Объекты, обладающие свойствами, определяющими их внешний вид, методами, определяющими их поведение, событиями, определяющими взаимодействие с пользователем, называются...

формами

Укажите, какими командами можно запрограммировать кнопку, которая убирает форму VBA с экрана?

userform1.hide

unload me

Выберите функции VBA, которые относятся к строковым:

Len

Mid

Какой метод используется для заполнения раскрывающегося списка в форме?

Additem

Фоновая заливка поля электронной формы устанавливается с помощью свойства...

BackColor

В результьтате выполнения последовательности инструкций

q=347856: f=3

w=replace(q, 5, f)

v=right(w, 2)

Переменная v примет значение...

Фоновая картинка для электронной формы устанавливается при помощи свойства...

Picture

Какое значение примет переменная q после выполнения последовательности инструкций:

Sub qw

w = 14

Select case w

case 10 to 12: q=1

case 12 to 14: q=2

case 14 to 16: q=3

case else: q=4

End select

End sub

Какое значение примет переменная q после выполнения последовательности инструкций:

Sub qw()

w = 14

Select Case w

Case w=10 to w=12: q = 1

Case w=12 To w=14: q = 2

Case w=14 To w=16: q = 3

Case Else: q = 4

End Select

End Sub

Укажите верную последовательность создания электронных форм:

1 Добавление формы в проект

2 Добавление элементов управления на поле формы

3 Программирование формы и элементов управления

4 Тестирование формы

5 Экспорт формы

Каково будет значение переменной r после выполнения последовательности инструкций, если при диалоге будет введено r=10, t=17

Sub rt()

r = InputBox(" введите r")

t = InputBox(" введите t")

If (r < 11) And (t > 16) Then

r = r + t

Else

r = t

End If

MsgBox r

End Sub

В процедуру вводятся размеры помещения: длина х ширина х высота = 5 х 4 х 3. Требуется рассчитать площадь стен. Какой результат будет выведен?

Последовательность инструкций

Sub tt()

Dim t As Single

t = " qwerty"

t = Left(t, 1)

MsgBox t

End Sub

Приведет...

к появлению ошибки несоответствия типов данных






© 2023 :: MyLektsii.ru :: Мои Лекции
Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав.
Копирование текстов разрешено только с указанием индексируемой ссылки на источник.