Наши конференции

В данной секции Вы можете ознакомиться с материалами наших конференций

VII МНПК "АЛЬЯНС НАУК: ученый - ученому"

IV МНПК "КАЧЕСТВО ЭКОНОМИЧЕСКОГО РАЗВИТИЯ: глобальные и локальные аспекты"

IV МНПК "Проблемы и пути совершенствования экономического механизма предпринимательской деятельности"

I МНПК «Финансовый механизм решения глобальных проблем: предотвращение экономических кризисов»

VII НПК "Спецпроект: анализ научных исследований"

III МНПК молодых ученых и студентов "Стратегия экономического развития стран в условиях глобализации"(17-18 февраля 2012г.)

Региональный научный семинар "Бизнес-планы проектов инвестиционного развития Днепропетровщины в ходе подготовки Евро-2012" (17 апреля 2012г.)

II Всеукраинская НПК "Актуальные проблемы преподавания иностранных языков для профессионального общения" (6-7 апреля 2012г.)

МС НПК "Инновационное развитие государства: проблемы и перспективы глазам молодых ученых" (5-6 апреля 2012г.)

I Международная научно-практическая Интернет-конференция «Актуальные вопросы повышения конкурентоспособности государства, бизнеса и образования в современных экономических условиях»(Полтава, 14?15 февраля 2013г.)

I Международная научно-практическая конференция «Лингвокогнитология и языковые структуры» (Днепропетровск, 14-15 февраля 2013г.)

Региональная научно-методическая конференция для студентов, аспирантов, молодых учёных «Язык и мир: современные тенденции преподавания иностранных языков в высшей школе» (Днепродзержинск, 20-21 февраля 2013г.)

IV Международная научно-практическая конференция молодых ученых и студентов «Стратегия экономического развития стран в условиях глобализации» (Днепропетровск, 15-16 марта 2013г.)

VIII Международная научно-практическая Интернет-конференция «Альянс наук: ученый – ученому» (28–29 марта 2013г.)

Региональная студенческая научно-практическая конференция «Актуальные исследования в сфере социально-экономических, технических и естественных наук и новейших технологий» (Днепропетровск, 4?5 апреля 2013г.)

V Международная научно-практическая конференция «Проблемы и пути совершенствования экономического механизма предпринимательской деятельности» (Желтые Воды, 4?5 апреля 2013г.)

Всеукраинская научно-практическая конференция «Научно-методические подходы к преподаванию управленческих дисциплин в контексте требований рынка труда» (Днепропетровск, 11-12 апреля 2013г.)

VІ Всеукраинская научно-методическая конференция «Восточные славяне: история, язык, культура, перевод» (Днепродзержинск, 17-18 апреля 2013г.)

VIII Международная научно-практическая Интернет-конференция «Спецпроект: анализ научных исследований» (30–31 мая 2013г.)

Всеукраинская научно-практическая конференция «Актуальные проблемы преподавания иностранных языков для профессионального общения» (Днепропетровск, 7–8 июня 2013г.)

V Международная научно-практическая Интернет-конференция «Качество экономического развития: глобальные и локальные аспекты» (17–18 июня 2013г.)

IX Международная научно-практическая конференция «Наука в информационном пространстве» (10–11 октября 2013г.)

Третья международная научно-практическая конференция "СПЕЦПРОЕКТ: анализ научных исследований" (10-14 июля 2007 г.)

ВИКОРИСТАННЯ   СЕРВЕРА АВТОМАТИЗАЦІЇ   MS EXCEL ДЛЯ ОРГАНІЗАЦІЇ СИМВОЛЬНИХ ОБЧИСЛЕНЬ У СЕРЕДОВИЩАХ VB .NET ТА DELPHI

К. ф.-м.н. Сопронюк Т.М., Сопронюк А.Ю.

Чернівецький національний університет

Автоматизація — це одна з можливостей, наданих технологією Microsoft COM (Component Object Model). Автоматизація використовується додатками (COM-серверами) для надання доступу до своїх об'єктів, їх властивостей і методів іншим додаткам (COM-клієнтам), якими можуть бути і засоби розробки. Усі додатки Microsoft Office є серверами автоматизації (COM-серверами).

