Select from the dropdown lists to complete the text.
Private Sub ( Butom1, Clear, Label1, ComboBox1 )_Click(sender As System.Object, e As ( System, Event, Object, Visual ).EventArgs) ( Handles, End, Sub, Class ) Butom1.Click
If PrintDialog1.ShowDialog = Windows.( Forms, Checked, Radio, List ).DialogResult.OK Then
PrintDocument1.PrinterSettings = PrintDialog1.PrinterSettings
PrintDocument1.Print()
End If