• 0

كيف أستعمل اسم متغير انطلاقا من متغير آخر على Vb.net؟

على تطبيق سطح مكتب، باستخدام Vb.net لدي الكود التالي:

  Dim ta = frmControllerScreen.Controls.Find("txtResponseA", True)
    If ta.Count > 0 Then
        Dim txt As TextBox = ta.First
        txtResponseA = txt.Text
    End If

    Dim tb = frmControllerScreen.Controls.Find("txtResponseB", True)
    If tb.Count > 0 Then
        Dim txt As TextBox = tb.First
        txtResponseB = txt.Text
    End If

    Dim tc = frmControllerScreen.Controls.Find("txtResponseC", True)
    If tc.Count > 0 Then
        Dim txt As TextBox = ta.First
        txtResponseC = txt.Text
    End If

    Dim td = frmControllerScreen.Controls.Find("txtResponseD", True)
    If td.Count > 0 Then
        Dim txt As TextBox = ta.First
        txtResponseD = txt.Text
    End If

ما أريد السؤال عنه إمكانية استعمال متغير بدلالة آخر، حاولت استعمال هذه الطريقة:

    lblAutoChoice1.Text = ("txtResponse" & chrAvailableAnswers.Item(0).ToString.Trim)

فلم أصل إلى حل؟؟

انشر على الشّبكات الاجتماعية


رابط هذه المساهمة
  • 0

يمكنك الولوج إلى الحقول النصية الموجودة على مستوى النافذة عن طريق الدالة :

Me.GetType.GetField

ليصبح محتوى الحقل textReponse كقيمة لـ lblAutoChoice1.Text :

lblAutoChoice1.Text = Me.GetType.GetField("txtResponse" & chrAvailableAnswers.Item(0).ToString, _ 
BindingFlags.Instance Or BindingFlags.NonPublic).GetValue(Me).ToString

انشر على الشّبكات الاجتماعية


رابط هذه المساهمة

يجب أن تكون عضوًا لدينا لتتمكّن من التعليق

انشاء حساب جديد

يستغرق التسجيل بضع ثوان فقط


سجّل حسابًا جديدًا

تسجيل الدخول

تملك حسابا مسجّلا بالفعل؟


سجّل دخولك الآن