Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim FilePath As String Dim WA As New Word.Application Dim WF As Word.Document FilePath = "G:\a001.doc" WF = WA.Documents.Open(FileP…

’通常使うプリンタで印刷 Dim proc As New Process Dim FilePath As String = "G:\b001.doc" proc.StartInfo.FileName = filePath proc.StartInfo.Verb = "Print" proc.StartInfo.CreateNoWindow = True proc.Start() proc.WaitForExit(20000) 'プロセスが終…