Bom Dia!!

 

Criei um projeto,nele coloquei um menu criado no menu editor

 

no Banco de Dados Criei um cadastro com os nomes dos menus...

 

Gostaria de saber se existe uma forma de via código eu ler a Tabela do Banco de Dados, Pegar os Nomes dos Menus e desabilitar ou habilitar....

 

Obrigado.

Fabio, tem como sim, para isso pegue a propriedade Name de cada item do seu menu e usa  mnCadastro.Visible = False ( para sumir com o item do menu ) ou mnCadastro.Visible=True ( para mostrar o item do menu ).  mnCadastro = nome qualquer

 

Espero ter ajudado,

Olha o Codigo que Fiz :

 

Dim Sql as StTring

Dim Query as new adodb.recordset

 

Sql = "SELECT * FROM MODULO"

 

Call Query.open(Sql,Adodbconn)

 

Do While Not Query.EOF

         'aqui preciso desabilitar os menus

         'Será que poderia me ajudar?

 

         call Query.movenext

Loop

 

 

Obrigado