Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.50/6: Рейтинг темы: голосов - 6, средняя оценка - 4.50
0 / 0 / 0
Регистрация: 22.09.2010
Сообщений: 26
1

Предусмотреть выбор операции над числами с помощью RadioButton

18.11.2013, 14:41. Просмотров 1185. Ответов 3
Метки нет (Все метки)

Здравствуйте помогите пожалуйста с задачкой.
На форме расположены метки с пояснительным текстом, два поля для ввода чисел, кнопка «Вычислить», две рамки, четыре переключателя для выбора операции, три флажка для выбора способа вывода и метка для вывода результата. Кнопка «Вычислить» считывает числа из полей, выполняет выбранную операцию и выводит выбранным способом результат операции и ее название.
должно получится как на рисунке с низу.
0
Миниатюры
Предусмотреть выбор операции над числами с помощью RadioButton  
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
18.11.2013, 14:41
Ответы с готовыми решениями:

С помощью операторов выбора реализовать арифметические операции над двумя числами
Помогите пожалуйста. Надо Вести с клавиатуры 2 числа с помощью операторов выбора реализовать...

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

Выбор арифметической операции через RadioButton
Разбираюсь на примерах калькулятора Имеется форма с двумя эдитами и 4мя радио батонами...

Операции над числами
Какая операция над двумя числами А и В (сложение,умножение,деление) даёт наибольший результат?

3
Заблокирован
18.11.2013, 14:58 2
Машуль, Вы приложили б лучше файл с формой вместо картинки.
0
0 / 0 / 0
Регистрация: 22.09.2010
Сообщений: 26
18.11.2013, 15:06  [ТС] 3
файл в архиве, не получилось сам файл отправить
0
Вложения
Тип файла: rar V19.rar (13.4 Кб, 13 просмотров)
6067 / 1311 / 194
Регистрация: 12.12.2012
Сообщений: 1,024
18.11.2013, 23:10 4
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Здравствуйте, Машуль,
Предлагаю такой код для кнопки "Вычислить" вашей формы:

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
Private Sub CommandButton1_Click()
    Dim answer As Double, op As String
    If OptionButton1 Then
        answer = Val(TextBox1) + Val(TextBox2)
        op = "Сумма"
    ElseIf OptionButton2 Then
        answer = Val(TextBox1) - Val(TextBox2)
        op = "Разность"
    ElseIf OptionButton3 Then
        answer = Val(TextBox1) * Val(TextBox2)
        op = "Произведение"
    ElseIf OptionButton4 Then
        answer = Val(TextBox1) / Val(TextBox2)
        op = "Дробь"
    Else
        MsgBox "Операция не выбрана."
        Exit Sub
    End If
    If CheckBox1 Or CheckBox2 Or CheckBox3 Then
        If CheckBox1 Then Cells(1) = op & " = " & answer
        If CheckBox2 Then
            Label3 = op & " ="
            Label4 = answer
        End If
        If CheckBox3 Then MsgBox op & " = " & answer
    Else
        MsgBox "Не выбран ни один способ вывода информации."
    End If
End Sub
С уважением,
Aksima
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
18.11.2013, 23:10

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Операции над числами матрицы
Заполнить матрицу случайными числами. Отобразить симметрично относительно горизонтальной оси...

Операции над натуральными числами
Привет всем, я новенький как на форуме так и на в программировании. Начал изучать с++ 2 недели...

Побитовые операции над числами
Нашел вот задание помогите решить инфы нигде не могу найти по данной теме а=0xEB и b=0xB7 найти...

Операции над комплексными числами
Дано вот такое задание: Написать программу на языке C++, реализующую арифметику комплекс- ных...


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

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.