"Новое": слишком много аргументов
Я сделал "пользовательскую" форму, как показано ниже. Когда я сказал:
Dim nSplash As New frmSplash(nBitmap)
Это говорит мне о том, что "слишком много аргументов для Public Sub New".
Я не понимаю, почему это насмехается над этим.
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
1 ответ
Проблема не в Пространстве имен, но когда включено пространство имен, форма должна вызываться с помощью "Пространство имен.Форма", а не просто "Форма".