Форум программистов, компьютерный форум, киберфорум
Visual Basic .NET
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Visual Basic .NET Как узнать, содержит ли PictureBox1 картинку? Здравствуйте! Подскажите! Как проверить PictureBox1 пустая или нет? https://www.cyberforum.ru/ vb-net/ thread1389700.html Включение и отключение USB-устройств Visual Basic .NET
Эта программка для отключения/включения доступа к USB-устройствам хранения данных.
Visual Basic .NET Линейный поиск в одномерном массиве (тип Integer) с использованием барьерного элемента https://www.cyberforum.ru/ vb-net/ thread1389529.html
"Разработайте подпрограмму, которая выполняет линейный поиск в одномерном массиве (тип Integer) с использованием барьерного элемента. Необходимо, чтобы в подпрограмме были заложены возможности...
Visual Basic .NET Скопировать в новую папку файлы указанные в тхт файле https://www.cyberforum.ru/ vb-net/ thread1389473.html
Есть файл - WhiteLine.txt. В нем имена файлов. Есть папка - 100500Folder. В ней 100500 файлов. Нужно. Из папки 100500Folder скопировать файлы в New100500Folder указанные в WhiteLine.txt В...
Visual Basic .NET Как создать в форме новый столбец в DGV Form3, при добавлении новой записи в таблице Form1
Здравия желаю! Проблема такова: есть у меня несколько форм ( Form1 , Form2, Form3 , родительская (и т.д)), допустим, что в Form1 у меня есть готовая таблица с какой-нибудь БД, в Form 2 у меня еще...
Visual Basic .NET Изменение фона формы из ресурсов программы https://www.cyberforum.ru/ vb-net/ thread1389103.html
Всем доброе время суток! есть фон формы в виде картинки, как сделать что бы можно было изменять картинку фона на другую картинку из ресурсов ?
Visual Basic .NET Индикатор зарядки в системе Windows С её помощью можно проверить состояние зарядки вашего компьютера. Предупреждает о заряде менее 50% https://www.cyberforum.ru/ vb-net/ thread1389064.html Visual Basic .NET Блокировка рабочего стола windows - внедрить виртуальную клавиатуру
Господа как можно прикрутить к этой программке экранную клавиатуру?
Visual Basic .NET Настройка яркости монитора (Бета версия) https://www.cyberforum.ru/ vb-net/ thread1389037.html
Настройка яркости монитора.
Visual Basic .NET Распознование рисунка используя FineReaderAutomation.dll https://www.cyberforum.ru/ vb-net/ thread1389003.html
Как распознавать рисунок используя FineReaderAutomation.dll или есть другой вариант??
Visual Basic .NET Случайный выбор из массива с исключением из него уже выбранных чисел
Всем доброго времени, вопрос такой: Есть случайный выбор из массива с цифрами от 1 до 10. Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles...
Visual Basic .NET Определение пути к системной папке Windows используя GetSystemDirectory visual studio 2010 Вызов функции PInvoke "WindowsApplication1!WindowsApplication1.Form1::GetSystemDirectory" разбалансировал стек. Вероятно, это вызвано тем, что управляемая сигнатура PInvoke не... https://www.cyberforum.ru/ vb-net/ thread1388920.html
es geht mir gut
11264 / 4746 / 1183
Регистрация: 27.07.2011
Сообщений: 11,437
07.03.2015, 22:18 0

Составить программу для решения задачи, используя оператор выбора Select-Case - Visual Basic .NET - Ответ 7312625

07.03.2015, 22:18. Показов 3085. Ответов 3
Метки (Все метки)

Лучший ответ Сообщение было отмечено evgeniy_putilin как решение

Решение

У Вас написано что-то не то

Попробуйте так:
VB.NET
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
30
31
32
Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
        Dim s As String = ""
        TextBox5.Clear()
        If Trim(TextBox1.Text) = "" Or Trim(TextBox2.Text) = "" Or Trim(TextBox3.Text) = "" Then
            MessageBox.Show("Заполните все поля!", _
                      "КОНТРОЛЬ ВВОДИМЫХ ДАННЫХ", MessageBoxButtons.OK, MessageBoxIcon.Error)
        Else
            Try
                Select Case TextBox2.Text
                    Case "+" : TextBox5.Text = "Сложение"
                        s = Val(TextBox1.Text) + Val(TextBox3.Text)
                    Case "/" : TextBox5.Text = "Деление"
                        If Val(TextBox3) = 0 Then
                            MessageBox.Show("На ноль делить нельзя!", "КОНТРОЛЬ ВВОДИМЫХ ДАННЫХ", MessageBoxButtons.OK, MessageBoxIcon.Error)
                        Else
                            s = Val(TextBox1.Text) / Val(TextBox3.Text)
                        End If
                    Case "-" : TextBox5.Text = "Вычитание"
                        s = Val(TextBox1.Text) - Val(TextBox3.Text)
                    Case "*" : TextBox5.Text = "Умножение"
                        s = Val(TextBox1.Text) * Val(TextBox3.Text)
                    Case Else
                        MsgBox("Неизвестная операция!") : Exit Sub
                End Select
                TextBox4.Text = TextBox1.Text & TextBox2.Text & TextBox3.Text & " = " & s
            Catch ex As Exception
                MessageBox.Show("Следут вводить целое число!", _
                  "КОНТРОЛЬ ВВОДИМЫХ ДАННЫХ", MessageBoxButtons.OK, MessageBoxIcon.Error)
            End Try
 
        End If
    End Sub


Вернуться к обсуждению:
Составить программу для решения задачи, используя оператор выбора Select-Case Visual Basic .NET
Миниатюры
Составить программу для решения задачи, используя оператор выбора Select-Case  
1
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
07.03.2015, 22:18
Готовые ответы и решения:

Составить программу решения задачи, используя оператор выбора
Вводится целое число от 2 до 5. Если введено "2", то вывести "неудовлетворительно". Если введено...

Составить программу для вычисления функции, используя оператор выбора case
Введите три целых положительных числа a, b, c. Определите остаток k от деления на 5 величины M,...

Составьте программу для решения поставленной задачи, используя оператор switch - case. (на языке Си)
Составить программу, которая читает натуральное число N в десятичном представлении (N < 10000), а...

С++- Составить программу используя оператор выбора case
Составить программу (используя оператор выбора case), которая по заданному номеру и значению...

3
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
07.03.2015, 22:18
Помогаю со студенческими работами здесь

Применяя оператор выбора Case составить программу для вычисления
Применяя оператор варианта составить программу для вычисления. Оператор выбора CASE. ...

Составьте программу для решения поставленной задачи, используя оператор цикла for, while, do{}while

Составьте программу для решения поставленной задачи, используя оператор цикла и операторы ветвления
помогите пожалуйста((((

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

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru