Questione : Cambiando il BackColor di un tasto su una forma con il codice disposto in un modulo

Ho un Form1 in un progetto visivo dello studio 2008 con un Button1 su it.
I vorrei regolare il BackColor di questo Button1 con il codice messo in un sommergibile in un Module1 nel mio Project.
I ho il seguente codice nel
MsgBox di Module1

Public ChangeBackColor () “ciao - vediamo se il colore di Button1 cambi? „ il

Form1.Button1.BackColor = Color.RoyalBlue

End Sub

I ha messo una chiamata a ChangeBackColor () nell'evento del carico di Form1
I aveva sperato che quando i carichi Form1 esso denomineranno ChangeBackColor e con questo il colore di Button1 sulla forma cambiasse a RoyalBlue.
However che questo non sta funzionando. Desidero conoscere se che cosa stavo invitare per accadere era non realistico e se ci è senso di raggiungimento che cosa ho voluto realizzare - che sta cambiando il BackColor di un tasto su Form1 tramite un sommergibile messo in altro modulo nel vostro progetto.
As una prova se la chiamata a ChangeBackColor stava funzionando, ho messo un MsgBox nel
Sub ChangeBackColor e il MsgBox rivela quando Form1 carica in su ma il colore di Button1 non cambia. Sarei riconoscente per aiuto nel raggiungimento del this.

Thank voi per il vostro aiuto nell'anticipazione. nota del
Please sto utilizzando Visual Basic in studio visivo 2008.
class= del

Risposta : Cambiando il BackColor di un tasto su una forma con il codice disposto in un modulo

In che circostanze il codice nel modulo sarà denominato?

Un metodo differente è preferibilmente di ripetere sopra la proprietà di MdiChildren () della vostra forma principale e di trovare il caso di Form1 che senso:

    ChangeBackColor secondario pubblico ()
        Per ogni bambino come forma in Main.MdiChildren
            Se il bambino di TypeOf allora è Form1
                F1 fioco come Form1 = l$tipo C (bambino, Form1)
                f1.Button1.BackColor = Color.RoyalBlue
            Concluder se
        Dopo
    Sommergibile dell'estremità

Assomiglia voi già ha un riferimento al vostro caso di Form1 via la vostra variabile “frm1„ (probabilmente al livello del codice categoria in conduttura?).  Potreste passare quello in ChangeBackColor ():

    ChangeBackColor secondario pubblico (ByVal f1 come Form1)
        f1.Button1.BackColor = Color.RoyalBlue
    Sommergibile dell'estremità

Dall'interno della conduttura, fareste:

    ChangeBackColor (frm1)