Ter um temporizador de contagem regressiva eletrônico no ambiente de trabalho pode ser uma maneira conveniente de manter o controle de grandes eventos. Se você quiser saber quanto tempo é até o fim de semana ou até o dia do casamento , um temporizador de contagem regressiva é o seu lembrete constante . Você pode fazer uma contagem regressiva temporizador eletrônico usando o software de programação simples . E com apenas um pouco de paciência , você estará contando os dias, horas, minutos e segundos. Coisas que você precisa
Visual Basic
Visualizar Mais instruções
1
Comece sua cópia do Visual Basic e fazer um novo documento. Clique em " New Project ... " no menu encontrado à esquerda da sua tela. Selecione " Windows Forms Application " e clique em "OK" para concluir a configuração.
2
Clique duas vezes em "Button" da janela " Toolbox" . Isto irá inserir um novo botão ( Button1 ) em sua janela do projeto . Com o mouse, ajuste a sua posição e colocação , se necessário.
3
Dê um duplo clique em " timer " da " caixa de ferramentas. " Isto irá inserir o seu controle timer para o espaço de trabalho. Ajuste o posicionamento , se necessário.
4
Clique duas vezes na ferramenta " etiqueta " na janela " Toolbox" . Isto irá inserir uma janela de exibição que será usado pelo seu timer. Ajuste a posição , se necessário.
5
Dê um duplo clique em " Button1 ". Isto irá abrir o módulo " Form1.vb " . Localize e selecione o campo de entrada para " Button1_Click ". Você irá inserir o código para controlar o intervalo e contagem regressiva do temporizador. Defini-lo para intervalos de um segundo do tempo de base de 15 minutos. Digite o seguinte código:
Timer1.Interval = 1000
Timer1.Start ()
cntDown = Date.Now.AddMinutes (15)
6
Clique na aba com o nome " Form1vb [Design ]" encontrado perto da parte inferior da janela de controle " timer " . Em " Timer1_Tick ", selecione o campo de entrada. Adicione o código que irá verificar se a contagem regressiva está terminado e exibir o tempo que ele deixou no visor contagem regressiva você adicionou na etapa 4. Digite o seguinte código:
Se cntDown < Date.Now Então
Me.Timer1.Stop ()
MessageBox.Show (" ! Contagem regressiva completou " )
Else
Dim timeRem Como TimeSpan = Me.cntDown.Subtract ( Date.Now )
Me.Label1.Text = String.Format ( "{0} : {1 : d2 }: { 2: d2 } ", _
timeRem.Hours , _
timeRem.Minutes , _
timeRem.Seconds )
End If
7
Volte para a janela principal do projeto e salve o arquivo . Clique na tecla F5 encontrado no seu teclado para ativar o código. Use o mouse para clicar em "Button1 " para iniciar a contagem regressiva.