| ♥ 0 | Duplicada. Esta pergunta já tem uma resposta aqui: Como passar um valor entre dois objetos do tipo CustomForms Olá. Quero abrir um formulário (FDU) ao clicar uma combinação de teclas no editor de vendas, e quero que esse formulário me devolva um double que se encontra num campo de números, depois de este ser preenchido e o usuário clicar o OK. Como faço isso? Obrigado. Segue o meu codigo atual. Public Overrides Sub TeclaPressionada(KeyCode As Integer, Shift As Integer, e As ExtensibilityEventArgs)
Dim descontoForm As New FDU_Desconto
Dim desconto As Double
Dim precoAtual As Double
Dim precoFinal As Double
'Using resultado = BSO.Extensibility.CreateCustomFormInstance(GetType(FDU_Desconto))
'TryCast(resultado.Result, FDU_Desconto).ShowDialog()
If descontoForm.ShowDialog() = Windows.Forms.DialogResult.OK Then
precoFinal = descontoForm.Res
precoAtual = Me.DocumentoVenda.Linhas.GetEdita(NumLinha).PrecUnit
desconto = precoFinal * 100 / precoAtual
Me.DocumentoVenda.Linhas.GetEdita(NumLinha).DescontoComercial = desconto
Else
End If
'End Using
End Sub
Marcado como spam |
instanciar uma customForm que devolva um resultado em VB.NET
Duplicada
105 visualizações