Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.53/15: Рейтинг темы: голосов - 15, средняя оценка - 4.53
0 / 0 / 0
Регистрация: 06.05.2015
Сообщений: 30

Разработать приложение, позволяющее при пом. диалогового окна, показанного на рисунке, заполнять таблицу

10.02.2016, 08:29. Показов 3103. Ответов 9
Метки vba (Все метки)

Студворк — интернет-сервис помощи студентам
Прошу помочь...
Вот задание:
Кликните здесь для просмотра всего текста

Вот то что я сделал:
Лист Microsoft Excel (3).xlsx

не получается вывести в таблицу "пол, оплачено или нет, фото сданы или нет, паспорт сдан или нет.
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
10.02.2016, 08:29
Ответы с готовыми решениями:

Разработать приложение, позволяющее с помощью диалогового окна, показанного на рисунке, заполнять таблицу Абитуриенты
Пжл. помогите с контрой если есть у кого время. Задание явно не трудное, я пробовал но ни хера не выходит . Спасибо заранее. вот задание в ...

Разработать приложение, позволяющее при помощи диалогового окна создавать таблицу Список ресторанов
Разработать приложение, позволяющее при помощи диалогового окна создавать таблицу Список ресторанов. Ресторан,Телефон,Вид кухни,Время...

Разработать приложение, позволяющее при помощи диалогового окна и списка вопросов и баллов в таблице проходить тестирование
Разработать приложение, позволяющее при помощи диалогового окна и списка вопросов и баллов в таблице проходить тестирование. Переход к...

9
Модератор
Эксперт MS Access
 Аватар для shanemac51
12231 / 5078 / 814
Регистрация: 07.08.2010
Сообщений: 14,936
Записей в блоге: 4
10.02.2016, 08:45
вы выложили пустой лист --без кода/формы/данных
------
при расширении xlsx --это невозможно сохранить
0
0 / 0 / 0
Регистрация: 06.05.2015
Сообщений: 30
10.02.2016, 08:51  [ТС]
Вот:
Вложения
Тип файла: zip 8.zip (18.5 Кб, 51 просмотров)
0
3947 / 2340 / 790
Регистрация: 02.11.2012
Сообщений: 6,220
10.02.2016, 08:54
удалил.
0
0 / 0 / 0
Регистрация: 06.05.2015
Сообщений: 30
10.02.2016, 09:03  [ТС]
Что?
0
3947 / 2340 / 790
Регистрация: 02.11.2012
Сообщений: 6,220
10.02.2016, 09:09
fog__1, шапку таблицы в файле забыли набрать.
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
Private Sub CommandButton1_Click()
Dim vНомерПустойСтроки As Long
vНомерПустойСтроки = Application.WorksheetFunction.CountA(Range("A:A")) + 1
 
ActiveSheet.Cells(vНомерПустойСтроки, 1).Value = TextBox2.Value
ActiveSheet.Cells(vНомерПустойСтроки, 2).Value = TextBox3.Value
ActiveSheet.Cells(vНомерПустойСтроки, 3).Value = IIf(OptionButton1.Value, "м", "ж")
ActiveSheet.Cells(vНомерПустойСтроки, 4).Value = ComboBox1.Value
ActiveSheet.Cells(vНомерПустойСтроки, 5).Value = IIf(Me.CheckBox1.Value, "оплачено", "не оплачено")
ActiveSheet.Cells(vНомерПустойСтроки, 6).Value = IIf(Me.CheckBox2.Value, "фото сданы", "фото не сданы")
'ActiveSheet.Cells(vНомерПустойСтроки, 7).Value =
ActiveSheet.Cells(vНомерПустойСтроки, 8).Value = ComboBox2.Value
End Sub
П.С. модераторы удалите пожалуйста пустой пост.
0
Модератор
Эксперт MS Access
 Аватар для shanemac51
12231 / 5078 / 814
Регистрация: 07.08.2010
Сообщений: 14,936
Записей в блоге: 4
10.02.2016, 09:17
забыли про паспорт
Visual Basic
1
ActiveSheet.Cells(vНомерПустойСтроки, 7).Value = IIf(Me.CheckBox3.Value, "пасп сданы", "пасп не сданы")
1
3947 / 2340 / 790
Регистрация: 02.11.2012
Сообщений: 6,220
10.02.2016, 09:19
Цитата Сообщение от shanemac51 Посмотреть сообщение
забыли про паспорт
нет не забыл, специально оставил для самостоятельной работы.
1
10.02.2016, 09:20

Не по теме:

Цитата Сообщение от Vlad999 Посмотреть сообщение
П.С. модераторы удалите пожалуйста пустой пост.
Значок под ником - и мусора модераторам меньше для чистки:)

0
0 / 0 / 0
Регистрация: 06.05.2015
Сообщений: 30
10.02.2016, 11:01  [ТС]
Спасибо.Выручили
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
10.02.2016, 11:01
Помогаю со студенческими работами здесь

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

Разработать приложение на базе диалогового окна – калькулятор
Разработать калькулятор для вычисления операции пересечения 2-х множеств. Множество является множеством целых чисел, которые вводятся в...

Разработать приложение, позволяющее создавать окна для представления в древообразном виде файловой структуры
Здравствуйте! Разработать многооконное MDI приложение, позволяющее создавать окна для представления в древообразном виде файловой...

Реализовать приложение, позволяющее заполнять двумерный массив случайными числами
Реализовать приложение, позволяющее заполнять двумерный массив случайными числами. Осуществить перестановку значений элементов массива...

Используя компоненты вкладки Dialog, создайте следующее приложение, позволяющее открыть рисунок, найти и заменить текст, изменить атрибуты шрифта, пом
Лабораторная работа


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
10
Ответ Создать тему
Новые блоги и статьи
SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами
8Observer8 20.02.2026
Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .
Конвертировать закладки radiotray-ng в m3u-плейлист
damix 19.02.2026
Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .
Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI
Eddy_Em 18.02.2026
Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .
Камера Toupcam IUA500KMA
Eddy_Em 12.02.2026
Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу
zbw 12.02.2026
И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.
«Знание-Сила»
zbw 12.02.2026
«Знание-Сила» «Время-Деньги» «Деньги -Пуля»
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 12.02.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 11.02.2026
Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru