17-10-12, 07:03 PM
كاتب الموضوع : egyption-coder
الكود يوضع فى الفورم لودكود :
dim drives() as string
drives = system.io.directory.getlogicaldrives
dim idrive as integer
driveslist.items.clear()
on error resume next
for idrive = 0 to drives.getupperbound(0)
driveslist.items.add(drives(idrive))
next
driveslist.selectedindex = 1
driveslist هو اسم الكومبو بوكس