none
VBA PARA VB.NET RRS feed

  • Pergunta

  • Olá a todos. Já desenvolvi dezenas de aplicações em VBA para minha empresa e até no exterior (Uso o Access2003 como plataforma porque já aproveito a base de dados access nos aplicativos), porém como nem sempre meus usuários possuem Access e não há como gerar executáveis em VBA (creio que somente usando o runtime), resolvi adotar o VS2010 Express e o VB.NET e estou há uma semana lendo e conhecendo esta plataforma de programação que é muito interessante e que atenderá as necessidades da empresa onde trabalho.

    Estou tentando converter um aplicativo simples em VBA para VB.NET mas não saio do lugar, certamente porque nunca programei em VB.NET. Já me cadastrei nos fóruns MSDN e tenho assistido a todos os vídeos, mas para começar preciso de um empurrãozinho para sair decolar nessa linguagem e pára isso peço ajuda para vocês (que como percebi conhecem muito do assunto).

    Para eu começar (resumidamente), coloquei uma combobox num form1 e um campo chamado Cargo.

    No combobox listei alguns cargos para seleção e após selecionado, a stringo com o nome do cargo deveria ser salva no campo Cargo ( em vba eu apenas escrevo no evento change: Me.Cargo = Me.Combobox1, mas no VB.NET não dá certo).

    Vide como está minha primeira programação (tentativa):

    Public

     

    Class

    Form1

     Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

     

    'TODO: This line of code loads data into the 'NovoEmpregadoAccessDataSet.TabDadosAcompanhamento1P' table. You can move, or remove it, as needed.

     

    Me.TabDadosAcompanhamento1PTableAdapter.Fill(Me

    .NovoEmpregadoAccessDataSet.TabDadosAcompanhamento1P)

     End Sub

     

     

    Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles

    ComboBox1.SelectedIndexChanged

    CARGOTextBox.Text = ComboBox1.SelectedValue ' tentei capturar o valor da combobox

     

    MessageBox

    .Show(ComboBox1.SelectedValue) 'verifiquei que o valor não foi capturado

     

    MessageBox

    .Show(CARGOTextBox.Text)'verifiquei que o valor está nulo porque certamente não foi capturado na combobox

     End Sub

     

     

    End

     

    Class

    O que está errado? Porque o valor selecionado não é capturado e salvo?

    Imagino que deva ser um erro simples mas já tentei de tudo e não deu certo. Alguém pode me dar uma dica?

    ___________________________

    Outra coisa:

    Há como aproveitar aplicaçãoes VBA no VB.NET (IMPORTAR FORMULÁRIOS E SEUS CÓDIGOS)?

    Há como setar uma referência do VBA no VB.NET para usar métodos e funções do VBA (para amenizer minha transição entre as duas linguagens e aproveitar muita coisa que eu já tenho)?

    No meu caso e como pretendo adotar o VB.NET e ASP.NET e sugerir essa adoção em toda a empresa (temos mais de 17.000 micros em rede), quais dicas de programação, onde encontro DLL e componentes genéricos para usar e snippets que poupem tempo de programa para eu pesquisar e aprender? Qualquer ajuda será muito bem vinda e desde já agradeço a atenção de vocês.

    Um abraço e um Feliz Natal e ano novo para todos.

    Vanderlei Dumbá

     

     

     

    quarta-feira, 21 de dezembro de 2011 14:43

Todas as Respostas