Edson Tigr@o

Muito Obrigado ! Irei alterar os form´s Grato Edson Tigr@o

Olá amigos ! Sou novo em programação vb6 E estou trabalhando em um sistema que tem varios cadastros. Bom a dúvida é, onde devo abrir o Banco (arquivo .MDB) ? Devo abri-lo em um módulo definido como global ? Isso não irá consumir muita memória ? Posso abri-lo tb no formMenu, que vem antes de todos ? Ou em cada formulário devo ter um codigo parecido com isso : Private Sub Form_Activate() On Error GoTo TrataErro Set banco = OpenDatabase(App.Path + "\empresa.mdb") ' essa é a linha da dúvida, devo repeti-la em cada form ? StatusBar1.Panels(1).Text = banco.Name Set rsCond = banco.OpenRecordset("condominios", dbOpenDynaset) StatusBar1.Panels(2).Text = rsCond.Name rsCondopen = "sim" ' condição colocada em 17/10/08 para testar ao fechar o form, se sim rscond.close F_CarregaDados ' Desde já, agradeço. Edson Tigr@o

Olá Sou novo aki, portanto qualquer falha me desculpem Bom, eu li as respostas e apliquei no meu humilde projeto Mas percebi que funcionou quando eu usei desta forma StatusBar1.Panels(Nº).Text = Time() Bom é isso ai. Muito obrigado Edson Tigr@o