INVOKE錯誤

[vileboy]

下面的代碼報錯，InterfaceOperator.HY_Print這句報錯。提示出下。

            textBox1.Text = Application.StartupPath & "\" & txtLaxFileFullName.Text.Trim()
            If Not IsNumeric(txtPrintSetup.Text) Then
                Throw New Exception("打印份數出錯")
            End If
            printSetup = txtPrintSetup.Text
            If Not FileIO.FileSystem.FileExists(textBox1.Text) Then
                Throw New Exception("打印模板不存在")
            End If
            If InterfaceOperator.HY_OpenLax(textBox1.Text) Then
                InterfaceOperator.HY_SetVariable("barcode", txtVarWord.Text.Trim(), "A", "B") ' 
                InterfaceOperator.HY_SetVariable("T文字2", txtVarBarcode.Text.Trim(), "a", "c") '  
                InterfaceOperator.HY_Print(printSetup, txtPrinterName.Text.Trim(), cbPageWindowsShow.Checked) '《--------------這句報錯
            Else
                Throw New Exception("模板打開失敗")
            End If

[vileboy]

請各位大神看看啊

[stherix]

InterfaceOperator.HY_Print应该是个native方法吧 你最好把它的c语言方法签名发一下,肯定是参数类型没对上

[yishumei]

楼主，请问DllImport(InterfaceDllName)引用的时哪个dll？

[vileboy]

解決了。 把API聲明改為： <System.Runtime.InteropServices.DllImport(InterfaceDllName, EntryPoint:="HY_Print")> _ Public Shared Sub HY_Print(ByVal printSetup As Integer, ByVal printerName As String, ByVal pageWindowsShow As Boolean) End Sub 或 <System.Runtime.InteropServices.DllImport(InterfaceDllName, EntryPoint:="HY_Print")> _ Public Shared Function HY_Print(ByVal printSetup As Integer, ByVal printerName As String, ByVal pageWindowsShow As Boolean) As Integer End Function

[vileboy]

VB是根據C#修改來的。 VB聲明是這樣 <System.Runtime.InteropServices.DllImport(InterfaceDllName, EntryPoint:="HY_PrintPic")> _ Public Shared Function HY_PrintPic(ByVal outDirectory As String, ByVal outFirstName As String, ByVal outDpiH As Integer, ByVal outDpiV As Integer, ByVal outColor As Integer) As Integer End Function C#聲明是這樣： [DllImport(InterfaceDllName)] public static extern int HY_PrintPic(string outDirectory, string outFirstName, int outDpiH, int outDpiV, int outColor);

[vileboy]

上面錯了,下面才是對的 VB是根據C#修改來的。 C#聲明： [DllImport(InterfaceDllName)] public static extern void HY_Print(int printSetup, string printerName, bool pageWindowsShow); VB聲明： <System.Runtime.InteropServices.DllImport(InterfaceDllName, EntryPoint:="HY_Print")> _ Public Shared Function HY_Print(ByVal printSetup As Integer, ByVal printerName As String, ByVal pageWindowsShow As Boolean) End Function