17036

Одномірні масиви в Visual BASIC

Лабораторная работа

Информатика, кибернетика и программирование

Лабораторна робота №14 Тема. Одномірні масиви Мета: відробити прийоми створення одномірних статичних масивів у VB. Обладнання: ПК ПЗ VB 6.0. Хід роботи Індивідуальне завдання. Скласти програму в VB 6.0 для розвязання задачі. 19 ...

Украинкский

2013-06-29

39 KB

8 чел.

Лабораторна робота №14

Тема. Одномірні масиви

Мета: відробити прийоми створення одномірних, статичних  масивів у VB.

Обладнання: ПК, ПЗ VB 6.0.

Хід роботи

Індивідуальне завдання.

Скласти програму в VB 6.0 для розв’язання задачі.

19

Знайти кількість елементів менших заданого значення w.

Листинг

Результат

Private Sub Command1_Click()

Dim a(1 To 5) As Double, i As Integer, w As Double, l As Integer

a(1) = Text1.Text

a(2) = Text2.Text

a(3) = Text3.Text

a(4) = Text4.Text

a(5) = Text5.Text

w = Text6.Text

For i = 1 To 5

If a(i) < w Then l = l + 1

Next

Text7.Text = l

End Sub

Контрольні питання.

  1.  Дайте визначення масиву.
  2.  Дайте визначення статичного масиву.
  3.  Синтаксис оголошення одномірного масиву.


 

А также другие работы, которые могут Вас заинтересовать

14365. КОЛЬЦА НЬЮТОНА 808.5 KB
  Работа N 71.1. КОЛЬЦА НЬЮТОНА Прежде чем приступить к работе необходимо ознакомиться с введением по теме Интерференция и дифракция. ЦЕЛЬ РАБОТЫ: измерить длины волн излучения ртутной лампы и радиус кривизны линзы из анализа интерференционной картины в виде колец Ньют
14366. ОПРЕДЕЛЕНИЕ СКОРОСТИ УЛЬТРАЗВУКА ОПТИЧЕСКИМИ МЕТОДАМИ 405 KB
  СВЕТ ЗВУК X Z Введение по теме 72. ОПРЕДЕЛЕНИЕ СКОРОСТИ УЛЬТРАЗВУКА ОПТИЧЕСКИМИ МЕТОДАМИ УЛЬТРАЗВУК И ОПРЕДЕЛЕНИЕ НЕКОТОРЫХ МОЛЕКУЛЯРНЫХ ПАРАМЕТРОВ. Ультразвук  это упругие волны с частотами выше условной границы восприятия чел...
14367. Поляризация света 1.12 MB
  Поляризация света и поляризированный свет Часть электромагнитного излучения лежащая в диапазоне длин волн от 400 до 760 нм воспринимается человеческим глазом и называется светом. Световая волна характеризуется вектором напряженности электричества...
14368. КВАНТОВАЯ ОПТИКА. ЛАЗЕРЫ 110.5 KB
  КВАНТОВАЯ ОПТИКА Введение по теме 74. ЛАЗЕРЫ Квантовые свойства света проявляются при испускании и поглощении его веществом. Количественными характеристиками этих процессов являются спектры испускания и поглощения. Вид спектров поглощения и испускания зависит от при...
14369. ЭЛЕКТРИЧЕСТВО ПОСТОЯННЫЙ ЭЛЕКТРИЧЕСКИЙ ТОК 4.5 MB
  Описания лабораторных работУчебной лаборатории физического эксперимента физического факультета СПбГУ Часть IV ЭЛЕКТРИЧЕСТВО ПОСТОЯННЫЙ ЭЛЕКТРИЧЕСКИЙ ТОК Данное пособие содержит описания лабораторных работ по разделу Электричест
14370. Расчет коэффициента внутреннего трения жидкости по методу Стокса 99.5 KB
  Лабораторная работа №17 по дисциплине Физика на тему: Определение коэффициента внутреннего трения жидкости по методу Стокса 1. Цели и задачи: целью данной работы является определение коэффициента динамической вязкости исследуемой жидкости при температур...
14371. Финансовое планирование в организации 740.5 KB
  Понятие финансового планирования. Содержание и цели финансового планирования. Основные принципы и задачи финансового планирования. Виды финансовых планов, составляемых в организации: перспективные, текущие и оперативные планы, планы финансирования капитальных вложений, планы текущих операций.
14372. Определение отношения теплоемкостей газов Cp/Cv методом адиабатического расширения 96 KB
  Лабораторная работа № 9 по дисциплине Физика на тему: Определение отношения теплоемкостей газов Cp/Cv методом адиабатического расширения 1. Цели и задачи: в работе необходимо определить γ = Cp/Cv для воздуха используя адиабатический метод Клемана и Дезорма. 2...
14373. Определение удельной теплоты плавления льда и изменения энтропии в процессе плавления 86.5 KB
  Лабораторная работа №15 по дисциплине Физика на тему: Определение удельной теплоты плавления льда и изменения энтропии в процессе плавления. 1. Цели и задачи: определение калориметрическим методом удельной теплоты фазового перехода λ и расчет изменения эн