Fråga : Visual Basic - befolka en varierande text boxas från another bildar

Jag har en att bilda CallingForm med två textboxes, och släkt befalla knäppas bredvid varje.  Så txtCompany and cmdCompany och txtState and cmdState.  Båda befaller knäppas, när de klickas, visar att samma bildar SelectForm with en singel DataGrid som listar CompanyName, statligt, Etc. användaren då väljer ett rekord från DataGriden i SelectForm.   Jag önskar att SelectForm ska gå informationsbaksida tillbaka till CallingForm som befolkar den korrekta texten boxas, baserat på vilka befaller knäppas (och därför textboxen) klickades i CallingForm.  class= " den cmdCompany kulan " >

If för

If klickades i CallingForm, mig önskar att SelectForms det DataGrid valet ska befolka CallingFromss txtStatetext boxas.  

I vet hur man hänvisar till kolonnen som jag behöver i datarastret och visste hur man befolkar texten boxas tillbaka i CallingForm, då jag handlade endast med en text boxas, men nu jag förmiddagen som kämpar med hur man hänvisar till texten, boxas i CallingForm, nu att I-förmiddagen som handlar med en variabel av sorterar om vilken text boxas i CallingForm jag önskar till populate.

" klar "

Svar : Visual Basic - befolka en varierande text boxas från another bildar

Visa SelectForm som en modal dialog med ”vbModal” och därefter hastigt grepp info från det som är tillbaka i CallingForm:

    Privat undercmdCompany_Click ()
        Dunkel sf som nya SelectForm
        sf. Visa att vbModal ' <--- code="" in="" CallingForm="" STOPS="" here="" until="">        '… hastigt grepp något info direkt från den GÖMDA ”sfen” anföra som exempel…,
        Me.txt Company.Text = sf.txt Something.Text
    Avsluta suben

    Privat undercmdState_Click ()
        Dunkel sf som nya SelectForm
        sf. Visa den vbModal ' <--- code="" in="" CallingForm="" STOPS="" here="" until="">        '… hastigt grepp något info från ”sf”…,
        Me.txt State.Text = sf.txt Something.Text
    Avsluta suben

I SelectForm du det simpy SKINNET bilda som svar på ”det REKO” knäppas att klickas:

    Privat undercmdOK_Click ()
        Me.Hide ' <-- this="" causes="" the="">    avslutar suben