devxlogo

Right-Align Controls on Forms

When creating resizable forms, I like to place command buttons in either the upper-right or lower-rightcorners. For example, on data entry forms, I place record navigation buttons on the lower-left portion of theform along with an Add New Record button, Delete Record button, and a Find Record button. In thelower-right corner, I place buttons for print previewing reports and closing the form.Create this subroutine in a module or general declarations section of a form. With Offset, you can vary thedistance from the right edge of the form, so you can right-justify more than one button:

 Sub ButtonRight(X As Control, _        Frm As Form, Offset as Integer)                X.Left = Frm.ScaleWidth - _                        X.Width - OffsetEnd Sub

Place two command buttons on the form. In the Form_Resize event, add this or similar code:

 Private Sub Form_Resize()        ButtonRight Command1, Me, 0        ButtonRight Command2, Me, _                Command1.WidthEnd Sub

Charlie has over a decade of experience in website administration and technology management. As the site admin, he oversees all technical aspects of running a high-traffic online platform, ensuring optimal performance, security, and user experience.

See also  Seven Service Boundary Mistakes That Create Technical Debt

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.