Форум программистов, компьютерный форум, киберфорум
Visual Basic .NET
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.60/5: Рейтинг темы: голосов - 5, средняя оценка - 4.60
0 / 0 / 0
Регистрация: 11.09.2011
Сообщений: 27

Подпрограммы. Процедуры с параметрами.

21.09.2011, 21:14. Показов 973. Ответов 3
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Составить программу, которая выводит следующее сообщение о своих возможностях
{F1 - вычисление длины окружности;
F2 - Вычисление площади круга;
F3 - Вычисление обьема шара;
F5 - Выход }


Ребят помогите, я незнаю как мне вызвать процедуру при нажатии клавиш F1, F2, F3, F5 и если я нажму F1 то должен ввести переменные для вычисения длины окружности, также с остольными клавишами =\
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
21.09.2011, 21:14
Ответы с готовыми решениями:

Вызов процедуры с параметрами
в общем туплю жестко но как вызвать процедуру в коде? Public Class Form1 Private SUB procedyra(BYVAL j AS DOUBLE, BYVAL i...

Подпрограммы с типизированными параметрами -значениями и параметрами-переменными
С помощью подпрограммы подсчитать сумму элементов главной диагонали для матриц 4х4 и 5х5 из вещественных чисел. Добавлено через 1...

Подпрограммы с типизированными параметрами -значениями и параметрами-переменными
Помогите пожалуйста). С помощью подпрограммы, определяющей принадлежность символа к заданному множеству, установить количество гласных букв...

3
 Аватар для час
48 / 48 / 2
Регистрация: 07.03.2011
Сообщений: 203
21.09.2011, 22:59
Попробуй для начала создай форму
Несколько кнопок (F1....)
И несколько полей для ввода данных(радиус =... ПИ = 3.14.... и тд.)
И поле для вывода результата
Когда всё заработает - будет легче дальше идти.
0
Почетный модератор
 Аватар для Памирыч
23251 / 9163 / 1084
Регистрация: 11.04.2010
Сообщений: 11,014
22.09.2011, 06:20
GusToc,
VB.NET
1
2
3
4
5
6
7
8
9
10
11
12
    Sub ProcWithParams(ByVal e As System.Windows.Forms.KeyEventArgs)
        Select Case e.KeyCode
            Case Keys.F1 : MsgBox("F1 - вычисление длины окружности")
            Case Keys.F2 : MsgBox("F2 - Вычисление площади круга")
            Case Keys.F3 : MsgBox("F3 - Вычисление обьема шара")
            Case Keys.F5 : Close()
        End Select
    End Sub
 
    Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
        ProcWithParams(e)
    End Sub
0
 Аватар для час
48 / 48 / 2
Регистрация: 07.03.2011
Сообщений: 203
22.09.2011, 09:15
О_о Я чёта ни так понял вопрос ?О_о
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
22.09.2011, 09:15
Помогаю со студенческими работами здесь

Задачник Абрамян. Процедуры и функции. Процедуры с числовыми параметрами
Описать процедуру RectPS(x1, y1, x2, y2, P, S), вычисляющую периметр P и площадь S прямоугольника со сторонами, параллельными осям ко- ...

Нужно заменить процедуры с параметрами, на процедуры без параметров
program p20A; uses CRT; type mas=array of integer; var X,Y: mas; N,i,m: integer; procedure zm (var q:mas); var a,b:...

Подпрограммы-функции. Переписать с применением подпрограммы-функции с параметрами
program lab6; const x:array of real=(2.3,4,5.1,5.7,7,2.9,3,8.2,9,3.3 ); var m,d,d1:real; i:integer; begin m:=0; for...

Процедуры и функции. Процедуры с числовыми параметрами
Процедуры и функции. Процедуры с числовыми параметрами Всем привет, помогите пожалуйста сделать задание:" Описать процедуру RectPS...

Вызов процедуры из другой процедуры с параметрами
Не подскажете как вызвать процедуру StringGrid1KeyUp procedure TMainForm.StringGrid1KeyUp(Sender: TObject; var Key: Word; Shift:...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
Камера Toupcam IUA500KMA
Eddy_Em 12.02.2026
Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу
zbw 12.02.2026
И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.
«Знание-Сила»
zbw 12.02.2026
«Знание-Сила» «Время-Деньги» «Деньги -Пуля»
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 12.02.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 11.02.2026
Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL3_image
8Observer8 10.02.2026
Содержание блога Библиотека SDL3_image содержит инструменты для расширенной работы с изображениями. Пошагово создадим проект для загрузки изображения формата PNG с альфа-каналом (с прозрачным. . .
Установка Qt-версии Lazarus IDE в Debian Trixie Xfce
volvo 10.02.2026
В общем, достали меня глюки IDE Лазаруса, собранной с использованием набора виджетов Gtk2 (конкретно: если набирать текст в редакторе и вызвать подсказку через Ctrl+Space, то после закрытия окошка. . .
SDL3 для Web (WebAssembly): Работа со звуком через SDL3_mixer
8Observer8 08.02.2026
Содержание блога Пошагово создадим проект для загрузки звукового файла и воспроизведения звука с помощью библиотеки SDL3_mixer. Звук будет воспроизводиться по клику мышки по холсту на Desktop и по. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru