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

Как вызвать MessageBox с кнопками "Да" - "Нет" и обработать их нажатие

28.09.2012, 00:42. Показов 9507. Ответов 5
Метки нет (Все метки)

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








Assignment5.zip

Срочно нужна помощ.
Задача
1 создать програму перевда температур йз фарэенгейт в cелсий
2 прй вводе в Texbox букв а не cифр Mesagebox должен отобразат ошибку "iliegal value enter"
3 Результат перевода должен отображацся в Messagebox в две строки .
4 В первой строке Messagebox должен показывать значение введёное в Textbox и результат вычесления
5 во второй строке Messagebox должен роказывать надпись "Would you like to start another temp conversion?"
6 В этом Messagebox должнй]ы быть две кнопки yes и no.
7 Прй нажатии Yes програма стйрает надпись в Textbox и закрывает Messageboox
8 Прй нажатии на No Програма не стирает надпись в Textbox а просто закрывает Messagebox

Програма работаэт но в Option выдаёт ошибки "видо на Pic 3"
чтото зделал не так с конвертыром Singl ,CSng
как зделат правильно ? Конвертр Singl надо оставить таково условие задачй
програмку тожэ выложыл .Сдэлана в VISUAL STUDIO 2010
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
28.09.2012, 00:42
Ответы с готовыми решениями:

Как вызвать MessageBox с кнопками "Да" - "Нет"
Господа - товарищи, как вызвать MessageBox с кнопками "Да" - "Нет"? Должно быть "Да" - "Нет" , а не "Yes" -...

Как обработать нажатие кнопок в стандартном MessageBox
Подскажите, кто знает как обработать нажатие кнопок ОК/Отмена в стандартном MessageBox. К примеру код программы выглядит так: ...

Обработать нажатие той или иной кнопки в MessageBox
Вообщем открывается MessageBox с двумя стандартными кнопками "Да" и "Нет", прописываю, чтобы на "Да" выскакивал MessageBox с...

5
0 / 0 / 0
Регистрация: 27.09.2012
Сообщений: 6
28.09.2012, 01:05  [ТС]
Vilozil kod odnoj knopki ne srazu s forumom razobralsia
0
 Аватар для Апострофф
