---

Hej

Nogle der har en ide om hvorfor jeg ikke kan få en HID GUID output af denne
kode?
Jeg bruger VB2008

Option Strict On

Public Class Form1

Public Declare Sub HidD_GetHidGuid Lib "hid.dll" (ByRef HidGuid As Guid)

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click

Dim my_GUID As System.Guid

'Dim r As IntPtr

Dim interface_data As New DLL.SP_DEVICE_INTERFACE_DATA

my_GUID = Guid.Empty

HidD_GetHidGuid(my_GUID)

'r = DLL.SetupDiGetClassDevs(my_GUID, Nothing, 0, DLL.DIGCF_DEVICEINTERFACE)

'DLL.SetupDiEnumDeviceInterfaces(r, 0&, my_GUID, 0, interface_data)

End Sub

End Class