Задания по Visual Basic 6.0

@Olga_Pak · Регистрация: 08.11.2010

Студворк — интернет-сервис помощи студентам

Привет, помогите пожалуйста!!! Мне нужно решить задачку по VB, всего одну. Тема: "Условные переходы. Одномерные массивы". Вот задача: Даны целые числа a, b, c. Если a<b<c, то все числа заменить их квадратами, если a>b>c, то каждое число заменить наибольшим из них, в противном случае сменить знак каждого числа.

@Alex77755 · 08.11.2010, 21:37

Так дай хоть шанс тебе помочь! Начни что-то делать!

@Olga_Pak · 08.11.2010, 21:43 **[ТС]**

Так я поэтому и обратилась за помощью! Помогите начать! Пожалуйста)

@Alex77755 · 08.11.2010, 21:55

Даже не знаю чем можно помочь..
Сказать что начни с посещения лекций, практических занятий.. Ну в крайнем случае с простенькой книжечки.
Как можно помочь человеку, который ничего не делает?
Ну начни с того, что запусти программу VB6 и создай "Standart EXE"
Брось на форму кнопку и напиши в создавшейся процедуре нужный тебе код. Если он будет работать не так, как тебе хотелось бы - скопируй код сюда и задай конкретный вопрос и тебе помогут разобраться

@Olga_Pak · 08.11.2010, 22:40 **[ТС]**

Проблема в том, что я не знаю какой код нужен, форму я создала, поместила три текстовых поля (для ввода чисел a, b, c) и три метки (соответственно, по условию задачи, если a<b<c, то в метках числа заменятся их квадратами, если a>b>c, то каждое число заменится наибольшим из них, в противном случае сменится знак каждого числа), поместила кнопку. Вот для кнопки нужно создать код. Помогите написать код, очень прошу)

@Alex77755 · 09.11.2010, 08:25

Мне вообще-то немного боязно за подрастающее поколение: если они во время учёбы не хотят выполнять требования программы, то как они собираются работать и руководить производством?
Тоже перекладывать свои обязанности на других? Только одна надежда есть выйдет такой "специалист" замуж, родит ребёнка и будет его ростить. Но ведь место в ВУЗе занимает!

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
Option Explicit
 
Private Sub Комманда1_Click()
 
Dim a As Integer
Dim b As Integer
Dim c As Integer
 
a = Текст1.Text
b = Текст2.Text
c = Текст3.Text
 
Метка1.Caption = -a
Метка2.Caption = -b
Метка3.Caption = -c
 
If a < b And b < c Then
Метка1.Caption = a ^ 2
Метка2.Caption = b ^ 2
Метка3.Caption = c ^ 2
End If
 
If a > b And b > c Then
Метка1.Caption = a
Метка2.Caption = a
Метка3.Caption = a
End If
 
End Sub

@Olga_Pak · 09.11.2010, 10:54 **[ТС]**

Спасибо Вам огромное! Вы мне очень помогли!

09.11.2010, 18:41

Здравствуйте!Помогите решить задачу,плиз!
Одна мастерская должна была сшить 800 костюмов, другая за тот же срок должна была сшить 900 костюмов. Первая закончила выполнение заказа за три дня до срока, вторая - за 6 дней до срока. Сколько костюмов в день шила каждая мастерская, если вторая мастерская шила в день на 4 костюма больше первой. В окне приложения предусмотреть ввод исходных данных.

Новые блоги и статьи Все статьи Все блоги /
Переходник USB-CAN-GPIO Eddy_Em 20.03.2026 Достаточно давно на работе возникла необходимость в переходнике CAN-USB с гальваноразвязкой, оный и был разработан. Однако, все меня терзала совесть, что аж 48-ногий МК используется так тупо: просто. . .	Оттенки серого Argus19 18.03.2026 Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .	SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++ 8Observer8 17.03.2026 Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip	Символические и жёсткие ссылки в Linux. algri14 15.03.2026 Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .
[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ФедосеевПавел 14.03.2026 Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .	делаю науч статью по влиянию грибов на сукцессию anaschu 13.03.2026 прикрепляю статью	SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++ 8Observer8 10.03.2026 Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:	Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE 8Observer8 10.03.2026 Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .

@Olga_Pak 0 / 0 / 0 Регистрация: 08.11.2010 Сообщений: 4

	Задания по Visual Basic 6.0 08.11.2010, 20:18. Показов 4108. Ответов 7 Метки нет (Все метки) Привет, помогите пожалуйста!!! Мне нужно решить задачку по VB, всего одну. Тема: "Условные переходы. Одномерные массивы". Вот задача: Даны целые числа a, b, c. Если a<b<c, то все числа заменить их квадратами, если a>b>c, то каждое число заменить наибольшим из них, в противном случае сменить знак каждого числа. 0

@Alex77755 11525 / 3812 / 683 Регистрация: 13.02.2009 Сообщений: 11,229
	08.11.2010, 21:37
	Так дай хоть шанс тебе помочь! Начни что-то делать! 0

@Olga_Pak 0 / 0 / 0 Регистрация: 08.11.2010 Сообщений: 4
	08.11.2010, 21:43 [ТС]
	Так я поэтому и обратилась за помощью! Помогите начать! Пожалуйста) 0

@Alex77755 11525 / 3812 / 683 Регистрация: 13.02.2009 Сообщений: 11,229
	08.11.2010, 21:55
	Даже не знаю чем можно помочь.. Сказать что начни с посещения лекций, практических занятий.. Ну в крайнем случае с простенькой книжечки. Как можно помочь человеку, который ничего не делает? Ну начни с того, что запусти программу VB6 и создай "Standart EXE" Брось на форму кнопку и напиши в создавшейся процедуре нужный тебе код. Если он будет работать не так, как тебе хотелось бы - скопируй код сюда и задай конкретный вопрос и тебе помогут разобраться 0

@Olga_Pak 0 / 0 / 0 Регистрация: 08.11.2010 Сообщений: 4
	08.11.2010, 22:40 [ТС]
	Проблема в том, что я не знаю какой код нужен, форму я создала, поместила три текстовых поля (для ввода чисел a, b, c) и три метки (соответственно, по условию задачи, если a<b<c, то в метках числа заменятся их квадратами, если a>b>c, то каждое число заменится наибольшим из них, в противном случае сменится знак каждого числа), поместила кнопку. Вот для кнопки нужно создать код. Помогите написать код, очень прошу) 0

@Olga_Pak 0 / 0 / 0 Регистрация: 08.11.2010 Сообщений: 4
	09.11.2010, 10:54 [ТС]
	Спасибо Вам огромное! Вы мне очень помогли! 0

Plotnic89
	09.11.2010, 18:41
	Здравствуйте!Помогите решить задачу,плиз! Одна мастерская должна была сшить 800 костюмов, другая за тот же срок должна была сшить 900 костюмов. Первая закончила выполнение заказа за три дня до срока, вторая - за 6 дней до срока. Сколько костюмов в день шила каждая мастерская, если вторая мастерская шила в день на 4 костюма больше первой. В окне приложения предусмотреть ввод исходных данных.