As any wird nicht unterstützt

[Schüler]

VB.2008
Was tun bei letzter Zeile in dieser Funktion
Private Declare Function CreateWindowEx Lib "user32.dll" _
Alias "CreateWindowExA" ( _
ByVal lExStyle As Long, _
ByVal strClassName As String, _
ByVal strWindowName As String, _
ByVal lStyle As Long, _
ByVal X As Long, _
ByVal Y As Long, _
ByVal lWidth As Long, _
ByVal lHeight As Long, _
ByVal hWndParent As Long, _
ByVal hMenu As Long, _
ByVal hInstance As Long, _
ByVal lParam As Any) As Long
Dank für Hilfe und Gruß vom
Schüler

[gfoidl]

Hallo,

hier die korrekte Signatur:
[highlight=vbnet]
<DllImport("user32.dll", CharSet:=CharSet.Auto)> _
Private Shared Function CreateWindowEx( _
ByVal dwExStyle As UInteger, _
ByVal lpClassName As String, _
ByVal lpWindowName As String, _
ByVal dwStyle As WindowStyles, _
ByVal x As Integer, _
ByVal y As Integer, _
ByVal nWidth As Integer, _
ByVal nHeight As Integer, _
ByVal hWndParent As IntPtr, _
ByVal hMenut As IntPtr, _
ByVal hInstancet As IntPtr, _
ByVal lpParamt As IntPtr) As IntPtr
End Function
[/highlight]

mfG Gü

[Schüler]

As any

Besten Dank für die Lösung.
Leider habe ich mehrfach dieses Problem.
In deinem Code ist gegenüber meinem ziemlich viel geändert.
Wo finde ich eine Anleitung für eine allgemein gültige Lösung?
MfG
Schüler

[gfoidl]

Unter http://pinvoke.net/ sind die (meisten) API-Deklarationen.

mfG Gü