Metode med Objekt som parameter

Ja.

CenterForm(frm as Form)

eller

CenterForm(frm as Object)

eller

CenterForm(frm as Control)

Bruger du as Form, så har du alle formens properties og metoder direkte via Intellisense.

Bruger du Object eller Control (jeg vil foretrække Object af disse), er du ikke bundet til en bestemt type. Du kan så bruge TypeOf eller TypeName for at finde den eksakte type

Det virker ikke rigtig.
Måske har jeg gjort noget forkert ?.

Jeg opretter et objekt \"Frm\" Af klassen \"FormClass\" Under Form_Load() i FrmMain
******************************
Form_Load()
Dim Frm As New FormClass
Frm.CenterForm (FrmSplash)
******************************

Metoden \"CenterForm\" I klassen \"FormClass\" 
******************************
Public Sub CenterForm(AnyForm As Form)

Select Case AnyForm.Name

Case \"FrmNumbers\"
If AnyForm.WindowState = 0 Then
AnyForm.Top = (Screen.Height - AnyForm.Height) / 2
AnyForm.Left = (Screen.Width - AnyForm.Width) / 2 - 3500
End If
Case Else
If AnyForm.WindowState = 0 Then
AnyForm.Top = (Screen.Height - AnyForm.Height) / 2
AnyForm.Left = (Screen.Width - AnyForm.Width) / 2
End If
End Select
End Sub

Nu fik jeg læst hele spørgsmålet... Hvorfor bruger du ikke formens property StartupPosition. Værdien 2 betyder CenterScreen

Jeg har desuden en anden form der skal placeres ved siden af, som du måske har ses, men ellers har jeg samme problem med et Comm Objekt der skal overføres som parameter til en metode.

Har du noget konkret forslag hvad jeg kan gøre for at få det til at virke.
jeg får fejlen \"Type Mismatch\"
Ellers TAK
Der kommer lige 60P for det gamle spørgsmål som du har svaret på, som tak.

Hvilken linie får du fejlen i?

Prøv i øvrigt at kalde med

Frm.CenterForm frmSplash

uden paranteser

UDEN PARATESER !!
Der kommer lige 30 P
Tak