devxlogo

Fill a Combo with Available Drive Letters

Why Trust Us

To create a drop-down control with a list of used or unused drive letters, place two ComboBox controls on a form, named Combo1 and Combo2, and include this code to initialize the lists:

 Private Declare Function GetLogicalDrives Lib _"kernel32" () As LongPrivate Sub Form_Load()FillCombo Combo1, TrueFillCombo Combo2, FalseEnd SubPrivate Sub FillCombo(cbo As ComboBox, _ByVal bUsed As Boolean)Dim DriveNum As Longcbo.ClearFor DriveNum = 0 To 25If CBool(GetLogicalDrives And (2 ^ _DriveNum)) = bUsed Thencbo.AddItem Chr$(Asc("A") + _DriveNum) & ":"End IfNext DriveNumEnd 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  How Engineering Leaders Spot Weak Proposals
Disclosure

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.

Show More