منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : بخصوص ComboBox
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم

لا اريد الاطاله عليكم الطلب بأختصار :

عندى Form بها ComboBox محتويات الـكومبو عباره عن مجموعة مسارات تظهر كما بالصوره
لكن اريد بدل المسار يظهر اسم المجلد بشرط اذا ضغط على اى مسار يفتح كما لو كان موجود المسار نفسه .



وجزاكم الله خيراً
نفس فكرة المثال التالي:
http://vb4arb.com/vb/showthread.php?tid=747
كود :
Imports System.IO
Public Class Form1
    Dim dirs As New List(Of String)
    Dim pa As String = "g:\"
    Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
        ComboBox1.Items.Clear()
        For Each d In Directory.GetDirectories(pa)
            dirs.Add(d)
            ComboBox1.Items.Add(IO.Path.GetFileName(d))
        Next
    End Sub
    Private Sub ComboBox1_SelectedIndexChanged(sender As System.Object, e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
        Process.Start(dirs.Item(ComboBox1.SelectedIndex))
    End Sub
End Class
(01-04-14, 05:08 PM)سعود كتب : [ -> ]
كود :
Imports System.IO
Public Class Form1
    Dim dirs As New List(Of String)
    Dim pa As String = "g:\"
    Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
        ComboBox1.Items.Clear()
        For Each d In Directory.GetDirectories(pa)
            dirs.Add(d)
            ComboBox1.Items.Add(IO.Path.GetFileName(d))
        Next
    End Sub
    Private Sub ComboBox1_SelectedIndexChanged(sender As System.Object, e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
        Process.Start(dirs.Item(ComboBox1.SelectedIndex))
    End Sub
End Class


فكره جميله ورائعه شكراً