Pelo q eu vi aki no seu projeto deu 3 erros na hora compilar
1 - este text nao existe apague essa linha
Private Sub Text7_Change()
1 With Text7
2 If .Text = "0561" Then Text8 = "Rend.Trabalho Assalariado"
3 If .Text = "0588" Then Text8 = "Rend.Pessoa Fisica p/Pessoa Juridica"
4 If .Text = "1708" Then Text8 = "Rend. de pessoa Juridica p/pessoa Juridica"
5 End With
End Sub
2 - no lost focus do text 8 tire um End Sub
Private Sub Text8_LostFocus()
1 Toolbar1.Buttons(2).Enabled = True
End Sub - (Retire Este)
2 Frame5.Visible = False
End Sub
3 - o formulario splash nao esta neste projeto , ele esta como sendo o formulario senha verifique ai no seu projeto , pq eu creio q o formulario senha e o splash tem q ser separado.
Espero ajudar , qualquer coisa me mande uma resposta
