Преобразовать текстовые данные в код - VB

Узнай цену своей работы

Формулировка задачи:

Имеется 6 форм (MAIN, Forma1, Forma2, Forma3, Forma4, Forma5). На 5 формах имеется по 5 текстбоксов (Text1.Text, Text2.Text, Text3.Text, Text4.Text, Text5.Text) При условии, что MAIN.Text0.Text = какому либо из текстбоксов любой из пяти форм она Show? Вот так не работает:
Хотя путь вот так отображает верно:

Решение задачи: «Преобразовать текстовые данные в код»

textual
Листинг программы
    Dim sc, i, s: Set sc = CreateObject("ScriptControl")
    sc.Language = "VBScript"
    sc.AddObject "Form5", Form5
    i = "Text1.Text"
    s = "Form5." & i
    If Form0.Text1.Text = sc.eval(s) Then Form5.Show

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

12   голосов , оценка 4.333 из 5
Похожие ответы