|
|
| Другие темы раздела | |
|
VB Вывод на экран изображения: елка и снеговик
https://www.cyberforum.ru/ visual-basic/ thread2009601.html изображения в виде елки и снеговика. Помогите пожалуйста! |
VB Объясните программу программа |
|
VB Получить текстовый заголовок из бинарного файла
https://www.cyberforum.ru/ visual-basic/ thread2008653.html Привет форумчанам! Есть необходимость зачитать текстовый заголовок графического файла (DICOM), не загружая весь файл. Исходя из FAQ по DICOM, длина заголовка 794 байта ("...в DICOM-файле первые 128 байт не используются (заполнены нулями), за ними следуют символы 'D', 'I', 'C', 'М'. Далее следует определенным образом сгруппированная информация заголовка, занимающая 794 байта..."). Вот их то как... |
VB Автоматизация программы
https://www.cyberforum.ru/ visual-basic/ thread2008461.html СЛАУ с Методом Крамера ( до 5 порядка) Нужно автоматизировать программу,поиск коэффициентов и вычисление определителей,вот код Private Sub CommandButton1_Click() Dim y1, y2, y3, y4, y5 As String Dim a1, a2, a3, a4, a5 As String Dim b1, b2, b3, b4, b5 As String Dim c1, c2, c3, c4, c5 As String Dim e1, e2, e3, e4, e5 As String Dim f1, f2, f3, f4, f5 As String Dim d1, d2, d3, d4, d5 As... |
|
VB Сбились настройки скриптов Доброго времени суток! Опишу проблему. Зашёл как-то в Свойства скипта и чёрт меня дернул установить галочку впараметрах который называется время показа или типа того. После этого диалоговые окна скриптов показывются на секунду и исчезают. Пробовал убрать галочку, а она восстанавливается! И так для всех скриптов. Помогите, как восстановить как было? Прошу не ругаться сильно я в скриптах не силён.... |
VB Запуск файла CSV и запись данных
https://www.cyberforum.ru/ visual-basic/ thread2008311.html Ребята подскажите пожалуйста, что я не так делаю с этим файлом: Dim XLM As Object Set XLM = CreateObject("Excel.Application") FileName = App.Path & "\BD\Сотрудники.CSV" XLM.Visible = False For Each X In XLM.Worksheets("Сотрудники").Range("A1:A5").Value 'ругается на "Х" в xl работает нормально! ComboBox1.AddItem X Next XLM.ActiveWorkbook.save |
| VB Run-time error'11' Divis9\ion by zero Как убрать уведомление об ошибке в калькуляторе? Помогите пожалуйста! сначала появляется MsgBox, а потом выдает ошибку.как ее убрать и можно ли? Private Sub Command_Click() num2 = Text1.Text If op = "+" Then Text1.Text = num1 + num2 ElseIf op = "-" Then Text1.Text = num1 - num2 ElseIf op = "*" Then Text1.Text = num1 * num2 https://www.cyberforum.ru/ visual-basic/ thread2007818.html |
Поправить ошибку пути создания папки VB Ребята подскажите не получается прописать название конечной папки. strDate = "C:\Users\Public\Desktop\ОТЧЕТЫ\ " & Format(Date, "Mmmm YYYY")\ " & Format(Date, "dd.mm") ругается на " dd " |
| VB Экономическая задача на VBA. В столбце A на рабочем листе находится прибыль/убыток предприятия за N месяцев В столбце A на рабочем листе находится прибыль/убыток предприятия за N месяцев. (Заполнить первые N элементов столбца A случайными числами из диапазона ). Выделить красным цветом в столбце A положительные элементы и найти среди них максимальную прибылью. Максимальную прибыль вывести в диалоговое окно. Добавлено через 20 часов 10 минут Не могу разобраться почему не выводит в диалоговое окно. ... https://www.cyberforum.ru/ visual-basic/ thread2007346.html |
VB Экономическая задача. Известны результаты проверки N предприятий по налогам, прибыли и себестоимости продукции
https://www.cyberforum.ru/ visual-basic/ thread2007195.html Известны результаты проверки N предприятий по налогам, прибыли и себестоимости продукции. Определить и вывести предприятие с наибольшей прибылью и вычистить среднюю сумму налоговых сборов, которые платят все предприятия. |
|
VB Найти сумму тех элементов главной диагонали, которые кратны 5 Заполнить таблицу размером N*N случайными целыми числами из диапазона . Найти сумму тех элементов главной диагонали, которые кратны 5. Результат вывести в ячейку N+2, N+2 и залить ее красным цветом. Sub cl14() Dim i as Integer, j as Integer, N as Integer, S as Integer N=InputBox("Введите количество элементов") For i = 1 to N For j = 1 to N Cells(i,j)=Int(Rnd()*26-1) Next j Next i |
VB Определить попадает ли точка с координатами Xo, Yo в круг с радиусом R Определить попадает ли точка с координатами Xo, Yo в круг с радиусом R. Уравнение окружности R2=X2+Y2. Присвоить признаку N=1, если точка находится внутри круга, и N=0, если вне круга. Пожалуйста помогите с решением! Буду очень благодарен. https://www.cyberforum.ru/ visual-basic/ thread2006624.html |
|
0 / 0 / 0
Регистрация: 26.12.2016
Сообщений: 21
|
|
| 0 | |
Как заполнить квадратную матрицу значениями? - VB - Ответ 1057648325.06.2017, 18:43. Показов 765. Ответов 2
Метки (Все метки)
В моей программе я нахожу коэффициенты в уравнении,присваиваю переменным(типа string) значения этих коэффициентов, и мне надо эти самые коэффициенты добавить в матрицу. Допустим у меня есть переменные с различными значениями a1=2 a2=3 a3=4;b1=1 b2=3 b3=5; c1=2 c2=4 c3=7; мне нужно заполнить матрицу этими значениями,вот так 2 3 4 1 3 5 2 4 7 Вернуться к обсуждению: Как заполнить квадратную матрицу значениями? VB
0
|
|
|
|
| 25.06.2017, 18:43 | |
|
Готовые ответы и решения:
2
Заполнить матрицу F размерности 21×3 значениями Заполнить порядковыми номерами квадратную матрицу змейкой по диагонали Заполнить матрицу F размерности 21×3 значениями Visual Basic Заполнить матрицу Р размерности m x n значениями элементов вектора Q размерности k = m x n |
| 25.06.2017, 18:43 | |
| 25.06.2017, 18:43 | |
|
Помогаю со студенческими работами здесь
0
Как рандомно заполнить квадратную матрицу звездочками? Как заполнить квадратную матрицу числами по порядку? |
Наверх