bollywood actresses hair loss hair rehab london contact number cheap hair extensions brazilian curly hair with closure hair extension fails human hair wigs black ponytail hairstyles 2018 sunny hair extensions uk hair extensions remy hair extensions weft koko one piece hair extensions clip hair
Um botão da ribbon abrir diferentes formulários

... Assinatura do site por 1 ano + Kit MontaRibbons + 3 Livros em PDF + Diversas Revistas (pdf) de brinde, por apenas R$100,00
(
podendo parcelar em até 10 vezes no cartão de crédito)...

Clique aqui e obtenha mais detalhes do nosso kit completo e de como comprar.


Um botão da ribbon para abrir diferentes formulários

Usuário Vinicius:

Boa tarde.

Estou com um problema na ribbon que é o seguinte:

Tenho um sistema de Ordem de Serviços e tenho uma tabela de parâmetros do sistema. 

Ocorre que, para a Ordem de Serviços tenho duas formas de se trabalhar com o formulário de entrada. 

Então, se o parâmetro indicar, abro o formulário X.  Caso não indique, usa o formulário Y.  Enfim, na ribbon, há alguma forma de se verificar qual o parâmetro usado para abrir o formulário correto?  Ou tenho que ter dois botões para isto?

Suporte:

Vinicius,

basta um botão. E a verificação do parâmetro fica na função do botão.

Exemplo de um botão, chamando pela função fncOnAction().

<button
id = "btOs"
imageMso = "DistributionListSelectMembers"
label = "Ordem de serviços"
onAction = "fncOnAction"
/>

Na função, crie algo assim:

Public Sub fncOnAction(control As IRibbonControl)
On Error GoTo trataerro
Select Case control.Id
    Case "btOS"
        if dlookup("parametro","tblParametro") = true then
           'aqui abre formulário X
        else
           'aqui abre formulário Y
        end if
End Select
sair:
    Exit Sub
trataerro:
    MsgBox "Erro: " & Err.Number & vbCrLf & Err.Description, vbCritical, _
    "Aviso", Err.HelpFile, Err.HelpContext
    Resume sair:
End Sub

Usuário:

Bom dia,

muito obrigado....

Dúvida esclarecida.


 

 


Não há comentário

Envie seu comentário: