Форма из таблицы SQL Server

@RCF · Регистрация: 24.03.2010

Студворк — интернет-сервис помощи студентам

Всем привет!

Помогите, пожалуйста в следующей ситуации.

В таблице БД хранится имя формы и метод Show. Делаю запрос к таблице в rs получаю такие данные:

Форма |Метод
frmUnit |Show

Вот как мне сделать так, чтобы открыть форму, которая указана в таблице БД, то есть если не явно прописана операция открытия формы?

Например, могу в коде явно прописать какую форму открывать, но это не совсем то, что мне нужно:

Visual Basic
1
frmUnit.Show

Мне надо открывать форму, в зависимости от настроек. Настройки хранятся в таблице и поэтому явно указать какую форму открывать не получится + ко всему, в таблицу будут добавляться новые формы, будет изменяться их порядок и т.п. Настройки последовательности Show формы варьируются в зависимости от предпочтений пользователей. Вот как реализовать подобный алгоритм, типа такого:

Visual Basic
1
...(rs.Fields("frmUnit ").Value).Show

То есть, имя формы которую нужно открыть, находится в базе данных. Помогите, пожалуйста, как реализовать такой алгоритм?

@UBUNTU · 27.09.2016, 05:36

Сообщение от RCF

(rs.Fields("frmUnit ").Value).Show

чем не устраивает ?

@RCF · 27.09.2016, 11:15 **[ТС]**

Сообщение от UBUNTU

чем не устраивает ?

Complete error:
Syntax error

Синтаксис не верный получается, таким образом.

Shersh · 27.09.2016, 11:49

Присмотритесь - может это оно?

@RCF · 27.09.2016, 12:22 **[ТС]**

Сообщение от Shersh

Присмотритесь - может это оно?

Красота!

Спасибо большое!!!

Осмелюсь спросить еще одну штучку. Теперь форма, указанная в настроечной таблице открываться.

А как теперь выполнить Show не прописывая его явно в коде? То есть если Show указано в настроечной таблице ?

Что-то типа того:
Forms.Add(rs.Fields("open_form").Value). (rs.Fields("metod_form").Value)

Shersh · 27.09.2016, 12:28

Сообщение от RCF

как теперь выполнить Show не прописывая его явно в коде?

Мне кажется - это что-то из области фантастики.
А какие еще варианты кроме ".SHOW" возможны?

@RCF · 27.09.2016, 12:35 **[ТС]**

Сообщение от Shersh

А какие еще варианты кроме ".SHOW" возможны?

Hide, например

По мимо методов, еще планируется указывать свойства в таблице настроек, например, Height и Width, + значения к ним тоже будут в настроечной таблице.

Но вот надо так сделать. Пока не получается.

Shersh · 27.09.2016, 12:44

Visual Basic
1
2
3
4
5
select case rs.Fields("metod_form").Value
case "Show": Forms.add (rs.Fields("open_form").Value).Show
case "Hide": forms(rs.Fields("open_form").Value)).Hide 'Add здесь будет не нужен, наверно? Пробуйте...
'''etc
end select

@RCF · 27.09.2016, 14:28 **[ТС]**

Сообщение от Shersh

case "Hide": forms(rs.Fields("open_form").Value)).Hid e

Не правильно...

Shersh · 27.09.2016, 15:45

А может так попробовать?

Visual Basic
1
2
3
4
5
6
Private Sub Form_Click()
Dim nf As Form
Set nf = Forms.Add("Form2")
nf.Show 0
nf.Width = 99
End Sub

@RCF · 29.09.2016, 00:38 **[ТС]**

Сообщение от Shersh

А может так попробовать?

Не, не катит... ((

Новые блоги и статьи Все статьи Все блоги /
Оттенки серого Argus19 18.03.2026 Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .	SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++ 8Observer8 17.03.2026 Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip	Символические и жёсткие ссылки в Linux. algri14 15.03.2026 Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .	[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ФедосеевПавел 14.03.2026 Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .
делаю науч статью по влиянию грибов на сукцессию anaschu 13.03.2026 прикрепляю статью	SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++ 8Observer8 10.03.2026 Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:	Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE 8Observer8 10.03.2026 Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .	Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .

Shersh Заблокирован
	27.09.2016, 11:49
	Сообщение было отмечено RCF как решение Решение Присмотритесь - может это оно? Миниатюры 1

Форма из таблицы SQL Server

Решение