Increase size of an InputBox

Hi All

Is it possible to change the size of the input box?

I mean, the area where you would type in data?

TestVal30 = Application.InputBox("Ticket No:", "Update Query")
    If TestVal30 = False Then Exit Sub

at the moment, its only 1 line thick, possible to make it say, 10 lines?

Many thanks for your help