DEIXAR MEU SISTEMA MAIS [Ô]LIMPO[Ô]

PI321 28/02/2012 13:53:07
#395905

OLÁ PESSOAL , GOSTARIA DE TIRAR ALGUMAS DUVIDAS E PEGAR ALGUMAS DICAS COM VCS .. NO MEU SISTEMA TENHO CINCO BOTOES ... NOVO ,SALVAR , EDITAR, CANCELAR, EXCLUIR ... EM TODOS OS FORMS EU REPETI O MESMO CÓDIGO .. GOSTARIA DE SABER SE TEM COMO EU INCLUIR em um MÓDULO .. OU BIBLIOTECA como fazia no pascal .. SE TIVBER COMO POR FAVOR ME AJUDEM .. CREIO QUE SERIA MELHOR POIS DEIXARIA MEU SISTEMA MAIS LEVE .. E MAIS RAPIDO. CASO ALGUM AMIGO TBM TIVER UMA DICA SERIA MTO UTIL .. OBRIGADO A TODOS DESDE JÁ ..

SEGUE AQUI UM CÓDIGO DE UM DOS BOTOES PARA CASO PRECIISEM

Private Sub btnnovo_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnnovo.Click
If Me.PedidosBindingSource.Count = 0 Then
Me.PedidosBindingSource.AddNew()
novo = 1
primeiro = 1
txtcodigo2.Text = [Ô]0[Ô]
txtrazao.Focus()
TratarBotoes()
TratarEdits()
Else
novo = 1
Me.PedidosBindingSource.AddNew()
txtcodigo2.Text = [Ô]0[Ô]
txtrazao.Focus()
TratarBotoes()
TratarEdits()
End If
End Sub