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

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

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

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


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


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


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


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

Помощь в написании контрольных, курсовых и дипломных работ здесь.

Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
28.09.2012, 00:42
Ответы с готовыми решениями:

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

Обработать выбор "Да" и "Нет" в MessageBox
Есть такая штука: MessageBox.Show("Вы уверены, что хотите выйти? Все изменения будут автоматически...

Использование MsgBox с кнопками "Да" и "Нет"
Доброго всем времени суток! Пишу игрушку и не могу понять, как задать функции для кнопок которые...

Просмотр картинок из папки в PictureBox кнопками "Вперед" и "Назад"
Здравствуйте! Такая задачка: На форме есть пикчерсбокс и три кнопки. Нажав на одну кнопку...

5
0 / 0 / 0
Регистрация: 27.09.2012
Сообщений: 6
28.09.2012, 01:05  [ТС] 2
Vilozil kod odnoj knopki ne srazu s forumom razobralsia
Как вызвать MessageBox с кнопками "Да" - "Нет" и обработать их нажатие
0
Заблокирован
28.09.2012, 07:25 3
yopi, код показывай не скриншотами, а текстом.
Копируй (выделил код в исходнике - [Ctrl - C]
В редакторе своёго сообщения нажми кнопку [VB.NET](в нижнем ряду предпоследняя)
Вставь код из буфера обмена между тэгами - [Ctrl - V]
0
0 / 0 / 0
Регистрация: 27.09.2012
Сообщений: 6
28.09.2012, 07:30  [ТС] 4
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
Заблокирован
28.09.2012, 07:53 5
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  [ТС] 6
НАДО ЗДЕЛАТЬ ПО ЭТОМУ ОбЬЯСНЕНИЮ. НО Я НЕ МОГУ ПОНЯТЬ КАК?


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
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
28.09.2012, 08:00

Обработка "null" в MS Access "Приведение типа "|DBNull" к типу "String" является недопустимым"
Здравствуйте. Работаю с базой MS Access Вывожу в DataGridView таблицу Проблема следующая, если у...

Как исправить ошибку "Приведение строки "" к типу "Double" является недопустимым"?
Выдает ошибку в строке nasel(n).mat = Int(line(2)). Приведение строки "" к типу "Double" является...

Как при загрузке формы задать цвет шрифта ячеек DGV для "да" - зеленый, для "нет" - красный
Всем привет, подскажите как реализовать следующую задачу: DGV заполняется из файла exl В...

Поиск в DGW вылетает с ошибкой "Приведение типа "|DBNull" к типу "String" является недопустимым."
В общем такой вопрос. Код рабочий. Только у меня не работает. For i = 0 To...

Ошибка "Приведение строки "explorer.exe" к типу "Double" является недопустимым" при записи в реестр
Помогите, хочу получить доступ к winlogon, что бы изменять любое другое значение shell на...

Ошибка при запуске .exe файла из debug: "Приведение строки "Июнь" к типу "Double" является недопустимым"
Если запускать из самого проекта(F5), то все нормально, а если скомпилированный запустить, то...


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

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

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