amigo boa tarde.
estou tentando ocultar o accessabrir somente as janelas do sistemas , ao abrir ele chama a tela sphash, mas não abre as outras , deixa tudo transparente
estou tentando ocultar o accessabrir somente as janelas do sistemas , ao abrir ele chama a tela sphash, mas não abre as outras , deixa tudo transparente
- Código:
Private Sub Form_Load()
Call AccessTransparente(0)
End Sub
Private Sub Form_Timer()
If T < 15 Then
T = T + 1
If Me.lblProgresso.Caption <> ".........." Then
Me.lblProgresso.Caption = Me.lblProgresso.Caption & "."
ElseIf Me.lblProgresso.Caption = ".........." Then
Me.lblProgresso.Caption = "."
End If
ElseIf T >= 15 Then
DoCmd.OpenForm "painel de controle", , , , , acHidden
DoCmd.Close acForm, Me.Name
End If
End Sub