Создание программы, позволяющей определять степень заболевания сахарным диабетом

@Lebron300 · Регистрация: 29.11.2014

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

Говорю сразу... В VBA никогда не работал , но дали вот такое задание.... Разработать собственное приложение VBA в MS Excel, осуществляющее заполнение картотеки пациентов и базы данных обследований, а также выполняющее оценку вероятности наличия заболевания у каждого из пациентов по результатам вычислительного анализа имеющихся данных. (Автоматизация процесса диагностики сахарного диабета)... Может кто подскажет источники или мысли как это можно все реализовать... надеюсь на вашу помощь друзья)))

SoftIce · 29.11.2014, 16:19

Это учебное задание?

@Lebron300 · 29.11.2014, 16:35 **[ТС]**

Да...

@ovva · 29.11.2014, 21:19

Говорю сразу... VBA не VBA это здесь дело десятое. Сразу возникает куча вопросов.
Картотека пациентов – где реализуется (в Excel, в какой СУБД, непосредственно в программе), какие поля должна иметь карточка такой картотеки, функционал такой картотеки.
База данных обследований – какие обследования, какие параметры по каждому обследованию должны сохраняться, связь с картотекой (или это одна база), реализация, функционал.
Оценка вероятности наличия заболевания у каждого из пациентов по результатам вычислительного анализа имеющихся данных – по крайней мере, нужно иметь алгоритм такого анализа.
Судя по рекомендованной среде (Excel, VBA) и заказчику (учебное задание) реализация предполагает очень упрощенный м.б. утрированный подход, но без конкретики говорить не о чем.

@Bitton · 29.11.2014, 23:32

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

Говорю сразу... В VBA никогда не работал , но дали вот такое задание.... Разработать собственное приложение VBA в MS Excel, осуществляющее заполнение картотеки пациентов и базы данных обследований, а также выполняющее оценку вероятности наличия заболевания у каждого из пациентов по результатам вычислительного анализа имеющихся данных. (Автоматизация процесса диагностики сахарного диабета)... Может кто подскажет источники или мысли как это можно все реализовать... надеюсь на вашу помощь друзья)))

Считаю, что для начала нужно придумать некий шаблон, либо взять у преподов этот шаблон, в который будут заполняться симптомы и т.п. вот на это уже можно будет опираться и писать условия, если запорочиться то можно будет создать юзер форму, которая будет заполнять для каждого пациента симптомы, после заполнения, будет срабатывать некий макрос, который по условиям будет выводить диагноз. А на воздухе мало что построишь.

@Lebron300 · 30.11.2014, 10:37 **[ТС]**

Шаблоны нам наврятли дадут.... нужно создать программу, которая позволяет выбирать фамилию пациента, набор анализов( в числовом виде) и в итоге должен выводиться диагноз по этим критериям...

@Bitton · 30.11.2014, 10:51

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

Шаблоны нам наврятли дадут.... нужно создать программу, которая позволяет выбирать фамилию пациента, набор анализов( в числовом виде) и в итоге должен выводиться диагноз по этим критериям...

Как это выбирать фамилию? разве ты знаешь фамилию всех пациентов? Ну ладно не суть, раз выбирать фамилию, то это можно осуществить с помощью ComboBox. Набор анализов, помимо числового вида, должны еще иметь и названия, т.е. должно быть как минимум 2 столбца. Окей это уже и есть шаблон). Это нужно реализовать, а потом уже писать макрос, который будет "Выводить диагноз".

toiai · 30.11.2014, 14:32

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

@Lebron300 · 30.11.2014, 15:11 **[ТС]**

Фамилии пациентов мы берем в файле Excel ( выдуманные)..... там же заносим норму анализов, например:
Результаты анализа в норме (при отсутствии сахарного диабета)
• венозная кровь – 3,3–5,5 ммоль/л;
• капиллярная кровь – 3,3–5,5 ммоль/л;
• плазма венозной крови – 4–6,1 ммоль/л.
Результаты анализа при наличии сахарного диабета
• венозная кровь более 6,1 ммоль/л;
• капиллярная кровь более 6,1 ммоль/л;
• плазма венозной крови более 7,0 ммоль/л.
Затем из списка выбираем пациента, вводим показания его анализов, например
венозная кровь – 4,1 ммоль/л;
капиллярная кровь – 8,2 ммоль/л;
плазма венозной крови – 7,3 ммоль/л.
И программа должна выдать диагноз: легкая, средняя или тяжелая степень заболевания( эти показатели тоже будут в пределах)

@Lebron300 · 30.11.2014, 15:31 **[ТС]**

Исходные данные примерно такие:

Создание программы, позволяющей определять степень заболевания сахарным диабетом

@Bitton · 30.11.2014, 15:44

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

Фамилии пациентов мы берем в файле Excel ( выдуманные)..... там же заносим норму анализов, например:
Результаты анализа в норме (при отсутствии сахарного диабета)
• венозная кровь – 3,3–5,5 ммоль/л;
• капиллярная кровь – 3,3–5,5 ммоль/л;
• плазма венозной крови – 4–6,1 ммоль/л.
Результаты анализа при наличии сахарного диабета
• венозная кровь более 6,1 ммоль/л;
• капиллярная кровь более 6,1 ммоль/л;
• плазма венозной крови более 7,0 ммоль/л.
Затем из списка выбираем пациента, вводим показания его анализов, например
венозная кровь – 4,1 ммоль/л;
капиллярная кровь – 8,2 ммоль/л;
плазма венозной крови – 7,3 ммоль/л.
И программа должна выдать диагноз: легкая, средняя или тяжелая степень заболевания( эти показатели тоже будут в пределах)

