Сделать кнопку неактивной на 1 час - Visual Basic .NET

Узнай цену своей работы

Формулировка задачи:

Как отключить кнопку на 1 час, но что бы после выхода из прораммы и входа кнопка не включалась. Подскажите пожалуйста

Решение задачи: «Сделать кнопку неактивной на 1 час»

textual
Листинг программы
Public Class Form1
    Private time_ As Date = My.Settings.time_
 
    Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
        If time_ = Nothing Then time_ = Now
        If DateTime.Compare(time_, Now) < 0 Then Exit Sub
        Timer1.Start()
    End Sub
 
    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        Button1.Enabled = False
        time_ = Now
        time_ = time_.AddMinutes(60)
        Timer1.Start()
    End Sub
 
    Private Sub Timer1_Tick(sender As System.Object, e As System.EventArgs) Handles Timer1.Tick
        If DateTime.Compare(time_, Now) < 0 Then
            Button1.Enabled = True
            Timer1.Stop()
        Else
            Button1.Enabled = False
        End If
    End Sub
 
    Private Sub Form1_FormClosed(sender As System.Object, e As System.Windows.Forms.FormClosedEventArgs) Handles MyBase.FormClosed
        My.Settings.time_ = time_
        My.Settings.Save()
    End Sub
 
End Class

ИИ для рефератов и докладов


  • Экспорт Word по ГОСТу
  • Минимум 80% уникальности текста
  • Поиск релевантных источников в интернете
  • Готовый документ за 2 минуты

Оцени полезность:

12   голосов , оценка 4.333 из 5
Похожие ответы