GetLastError函数()错误代码1784 是什么意思呀?知道的请进,高分悬赏
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim HidGuid As Guid Dim DeviceInfoSet As Integer 'Dim vbNullString As DBNull Dim MemberIndex As Integer Dim vbNullString As String = "" Dim something As Long Result = HidD_GetHidGuid(HidGuid) '取得HID群组的GUID DeviceInfoSet = SetupDiGetClassDevs(HidGuid, vbNullString, 0, (DIGCF_PRESENT Or DIGCF_DEVICEINTERFACE)) '取得所有HID信息的结构数组 MemberIndex = 0 Do MyDeviceInterfaceData.cbSize = Len(MyDeviceInterfaceData) Result = [color=#FF0000]SetupDiEnumDeviceInterfaces[/color](DeviceInfoSet, 0, HidGuid, MemberIndex, MyDeviceInterfaceData) '识别每一个HID接口 something = GetLastError()