Вы можете получить панель инструментов. Прошло некоторое время с тех пор, как я использовал набор инструментов. Но я думаю, ты сможешь заставить это работать ...
Dim cnts As Form.ControlCollection = Me.PrintPreviewDialog1.Controls
Dim toolstrp As ToolStrip = DirectCast(cnts(1), ToolStrip)
toolstrp.Height = 50
Dim tsbtn As ToolStripButton = toolstrp.Items(0)
tsbtn.AutoSize = False
tsbtn.DisplayStyle = ToolStripItemDisplayStyle.ImageAndText
tsbtn.Size = New Size(65, 50)
Me.PrintPreviewDialog1.ShowDialog()