Как связать библиотеки Visual Basic с Mathcad

@Иванннн1995 · Регистрация: 29.01.2018

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

Я не могу сообразить как связать библиотеки Visual Basic с Mathcad, суть такова, что мне нужно имея алгоритм в Visual Basic перенести результат подсчета в Mathcad в виде графика, так вот не могу понять как написать такую строку кода в Visual Basic. Может знает кто как это сделать?

@_shark · 31.01.2018, 09:55

если Mathcad имеет свой VBA, как например, MS Office или CorelDRAW, то это сделать совсем несложно. Просто юзайте внутренний хелп с примерами.

@Иванннн1995 · 31.01.2018, 16:13 **[ТС]**

Нет, в Маткаде нет встроенного VBA((
Как быть? как код написать??

@_shark · 31.01.2018, 20:17

возможно, вам стоит задать свой вопрос https://www.cyberforum.ru/mathcad/. Там есть похожие примеры, например Как правильно написать функцию и построить ее график

@Иванннн1995 · 09.02.2018, 20:56 **[ТС]**

_shark, подскажи пожалуйста, я связал библиотеки, но теперь проблема следующая, после написания цикла FOR Visual Basic, я получаю массив данных для переменной X, далее пытаюсь вывести эти данные в Маткад и они не выводятся, выводится только последнее значение массива данных. Подскажи плиз что делать??

@_shark · 09.02.2018, 22:48

я, честно говоря, с Маткадом не работал, но на VBA программирую. Если покажете код, то попробую помочь

@Иванннн1995 · 11.02.2018, 13:41 **[ТС]**

_shark, посмотри пожалуйста, по итогу, переменная (X) из кода перейдя в маткад получает только одно значение из массива полученных данных в цикле, а именно последнее значение, а мне нужны все((

VB.NET
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
    Dim MC As Mathcad.Application
    Dim WK As Mathcad.Worksheets
    Dim WS As Mathcad.Worksheet
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
 
        Dim a As Double
        Dim b As Double
        Dim R As Long
        
        MC = CreateObject("Mathcad.Application")
        WK = MC.Worksheets
        WS = WK.Open("D:\123.xmcd")
 
        ' алгоритм    
 
        For i = 1 To 10 Step 2
            a = i
            b = i
 
            R = (a ^ 2 + b ^ 2) ^ (1 / 2)
 
            WS.SetValue("X", R)
 
            Debug.WriteLine(R)
        Next
 
    End Sub

@Иванннн1995 · 11.02.2018, 14:00 **[ТС]**

_shark, по итогу я получаю вот такой результат в Маткаде, отправил архив, в ней фотка.

Остап Бонд · 11.02.2018, 20:54

Иванннн1995,
Вы последовательно назначаете весь массив в одну переменную - так чему удивляетесь?
Программа делает то, что ей сказано, а не то, что Вы хотите.
Можете попробовать заменить

Сообщение от Иванннн1995

VB.NET
1
WS.SetValue("X", R)

на

VB.NET
1
WS.SetValue("X" & i, R)

, а в маткаде искать переменные X1, X3, X5, X7, X9.

А бэйсик ваш там - https://www.cyberforum.ru/vb-net/, а не тут.

@Иванннн1995 · 11.02.2018, 21:08 **[ТС]**

Остап Бонд, подскажи плиз, как мне в одну переменную поместить массив данных, а не искать переменные X1, X3, X5, X7, X9. Моя задача заключается что бы все значения X1, X3, X5, X7, X9 были заключены в одну переменную для построения графика, подскажи плиз если знаешь.

Остап Бонд · 11.02.2018, 21:25

Иванннн1995, попробуйте сформировать массив перед тем, как передавать его.

@Иванннн1995 · 11.02.2018, 21:26 **[ТС]**

Остап Бонд, а не подскажешь как это сделать??

Новые блоги и статьи Все статьи Все блоги /
Модель здравосоХранения 6. ESG-повестка и устойчивое развитие; углублённый анализ кадрового бренда anaschu 31.03.2026 В прикрепленном документе раздумья о том, как можно поменять модель в будущем	10 пpимет, которые всегда сбываются Maks 31.03.2026 1. Чтобы, наконец, пришла маршрутка, надо закурить. Если сигарета последняя, маршрутка придет еще до второй затяжки даже вопреки расписанию. 2. Нaдоели зима и снег? Не надо переезжать. Достаточно. . .	Перемещение выделенных строк ТЧ из одного документа в другой Maks 31.03.2026 Реализация из решения ниже выполнена на примере нетипового документа "ВыдачаОборудованияНаСпецтехнику" с единственной табличной частью "ОборудованиеИКомплектующие" разработанного в конфигурации КА2. . . .	Functional First Web Framework Suave DevAlt 30.03.2026 Sauve. IO Апнулись до NET10. Из зависимостей один пакет, работает одинаково хорошо как в режиме проекта так и в интерактивном режиме. из сложностей - чисто функциональный подход. Решил. . .
Автоматическое создание документа при проведении другого документа Maks 29.03.2026 Реализация из решения ниже выполнена на нетиповых документах, разработанных в конфигурации КА2. Есть нетиповой документ "ЗаявкаНаРемонтСпецтехники" и нетиповой документ "ПланированиеСпецтехники". В. . .	Настройка движения справочника по регистру сведений Maks 29.03.2026 Решение ниже реализовано на примере нетипового справочника "ТарифыМобильнойСвязи" разработанного в конфигурации КА2, с целью учета корпоративной мобильной связи в коммерческом предприятии. . . .	Автозаполнение реквизита при выборе элемента справочника Maks 27.03.2026 Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .	Сумматор с применением элементов трёх состояний. Hrethgir 26.03.2026 Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .

@Иванннн1995 0 / 0 / 0 Регистрация: 29.01.2018 Сообщений: 28

	Как связать библиотеки Visual Basic с Mathcad 29.01.2018, 19:31. Показов 3030. Ответов 11 Метки нет (Все метки) Я не могу сообразить как связать библиотеки Visual Basic с Mathcad, суть такова, что мне нужно имея алгоритм в Visual Basic перенести результат подсчета в Mathcad в виде графика, так вот не могу понять как написать такую строку кода в Visual Basic. Может знает кто как это сделать? 0

@_shark 193 / 191 / 31 Регистрация: 11.10.2016 Сообщений: 610
	31.01.2018, 09:55
	если Mathcad имеет свой VBA, как например, MS Office или CorelDRAW, то это сделать совсем несложно. Просто юзайте внутренний хелп с примерами. 0

@Иванннн1995 0 / 0 / 0 Регистрация: 29.01.2018 Сообщений: 28
	31.01.2018, 16:13 [ТС]
	Нет, в Маткаде нет встроенного VBA(( Как быть? как код написать?? 0

@_shark 193 / 191 / 31 Регистрация: 11.10.2016 Сообщений: 610
	31.01.2018, 20:17
	Сообщение было отмечено Иванннн1995 как решение Решение возможно, вам стоит задать свой вопрос https://www.cyberforum.ru/mathcad/. Там есть похожие примеры, например Как правильно написать функцию и построить ее график 1

@Иванннн1995 0 / 0 / 0 Регистрация: 29.01.2018 Сообщений: 28
	09.02.2018, 20:56 [ТС]
	_shark, подскажи пожалуйста, я связал библиотеки, но теперь проблема следующая, после написания цикла FOR Visual Basic, я получаю массив данных для переменной X, далее пытаюсь вывести эти данные в Маткад и они не выводятся, выводится только последнее значение массива данных. Подскажи плиз что делать?? 0

@_shark 193 / 191 / 31 Регистрация: 11.10.2016 Сообщений: 610
	09.02.2018, 22:48
	я, честно говоря, с Маткадом не работал, но на VBA программирую. Если покажете код, то попробую помочь 0

@Иванннн1995 0 / 0 / 0 Регистрация: 29.01.2018 Сообщений: 28
	11.02.2018, 21:08 [ТС]
	Остап Бонд, подскажи плиз, как мне в одну переменную поместить массив данных, а не искать переменные X1, X3, X5, X7, X9. Моя задача заключается что бы все значения X1, X3, X5, X7, X9 были заключены в одну переменную для построения графика, подскажи плиз если знаешь. 0

Остап Бонд Заблокирован
	11.02.2018, 21:25
	Иванннн1995, попробуйте сформировать массив перед тем, как передавать его. 0

@Иванннн1995 0 / 0 / 0 Регистрация: 29.01.2018 Сообщений: 28
	11.02.2018, 21:26 [ТС]
	Остап Бонд, а не подскажешь как это сделать?? 0

Как связать библиотеки Visual Basic с Mathcad

Решение