barra de progresso
estou tentando fazer o seguinte:
o cara entra no sistema ai é verificado se a chave dele esta ativa
se sim ele vai para a pagina de login se não ele vai para uma tela de ativação...
ai enquanto a tela inicial faz essa verificação eu queria que a barra de rolagem fosse junto como fazer?
fiz o seguinte codigo ate agora
Imports MySql.Data.MySqlClient
Public Class Verifica
Dim conexao As New MySqlConnection("server=localhost;User Id=root;database=cisotos")
Private Sub Verifica_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Try
conexao.Open()
Dim cmd As New MySqlCommand(String.Format("Select * from chave_local where chave='ativa'"), conexao)
cmd.CommandType = CommandType.Text
Dim dr As MySqlDataReader = cmd.ExecuteReader()
If dr.Read() Then
Timer1.Start()
Else
MessageBox.Show("Erro ao verificar a chave de segurança", "erro na chave de segurança", MessageBoxButtons.OK, MessageBoxIcon.Exclamation)
End If
Catch ex As Exception
MessageBox.Show("erro inesperado", "Alerta de Erro", _
MessageBoxButtons.OK, MessageBoxIcon.Error)
Finally
If conexao.State = ConnectionState.Open Then conexao.Close()
End Try
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
ProgressBar1.Increment(1)
If ProgressBar1.Value = ProgressBar1.Maximum Then
Timer1.Stop()
Me.Hide()
Login.Show()
Else
Me.Hide()
chave.Show()
End If
End SubEnd Class
obrigado pela ajuda
Discussão (1)
Carregando comentários...