Form Nesnesi çalıştırma

[idogus]

Selam Arkadaşlar,
Aşağıdaki mantık doğru bir ifadeyle nasıl kurulabilir ?
[vb:1:1628a5bbe0]
Sub Formgoster(form As String)
form.Top = CDbl(frmMenu.Top) + 45
form.Left = CDbl(frmMenu.Left) + 5
form.Show
End Sub
[/vb:1:1628a5bbe0]
[vb:1:1628a5bbe0]
Sub test()
Call Formgoster("frmDersHavuzu")
End Sub
[/vb:1:1628a5bbe0]

 

[danersin]

Amaç tüm userformların özelliklerinimi aynı prosedürden ayarlamak?..
Tam anlamadım ama ekteki dosyadaki kullanım şekli bir yol gösterir belki.

 

[idogus]

Teşekkürler cevabımı aldım :hihoho: