如若用代码打开多个窗口

如果用代码打开多个窗口
假如有50个窗口的名字是从Form1至Form50,我想用For i =1 to 50 来打开这50个窗口，该如何写代码？
------解决方案--------------------
  Dim i As Int16
        For i = 1 To 3
            Dim formTypeFullName As String = String.Format("{0}.{1}", Me.[GetType]().[Namespace], String.Format("Form{0:" & i & "}", i))
            Dim type1 As Type = Type.[GetType](formTypeFullName, True)
            Dim item As Form = DirectCast(Activator.CreateInstance(type1), Form)
            item.Show()
        Next