Что я делаю не так, приложение не будет работать
Явный Параметр На
Вариант Строгой От
Вариант Вывод От
Публичный класс frmMain
Private Sub Button2_Click(sender As Object, e As EventArgs) обрабатывает btnExit.Щелчок
Меня.Рядом()
Конец Подводной Лодки
Частная суб обработчика button1_click(отправителя как объект, а равно EventArgs) обрабатывает btnDisplayCost.Нажмите
- Рассчитайте и покажите стоимость проверенного матраса.
Тусклый dblCost как двойной
Целое число.Метод tryparse(txtCost.Текст, dblCost)
Если радтвин.Проверено = Истина Тогда
dblCost = 39,99
Конец, Если
Если радфулл.Проверено = Истина Тогда
dblCost = 49.99
Конец, Если
Если рэдкуин...Проверено = Истина Тогда
dblCost = 49.99
Конец, Если
Если радкинг.Проверено = Истина Тогда
dblCost = 69.99
Конец, Если
- Если пикап в строре не проверен, добавьте стоимость доставки в размере 5,00.
Если чкбокс.Проверено = Истина Тогда
dblCost = dblCost + 5.0
Конец, Если
Конец Подводной Лодки
Private Sub chkBox_CheckedChanged(sender As Object, e As EventArgs) обрабатывает chkBox.CheckedChanged
Если чкбокс.Проверено = Истина Тогда
chkBox.текстовая строка.Пустой
Конец, Если
Конец Подводной Лодки
End Класса
Что я уже пробовал:
Я перечитал всю главу в Microsoft visual basics 2017. После создания приложения я просто не могу заставить его работать. Это может быть процедура проверки CheckChanged.