错误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，“图像/png"、0.5F、&HFF0000、&HFFFFFF、-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

该错误发生在它为System.Runtime.InteropServices.COMException异常提供的sigobj.rederbitmap语法周围

我有点困惑这里出了什么问题，因为它总是一开始就可以工作

在此先感谢* 强文本 *

Answer 1

wacom STU-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")