印刷
’通常使うプリンタで印刷 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) 'プロセスが終了していなかったら終了する If proc.HasExited = False Then proc.Kill() End If 'proc解放 If Not proc Is Nothing Then proc.Dispose() End If