Question

I made a “custom” form as seen below. When I say:

Dim nSplash As New frmSplash(nBitmap)

It is telling me that there are “too many arguments for Public Sub New“.

I do not see why it is mocking about it.

Imports System.Drawing
Imports System.Drawing.Imaging
Imports System.Runtime.InteropServices
Imports System.Windows.Forms

Namespace AlphaWindow

Public Class frmSplash

    Inherits Form

    Public Sub New(ByRef uBitmap As Bitmap)

        Me.Size = uBitmap.Size
        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen

        APIHelp.ShowTopmost(Me)

        Me.SelectBitmap(uBitmap)

    End Sub

 (...)

' Class to assist with Win32 API calls
Class APIHelp

    Private Const SW_SHOWNOACTIVATE As Integer = 4
    Private Const HWND_TOPMOST As Integer = -1

 (...)

End Class
End Namespace

Answer 1

The problem is not the Namespace, but when a namespace is included, the form has to be called by “Namespace.Form” instead of just “Form”.