ブラザープリンターVisual Basic 10

Question

こんにちは皆、ありがとうございました。私は現在、Visual Basic App（10 Express版を使用しています）ブラザープリンターQL-500を使用してラベルを印刷するためにに取り組んでいます。何らかの理由で、Brotherが提供するサンプルは動作しません....いずれか、最悪の場合、エラーはありません...。Brother P-Touch Editor 5.1は正常に動作し、印刷されます。私はb-PAC3クライアントコンポーネント（64ビット）を使用しています。Windows 7 64ビットで動作しています。私はx86をターゲットにしている人もいることを知っています。私は運が無ければ同じことをしませんでした。何も起こっていません。下記のBrother Codeをご覧ください。ありがとう！

b-PAC 3.0 Component Sample (Badge) 
' 
'  (C)Copyright Brother Industries, Ltd. 2009 
' 
'******************************************************************* 
Option Explicit On 

Public Class Badge 
    Const sPath = "C:\Program Files\Brother bPAC3 SDK\Templates\Badge.lbx" 

    '******************************************************** 
    ' Open and Print a spcified file. 
    '******************************************************** 
    Public Sub DoPrint() 
     Dim bRet As Boolean 
     Dim ObjDoc As bpac.Document 
     ObjDoc = CreateObject("bpac.Document") 
     'Open lbx file 
     bRet = ObjDoc.Open(sPath) 
     If (bRet <> False) Then 
      ObjDoc.GetObject("objName").Text = txtName.Text 
      ObjDoc.GetObject("objCompany").Text = txtCompany.Text 

      'objDoc.SetMediaByName(objDoc.Printer.GetMediaName, True) 
      ObjDoc.StartPrint("", bpac.PrintOptionConstants.bpoDefault) 
      ObjDoc.PrintOut(1, bpac.PrintOptionConstants.bpoDefault) 
      ObjDoc.EndPrint() 
      ObjDoc.Close() 
     End If 
End Sub 

    Private Sub btnPrint_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnPrint.Click 
     DoPrint() 
    End Sub 

    Private Sub btnClose_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnClose.Click 
     Me.Close() 
    End Sub 
End Class 

Answer 1

誰場合は、このバッジコードが...何もまだ彼らの応答を待っていませんが、すべてが今取り組んでいる解決2週間ブラザー技術的に接触しないしようとしているが、私のプログラムの後同じ問題がインストールされていますb-PAC3クライアントコンポーネントではなく64と兄弟ドライバを再インストール何とかこの問題を修正しても問題は解決します他のシステムでそれを避けることを知っている。