Ну к примеру так,

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
sub diagnoz ()
dim ven as object
dim kap as object
dim pla as object
dim result as object
Set ven = cells(2,2) ' так как первая строка будет ФИО
Set kap = cells(3,2)
Set pla = cells(4,2)
set result = cells(5,2) ' сюда будет выводиться диагноз
if ven >6,1 and kap > 6,1 and pla >7,0 then
result = "Чувак у тебя проблемы с кровью"
Else 
result = "Чувак ты здоров!"
 
 
End if
 
end sub

Соответственно условия для "легкая, средняя или тяжелая степень заболевания( эти показатели тоже будут в пределах)" по такому принципу можешь сделать сам)

Добавлено через 3 минуты

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

Исходные данные примерно такие:
Вложение 460482

блин когда отвечал не видел что ты написал) ну в общем идея такая, главное сделать условия, а куда и как выводить результат реализовать не сложно

Новые блоги и статьи Все статьи Все блоги /
My Business CRM MaGz GoLd 16.04.2026 Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .	Знаешь почему 90% людей редко бывают счастливыми? kumehtar 14.04.2026 Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.	Фиксация колонок в отчете СКД Maks 14.04.2026 Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .	Настройки VS Code Loafer 13.04.2026 { "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .
Оптимизация кода на разграничение прав доступа к элементам формы Maks 13.04.2026 Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .	Контроль заполнения и очистка дат в зависимости от значения перечислений Maks 12.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .	Архитектура слоя интернета для сервера-слоя. Hrethgir 11.04.2026 В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .	Подстановка значения реквизита справочника в табличную часть документа Maks 10.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача №1: при указании работ (справочник РаботыПоРемонтуСпецтехники),. . .

@Lebron300 0 / 0 / 0 Регистрация: 29.11.2014 Сообщений: 23

	Создание программы, позволяющей определять степень заболевания сахарным диабетом 29.11.2014, 15:19. Показов 1089. Ответов 10 Метки нет (Все метки) Говорю сразу... В VBA никогда не работал , но дали вот такое задание.... Разработать собственное приложение VBA в MS Excel, осуществляющее заполнение картотеки пациентов и базы данных обследований, а также выполняющее оценку вероятности наличия заболевания у каждого из пациентов по результатам вычислительного анализа имеющихся данных. (Автоматизация процесса диагностики сахарного диабета)... Может кто подскажет источники или мысли как это можно все реализовать... надеюсь на вашу помощь друзья))) 0

SoftIce es geht mir gut 11274 / 4760 / 1183 Регистрация: 27.07.2011 Сообщений: 11,439
	29.11.2014, 16:19
	Это учебное задание? 0

@Lebron300 0 / 0 / 0 Регистрация: 29.11.2014 Сообщений: 23
	29.11.2014, 16:35 [ТС]
	Да... 0

@ovva 4709 / 3662 / 857 Регистрация: 02.02.2013 Сообщений: 3,518 Записей в блоге: 2
	29.11.2014, 21:19
	Говорю сразу... VBA не VBA это здесь дело десятое. Сразу возникает куча вопросов. Картотека пациентов – где реализуется (в Excel, в какой СУБД, непосредственно в программе), какие поля должна иметь карточка такой картотеки, функционал такой картотеки. База данных обследований – какие обследования, какие параметры по каждому обследованию должны сохраняться, связь с картотекой (или это одна база), реализация, функционал. Оценка вероятности наличия заболевания у каждого из пациентов по результатам вычислительного анализа имеющихся данных – по крайней мере, нужно иметь алгоритм такого анализа. Судя по рекомендованной среде (Excel, VBA) и заказчику (учебное задание) реализация предполагает очень упрощенный м.б. утрированный подход, но без конкретики говорить не о чем. 0

@Lebron300 0 / 0 / 0 Регистрация: 29.11.2014 Сообщений: 23
	30.11.2014, 10:37 [ТС]
	Шаблоны нам наврятли дадут.... нужно создать программу, которая позволяет выбирать фамилию пациента, набор анализов( в числовом виде) и в итоге должен выводиться диагноз по этим критериям... 0

toiai 3218 / 967 / 223 Регистрация: 29.05.2010 Сообщений: 2,087
	30.11.2014, 14:32
	Есть еще подобная тема Постановка диагноза о заболевании туберкулезом по заданным параметрам присмотрись... 0

@Lebron300 0 / 0 / 0 Регистрация: 29.11.2014 Сообщений: 23
	30.11.2014, 15:11 [ТС]
	Фамилии пациентов мы берем в файле Excel ( выдуманные)..... там же заносим норму анализов, например: Результаты анализа в норме (при отсутствии сахарного диабета) • венозная кровь – 3,3–5,5 ммоль/л; • капиллярная кровь – 3,3–5,5 ммоль/л; • плазма венозной крови – 4–6,1 ммоль/л. Результаты анализа при наличии сахарного диабета • венозная кровь более 6,1 ммоль/л; • капиллярная кровь более 6,1 ммоль/л; • плазма венозной крови более 7,0 ммоль/л. Затем из списка выбираем пациента, вводим показания его анализов, например венозная кровь – 4,1 ммоль/л; капиллярная кровь – 8,2 ммоль/л; плазма венозной крови – 7,3 ммоль/л. И программа должна выдать диагноз: легкая, средняя или тяжелая степень заболевания( эти показатели тоже будут в пределах) 0

@Lebron300 0 / 0 / 0 Регистрация: 29.11.2014 Сообщений: 23
	30.11.2014, 15:31 [ТС]
	Исходные данные примерно такие: 0