Я хочу иметь две функции в моей программе, но я могу печатать только в цвете. Я также хочу иметь опцию «моно chrome».
У меня есть код прямо здесь, вы можете сказать мне, что мне не хватает?
Private Sub prntbtn_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles prntbtn.Click
Dim psi As New System.Diagnostics.ProcessStartInfo()
Dim filepath = OpenFileDialog1.FileName
psi.UseShellExecute = True
psi.Verb = "printto"
psi.WindowStyle = ProcessWindowStyle.Hidden
psi.FileName = filepath
Dim myProcess As System.Diagnostics.Process
myProcess = System.Diagnostics.Process.Start(psi)
myProcess.WaitForInputIdle()
Dim localProces As Diagnostics.Process = Diagnostics.Process.GetProcessById(myProcess.Id)
localProces.CloseMainWindow()
localProces.Close()
End Sub