9908 / 3919 / 742
Регистрация: 11.10.2011
Сообщений: 5,902
28.09.2012, 07:25
yopi, код показывай не скриншотами, а текстом.
Копируй (выделил код в исходнике - [Ctrl - C]
В редакторе своёго сообщения нажми кнопку [VB.NET](в нижнем ряду предпоследняя)
Вставь код из буфера обмена между тэгами - [Ctrl - V]
0
0 / 0 / 0
Регистрация: 27.09.2012
Сообщений: 6
28.09.2012, 07:30  [ТС]
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
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
Public Class Form1
    'Stanislav Grabarev Assignment 5
 
    Private Sub btnExit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnExit.Click
        End
 
    End Sub
 
    Private Sub btnReset_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnReset.Click
        txtFC.Clear()
 
    End Sub
 
    Private Sub btnFtoC_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnFtoC.Click
        Dim inputc, calculat, result, calculat2, cltxtFC As Single
        Try
            inputc = CSng(txtFC.Text)
            calculat = CSng(inputc - 32)
            calculat2 = (calculat * 5)
            result = calculat2 / 9
            cltxtFC = MessageBox.Show("F" & txtFC.Text & "=" & "C" & result & vbCrLf & "Would you like to start another temp conversion?", "Result", MessageBoxButtons.YesNo)
            If cltxtFC = vbYes Then
                txtFC.Clear()
            End If
 
        Catch
            MessageBox.Show("Illegal Value entered")
        End Try
 
    End Sub
 
    Private Sub btnCtoF_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCtoF.Click
        Dim inputf, calculatf, resultc, cltxtFC As Single
 
        Try
            inputf = CSng(txtFC.Text)
            calculatf = CSng(inputf * 9 / 5)
            resultc = calculatf + 32
            cltxtFC = MessageBox.Show("C" & txtFC.Text & "=" & "F" & resultc & vbCrLf & "Would you like to start another temp conversion?", "Result", MessageBoxButtons.YesNo)
            If cltxtFC = vbYes Then
                txtFC.Clear()
            End If
        Catch
            MessageBox.Show("Illegal Value entered")
        End Try
 
    End Sub
 
End Class
0
 Аватар для Апострофф
9908 / 3919 / 742
Регистрация: 11.10.2011
Сообщений: 5,902
28.09.2012, 07:53
yopi, попробуйте исправить две строки -
18 строка
VB.NET
1
calculat = inputc - 32
37 строка
VB.NET
1
calculatf = inputf * 9 / 5
Может быть в лишних CSng проблема?
0
0 / 0 / 0
Регистрация: 27.09.2012
Сообщений: 6
28.09.2012, 08:00  [ТС]
НАДО ЗДЕЛАТЬ ПО ЭТОМУ ОбЬЯСНЕНИЮ. НО Я НЕ МОГУ ПОНЯТЬ КАК?


This is a built-in function that we can and will use, so study it carefully.

It displays a message in a dialog box, waits for the user to click a button, and then returns an integer indicating which button the user clicked. For example in the following code:

Dim Result As DialogResult
Result = MessageBox.Show( "Please hit OK to continue, or Cancel to stop" , _
"User Input" , _
MessageBoxButtons.OKCancel , MessageBoxIcon.Question , MessageBoxDefaultButton.DefaultButton2)

would cause a new window called dialog, to which the user must respond, and displays OK and Cancel buttons, with Cancel being the default (cancel is considered the second button).
The dialog also shows a Question mark icon. When the user clicks ok, Result will be = DialogResult.OK, otherwise if the user clicks Cancel, then Result = DialogResult.Cancel. This is called the Return Value.

If you want the messagebox to display a message in more than one line, then concatenate with ControlChars.CrLf after each line that you want to include a new line character. ControlChars has a list of what we call Control Characters, i.e. characters that have an effect, not alpha-numeric characters. For example :

"Have a nice day " & ControlChars.CrLf & "See you later"

Finally, note that msgbox is a method that is also available in .NET but is a residual from VB6.0 which may be retired in future versions. Therefore stick to Messagebox and do not use Msgbox.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
28.09.2012, 08:00
Помогаю со студенческими работами здесь

Как вызвать что-то типа MsgBox-а с кнопками "Да" и "Нет" ?
И чтоб при нажатии на 'Да' переходила на указанную ссылку, а при нажатии на 'Нет' ничего не происходило. Искал примеры на Яве, но что-то...

Как создать MessageBox с заголовком и большими кнопками?
Нужно получить что-то вроде того, что выдаёт werfault.exe (когда программа зависает):

Как обработать MessageBox DialogResult?
private: System::Void button2_Click(System::Object^ sender, System::EventArgs^ e) { // объявил выше public: ...

Как обработать массив чисел несколькими кнопками?
Всех приветствую, занимаюсь с++ недавно, возникла проблема, несколько ночей поисков не помогли: есть несколько textBox-ов и несколько...

как разными кнопками вызвать разные скрипты обработки
Добрый день, Ребята! Подскажите, как можно реализовать такую задумку: есть форма на ней две кнопки "button1" и...


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

Или воспользуйтесь поиском по форуму:
6
Ответ Создать тему
Новые блоги и статьи
Новый ноутбук
volvo 07.12.2025
Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro
Музыка, написанная Искусственным Интеллектом
volvo 04.12.2025
Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .
От async/await к виртуальным потокам в Python
IndentationError 23.11.2025
Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .
Поиск "дружественных имён" СОМ портов
Argus19 22.11.2025
Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .
Сколько Государство потратило денег на меня, обеспечивая инсулином.
Programma_Boinc 20.11.2025
Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .
Ломающие изменения в C#.NStar Alpha
Etyuhibosecyu 20.11.2025
Уже можно не только тестировать, но и пользоваться C#. NStar - писать оконные приложения, содержащие надписи, кнопки, текстовые поля и даже изображения, например, моя игра "Три в ряд" написана на этом. . .
Мысли в слух
kumehtar 18.11.2025
Кстати, совсем недавно имел разговор на тему медитаций с людьми. И обнаружил, что они вообще не понимают что такое медитация и зачем она нужна. Самые базовые вещи. Для них это - когда просто люди. . .
Создание Single Page Application на фреймах
krapotkin 16.11.2025
Статья исключительно для начинающих. Подходы оригинальностью не блещут. В век Веб все очень привыкли к дизайну Single-Page-Application . Быстренько разберем подход "на фреймах". Мы делаем одну. . .
Фото: Daniel Greenwood
kumehtar 13.11.2025
Расскажи мне о Мире, бродяга
kumehtar 12.11.2025
— Расскажи мне о Мире, бродяга, Ты же видел моря и метели. Как сменялись короны и стяги, Как эпохи стрелою летели. - Этот мир — это крылья и горы, Снег и пламя, любовь и тревоги, И бескрайние. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru