误差System.Runtime.InteropServices.COMException

Question

我的一个项目出了问题--它的程序可以从wacom签名板获得签名--它在第一次运行时运行良好，然后每当我第二次尝试输入另一个签名时，它就会收到以下错误消息

以下是代码：

   Dim sigCtl As New SigCtl
    Dim dc As New DynamicCapture
    Dim res As DynamicCaptureResult
    sigCtl.Licence = "AgAZAPZTkH0EBVdhY29tClNESyBTYW1wbGUBAoECA2UA"
    res = dc.Capture(sigCtl, "who", "why", vbNull, vbNull)
    If (res = DynamicCaptureResult.DynCaptOK) Then
        print("signature captured successfully")
        Dim sigObj As SigObj
        sigObj = sigCtl.Signature
        sigObj.ExtraData("AdditionalData") = "VB test: Additional data"
        Dim filename As New String("sig1.png")

SigObj.RenderBitmap(文件名，200,150，"image/png"，0.5F，&150 0000，&HFFFFFF，-1.0F，-1.0F，-1.0F，_ RBFlags.RenderOutputFilename或RBFlags.RenderColor32BPP或RBFlags.RenderEncodeData)

        sigImage.Load(filename)
    Else
        print("Signature capture error res=" & res)
        Select Case res
            Case DynamicCaptureResult.DynCaptCancel
                print("signature cancelled")
            Case DynamicCaptureResult.DynCaptError
                print("no capture service available")
            Case DynamicCaptureResult.DynCaptPadError
                print("signing device error")
            Case Else
                print("Unexpected error code ")
        End Select
    End If

错误发生在它给出的sigobj.rederbitmap异常的System.Runtime.InteropServices.COMException语法上。

我有点搞不懂这是怎么回事，因为它一开始总是管用的

提前感谢*强健的文本*

Answer 1

我在WacomStu-530设备上也有同样的问题。对我起作用的是每次用户想要使用另一个测试时更改文件名字符串。

Dim rndm As New Random
Dim serial As Integer = rndm.Next(1, 9999)
Dim str_serial As String = CStr(serial)
Dim filename As New String("sig_" & str_serial.PadLeft(4, "0") & ".png")