moncerra
|
SÃO PAULO
SP - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 13/02/2010 13:14 hs
Boa tarde pessoal! bom, preciso desabilitar as opções do menu de meu mdi. Ex: Arquivo cliente produto Gravei os nome do menu em banco (cliente e produto) Quero desabilitar quando eu logar no sistema. ex: !nomeMenu & (.) & enabled =false mas não esta funcionando. Quando posso fazer isso? Obrigado. |
|
|
|
|
|
|
|
Postada em 15/02/2010 10:32 hs
Option Explicit
Private Sub Form_Load()
sub_Desabilita_Menu "Cliente"
End Sub
Private Sub sub_Desabilita_Menu(sCaptionMenu As String)
Dim objControle As VB.Control
'
For Each objControle In Me.Controls
'
If objControle.Caption = sCaptionMenu Then
objControle.Enabled = False
Exit For
End If
'
Next
'
End Sub
__________________
"It is the way of men to make monsters...and it is the nature of
monsters to destroy their makers."
-F.E.A.R. (First Encounter Assault Recon )
|
|
|
|
|
|
Postada em 17/02/2010 15:27 hs
Da forma que fez, voce só desbailita, depois que o mdi for carregado, ou estiver carregando. Tente assim, no form_Load do mdi, ou em qualquer form, sendo filho ou não, estando o mdi ativado. frmMDI. & nomeMenu & (.) & enabled =false vlu// |
|
|
|
|
|
Postada em 18/02/2010 08:11 hs
Pessoal,valeu optei pela 1 dica,funcionou legal.
Apenas mudei de objcontrol.caption para objcontrol.Name.
Valeu.
|
|
|
|
|
|
Postada em 18/02/2010 08:12 hs
Pessoal,valeu optei pela 1 dica,funcionou legal.
Apenas mudei de objcontrol.caption para objcontrol.Name.
Valeu.
|
|
|
|
