[Resolvido]Alterar Propriedades Imagem defundo de formulario remoto

Bom dia.
não sei se o título do assunto é o certo, mas segue a minha duvida.
Eu tenho diversos formulários e cada um tem seu comando no "Form_Load", porém são todos iguais.... e cada vez que preciso mudar algo, por exemplo a frase de carregamento ou cor de fundo preciso mudar um a um...

Eu gostario de um código em que eu pudesse chamá-lo e ele aplicaria estas definicções exemplo:

FormularioA

com o código:

Private Sub Form_Load()
DefFLoad Me.Form.Name
End Sub

onde DefLoad seria uma função

Public Function DefFLoad(NomeForm)
TelaF = DLookup("LCaminho", "tblCaminhos", "DescCaminho='TelaFundo'")
Forms.NomeForm.Picture = TelaF


End Function

mas sempre da erro.

agrdeço desde já ...

Agradeço a todos que leram.,..
agora consegui resolver... da seguinte forma:

Na função:

Public Function defF(N As String)

Forms(N).Picture = "Caminho da Imagem"

End Function


no formulario:

Private Sub Form_Load()

'Chama a função para definir as propriedades com o formulario...
defF Me.Form.Name

End Sub