|
|
| Другие темы раздела | |
| VB Программный код Помоги,программа иногда ошибку выдает,что не правильно в коде? Dim a As Single, b As Single, c As Single, d As Single Dim Z As Single Private Sub Command1_Click() 1 a = Val(InputBox("Введите а", "Ввод")) b = Val(InputBox("Введите b", "Ввод")) c = Val(InputBox("Введите c", "Ввод")) d = Val(InputBox("Введите d", "Ввод")) Text1 = Str(a) https://www.cyberforum.ru/ visual-basic/ thread808676.html |
Построение графика функции VB ошибку выдает. как исправить? Option Explicit Dim x, y, t, a As Double Dim i As Integer Private Sub Command1_Click() a = Val(Text1.Text) Picture1.Scale (-6, 10)-(6, -5) Picture1.Line (-10, 0)-(5, 0), vbBlue |
|
VB Можно ли из одного проекта управлять другим проектом?
https://www.cyberforum.ru/ visual-basic/ thread808243.html Можно ли из одного проекта управлять другим проектом? Редактировать формы, писать новый код? если да, то подскажите как? |
VB basic VS Oracle
https://www.cyberforum.ru/ visual-basic/ thread808209.html помогите написать небольшой код или натолкните на верный путь. У меня есть определённая мною написанная софтина которая делает файл с содержимым типа(ну тоже есть в массиве): дата время значение дата время значение дата время значение .... дата время значение |
|
VB При загрузке проекта в редактор не грузится модуль Добавляю в проект готовый модуль (модуль лежит в папке со всеми файлами проекта), сохраняю проект, закрываю редактор. Вот содержимое Проект1.vbp: Type=Exe Form=Форма1.frm Reference=*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\WINDOWS\system32\stdole2.tlb#OLE Automation Form=Form2.frm Form=Form3.frm Module=Модуль 1; Модуль 1.bas IconForm="Form1" Startup="Form1" |
VB Поиск файлов по размеру в директории и поддиректориях Всем привет! Пока новичок в этом деле, по этому сильно не пинайте если вопрос глупый. Нашел пример поиска файлов, подогнал его по своим нуждам, но ни как не могу решить один вопрос. Мне надо искать файлы не по названию, а по размеру, точнее все файлы с размером меньше или ровно 1000 байт. Возможно ли это реализовать на базе этого кода? Option Explicit Dim fso As New FileSystemObject Dim... https://www.cyberforum.ru/ visual-basic/ thread807704.html |
| VB Доступ к одним данным из базы данных с двух машин Dim conn5 As Object Set conn5 = CreateObject("ADODB.Connection") Dim rst5 As Object Set rst5 = CreateObject("ADODB.Recordset") conn5.Provider = "Microsoft.Jet.OLEDB.4.0" conn5.Properties("Data Source").Value = Module.bdPath conn5.Open rst5.Open "Select * from Positions", conn5, adOpenStatic, adLockReadOnly While Not rst5.EOF 'тут данные перебираються и вносяться в listview1 https://www.cyberforum.ru/ visual-basic/ thread807696.html |
VB Текстовый редактор Помогите сделать текстовый редактор в visual basic 6.0 Файл -Открыть -Сохранить -Выход Правка -Копировать -Вырезать -Вставить -Удалить |
| VB Решение системы уравнений Дана система вида a1*tgx+b1*cosy=c1 a2*cosx+b2*siny=c2 Необходимо написать программу, решающую эту систему в зависимости от значений параметров a1,b1, a2,b2 и констант с1 и с2. В процессе решения должны быть или найдены все действительные корни (в пределах периода) или выдано сообщение о несовместности системы. Решение должно отыскиваться с определенной точностью (вводится с клавиатуры).... https://www.cyberforum.ru/ visual-basic/ thread807488.html |
VB Задан массив, содержащий несколько нулевых элементов. Сжать его, выбросив эти элементы
https://www.cyberforum.ru/ visual-basic/ thread807249.html Помогите решить) |
|
Код выполнения условий согласно блок-схеме VB Помогите,а то мне ошибку выдает.. Dim a As Double, b As Double, c As Double, d As Double, z As Double Private Sub Command1_Click() 1 a = Val(InputBox("Введите а", "Ввод")) b = Val(InputBox("Введите b", "Ввод")) c = Val(InputBox("Введите c", "Ввод")) d = Val(InputBox("Введите d", "Ввод")) If a > b Then If c < d Then z = e ^ 4.6 - 3 * Log(c - c * d) |
VB Упорядочить элементы массива по возрастанию модулей
https://www.cyberforum.ru/ visual-basic/ thread806981.html Помогите пожалуйста решить! Буду очень признательна! Сложить схему алгоритма и программу решения задачи обработки одномерного массива. Вывести поточные данные, промежуточные та конечные результаты. Массив сформировать самостоятельно с помощью функции Rnd Дано массив А(n). Сформировать массив В с элементов исходного массива, которые имею парные значения. Упорядочить элементы массива В по... |
|
0 / 0 / 0
Регистрация: 21.03.2012
Сообщений: 26
|
|
| 0 | |
Вычислить сумму элементов массива, порядковые номера которых являются простыми числами - VB - Ответ 425533014.03.2013, 19:32. Показов 1070. Ответов 1
Метки (Все метки)
Ввести с клавиатуры N различных чисел. Вычислить сумму элементов массива, порядковые номера которых являются простыми числами. Вернуться к обсуждению: Вычислить сумму элементов массива, порядковые номера которых являются простыми числами VB
0
|
|
|
|
| 14.03.2013, 19:32 | |
|
Готовые ответы и решения:
1
Вычислить сумму элементов массива, номера которых являются нечетными Вычислить сумму чисел, порядковые номера которых являются простыми числами. Вычислить сумму чисел, порядковые номера которых являются простыми числами.
|
| 14.03.2013, 19:32 | |
| 14.03.2013, 19:32 | |
|
Помогаю со студенческими работами здесь
0
Вычислить сумму чисел, порядковые номера которых являются простыми числами Вычислить сумму чисел последовательности, порядковые номера которых являются простыми числами
Требуется вычислить и напечатать сумму тех из них, порядковые номера которых являются простыми числами. (PascalABC) |