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

نسخة كاملة : استقسار عن الكومبوبكس والتيكست بوكس
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
بسم الله الرحمن الرحيم
اخواني انا اعمل علي برنامج فيه يخزن المستخدم item في الكومبوبكس وهذا تمام
اما طلبي هو اني اريد عندما المستخدم يختار item جديد اريد ان ياتيني في اداة التيكست بوكس مابعد كلمة save-
يعني النص هكذا في اداة التيكست بوكس 2016-12-26-09-34-51 واريد ان تتكرر العملية كل ما المستخدم يختار
item جديد وشكرا


السلام عليكم

تفضل الكود
كود :
Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox1.SelectedIndexChanged
    TextBox1.Text = ComboBox1.Text.Substring("Save-".Length)
End Sub
(29-12-16, 11:29 AM)مساعدة كتب : [ -> ]السلام عليكم

تفضل الكود
كود :
Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox1.SelectedIndexChanged
   TextBox1.Text = ComboBox1.Text.Substring("Save-".Length)
End Sub
شكرا اخي
اخي اريد عند انتقال النص الي التكست بوكس يقوم بتغير تنسيق التاريخ الي التنسيق yyyy-MM-dd HH-mm-ss
إن ما أراه في الصورة هو نفس تنسيق سؤالك

اذا كان مختلف، اعرض هنا أمثلة من النص المقصود آخراً ليتم عمل الكود اللازم
اقصد اخي اريد مثل التالي اسف كتبته خطئ dd/MM/yyyy HH:mmConfuseds
12:50:34 26/12/2016
واهم شئ المساحة بين yyyy و HH
تفضل الكود
كود :
Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
        Dim item As String = ComboBox1.Text.Substring("Save-".Length)
        Dim s As String = item.Substring(0, 10).Replace("-", "/") & " " & item.Substring(11).Replace("-", ":")
        TextBox1.Text = s
    End Sub

تم تعديل الكود