devxlogo

Ensure that a form’s TextBox and ComboBox controls have same height

Ensure that a form’s TextBox and ComboBox controls have same height

In general you don’t have any control on a ComboBox’s Height property, because it is determined automatically by VB depending on the font used for the ComboBox control. If you have a form that contains both TextBox and ComboBox controls, you should ensure that all your single-line TextBox controls are as tall as the ComboBox controls on the same form. The following routine can help you quickly set the Height property of all the single-line TextBox controls on a form:

' change the height of all the single-line TextBox in a formSub SetTextboxHeight(frm As Form, ByVal Height As Single)    Dim ctrl As Control        For Each ctrl In frm.Controls        If TypeOf ctrl Is TextBox Then            If ctrl.MultiLine = False Then                ctrl.Height = Height            End If        End If    NextEnd Sub

For example, if you have a Combo1 control on the Form1 form, you can ensure that all the TextBox control on that form are as tall as the ComboBox control with this line of code:

Private Sub Form_Load()    SetTextboxHeight Me, Combo1.HeightEnd Sub

See also  How to Create and Deploy QR Codes Online: A Comprehensive Guide
devxblackblue

About Our Editorial Process

At DevX, we’re dedicated to tech entrepreneurship. Our team closely follows industry shifts, new products, AI breakthroughs, technology trends, and funding announcements. Articles undergo thorough editing to ensure accuracy and clarity, reflecting DevX’s style and supporting entrepreneurs in the tech sphere.

See our full editorial policy.

About Our Journalist