Розглянемо автоматизацію на прикладі використання методу Evaluate об’єкта WorkSheet для виконання символьних обчислень. Як сервер автоматизації   використаємо MS Excel (COM-сервер) , а   як засіб розробки – Visual Basic .NET ( COM-клієнт) .

Приклад 1. Побудова графіка функції засобами MS Excel, які забезпечують побудову діаграм.

Private Sub cmdCalculate_Click( ByVal sender As System.Object, _

  ByVal e As System.EventArgs) Handles cmdCalculate.Click

   Dim   Функція, значення As String , n As Integer

        ' раннє зв'язування буде працювати тільки у випадку

        ' наявності посилання (Project|References)   на реально існуючий додаток.

  Dim oExcel As New Excel.Application ' раннє зв'язування

  oExcel.Visible = False        ' додатка не видно  

  oExcel.Workbooks.Add()   ' добавлення робочої книги

  With oExcel.ActiveWorkbook   ' для активної робочої книги

            For n = 1 To 50 ' заповнення першого робочого листа

' занесення у два стовпчики першого листа точок (x,y) майбутнього

' графіка,   точки формуються на відрізку x ? (0;5] з кроком 0.1

  .                      Worksheets(1).Cells(n, 1).Value = n * 0.1

            '   зчитування рядка з формулою з елемента керування форми

                        Функція = txtFormula.Text

' заміна всіх символів “х” на значення аргументу

                        значення = Replace(Функція, "x", Str(n * 0.1))

                         ' десяткова точка в Excel може задаватися комою, тому, якщо треба:

                        значення = Replace(значення, ".", ",")

‘ виклик методу Evaluate об’єкта WorkSheet

‘ для обчислення значення функції в точці

                     . Worksheets(1).Cells(n, 2).Value = oExcel.Evaluate(значення)

            Next

             oExcel.Charts.Add()   ' добавлення діаграми

  ' побудова графіка на відрізку x ? (0;5] по створеному діапазону

               .ActiveChart.ChartWizard _

(oExcel.ActiveWorkbook.Worksheets(1).Range("A1:В50"), 4, 1, 2, 1)

            .ActiveChart.Export("graphic.gif")   ' збереження   графіка у файлі graphic.gif

            .Close( False )   ' закриття книги без збереження інформації

  End With

  ' закриття Excel

   oExcel.Quit()

   oExcel = Nothing

  ' зчитування графіка з файла graphic.gif у PictureBox1.Image

    PictureBox1.Image = Image.FromFile("graphic.gif")

End Sub

Побудова графіка функції засобами MS Excel

Аналогічний підхід можна реалізувати в будь-якому іншому засобі розробки.   Отже, часто не варто розробляти власні алгоритми для ряду задач. Зручніше використати потужні можливості додатків Microsoft Office, які є серверами автоматизації.   Їх можна навіть не візуалізовувати, як зроблено в попередньому прикладі.

Продемонструємо тепер описаний вище спосіб в іншому середовищі розробки . Тут повний код проекту наводити не будемо, а опишемо тільки функцію , яку можна використовува ти, наприклад, для побудови графіка функції одної зміннної, заданої у текстовому вигляді.

Приклад 2.   Символьне обчислення значення функції в точці х (сервер автоматизації   – MS Excel (COM-сервер) , засіб розробки – Delphi ( COM-клієнт)) .

 

Function F(x:double):double;

var        fun: string,

      oExcel: variant;

begin

// зв’язування з сервером автоматизації Excel

oExcel:= CreateOleObject('Excel.Application');

// зчитування рядка з формулою з елемента керування форми Form1

fun := Form1.txtFormula.Text;

// заміна всіх входжень символу ‘ х ’   в рядок fun на реальне числове

// значення, що передається у функцію

while Pos('x', fun) > 0   do

                         begin

                                    Insert(FloatToStr(x), fun, Pos('x', fun));

                                    Delete(fun,Pos('x', fun),1);

                        end;

// виклик методу Evaluate об’єкта WorkSheet

// для обчислення значення функції в точці

            F:= oExcel.Evaluate(fun);

// закриття Excel

oExcel.Quit;

end;