» Задачи на Visual Basic (VB).

КТО НИБУДЬ МОЖЕТ ПОМОЧЬ РЕШИТЬ ЭТИ ЗАдАЧИ ОЧЕНЬ НУЖНО(
Задание 4. Обработка одномерных массивов и матриц.

1.    Обработка одномерных массивов.
Даны 2 массива целых чисел. “Сжать” первый, удалив из него элементы,
содержащиеся во втором.

2.    Обработка двумерных массивов (матриц).
Дан выпуск в % к плану 7 наименований продукции за каждый год из 5 лет. Для каждого года определить продукцию с наибольшим выпуском.

Задание 5. Процедуры и функции пользователя.
Составить процедуру нахождения минимального (последнего, если их несколько) элемента массива B(k) (k-заданное число) и его номера. Записать процедуру в Стандартный модуль. Используя процедуру, найти минимальные значения элементов побочной диагонали матрицы A(m,m) и их номера

ВСЕМ ПРИВЕТ!!! РЕБЯТА, ПОМОГИТЕ, ПОЖАЛУЙСТА!!!! НЕ МОГУ РЕШИТЬ ДВЕ ЗАДАЧИ. САМА НЕ СЛИШКОМ ХОРОШО РАЗБИРАЮСЬ В ЭТОМ. PLEASE? HELP ME!!!!!!
1. на оси OX расположены 3 точки а, b, с определить какая из точек b или с расположена ближе к а
2. заполнить массив А в 10 элементов членами последовательности
i/(sin(i/pi)) и посчитать сумму этих элементов
THANKS!!!!!!!!!!!!!!!!!!!!!

indirkaaa
1. Геометрически:

в VB нужно будет сравнить ac c ab.

А по второй будет так:

Код:
dim a(10) as Integer
dim i as Integer
i=0
for i to a.lenght
a(i)=i/(Math.Sin(i/Math.PI))
i++
Next

Подскажите, а могу я на VB сделать такой exe, чтобы он запускал зашитый в себя другой файл и открывал обработчиком по-умолчанию в системе? Неважно что: музыка, приложение, текстовый документ. При этом важно максимальное быстродействие и чтобы не было распаковки каких-либо файлов на жесткий диск, только в память.

Спасибо

Уже писал про эту задачу но так помощи и не дождался.
Повторюсь:
Задача проста до ужаса, я бы сделал но забыл как брать данные из inputbox'a
Вот текст задачи:
В приложении вводится день, месяц и год рождения, в результате работы они выводятся в соответствующих отдельных окнах(ввод выполнить при помощи inputbox'a)
Вот такой код программы(это я набросал):
Private Sub Command1_Click()
Dim pass As Integer
Dim D As Integer
Dim M As Integer
Dim G As Integer
pass = Val(InputBox("Введите день, месяц и год вашего рождения", "ДМГ"))
D = Label1.Caption
M = Label2.Caption
G = Label3.Caption
End Sub

Теперь нужно из инпут бокса взять введённые данные и вывести в лейблы. Лейблы то я сделал. Но как из него взять данные....на практике мы проходили но по тем задачам я так и не понял как из него происходит выборка.

[more=Вот скрин "программы"] [/more]

B16
А в чем собственно вопрос? Ты уже все сделал

Цитата:

pass = Val(InputBox("Введите день, месяц и год вашего рождения", "ДМГ"))

сделай тоже самое с каждой переменной по отдельности.
Сейчас у тебя в переменной pass сохранилось значение.

blaro, Сделал таким вот образом:
Dim pass As Integer
Dim pass2 As Integer
Dim pass3 As Integer
Dim D As Integer
Dim M As Integer
Dim G As Integer
Private Sub Command1_Click()
pass = Val(InputBox("Введите день вашего рождения", "День"))
Label1.Caption = pass
pass2 = Val(InputBox("Введите месяц вашего рождения", "Месяц"))
Label2.Caption = pass2
pass3 = Val(InputBox("Введите год вашего рождения", "Год"))
Label3.Caption = pass3
End Sub

Думаю почти тоже самое.

B16

Цитата:

Думаю почти тоже самое.

Нет, не тоже самое.

Цитата:

D = Label1.Caption
M = Label2.Caption
G = Label3.Caption

Здесь ты присваеваешь "пустым" числовым переменным текстовые значения. Что само по себе не правильно.

Цитата:

pass = Val(InputBox("Введите день вашего рождения", "День"))
Label1.Caption = pass
pass2 = Val(InputBox("Введите месяц вашего рождения", "Месяц"))
Label2.Caption = pass2
pass3 = Val(InputBox("Введите год вашего рождения", "Год"))
Label3.Caption = pass3

А вот здесь ты присваеваешь лейблам правильное значение. Только зачем тебе переменные D,M,G?

Ну вообще то можно вообще без D, M, G и pass'ов

Private Sub Command1_Click()
Label1.Caption = Val(InputBox("Введите день вашего рождения", "День"))
Label2.Caption = Val(InputBox("Введите месяц вашего рождения", "Месяц"))
Label3.Caption = Val(InputBox("Введите год вашего рождения", "Год"))
End Sub

Как то так. Не?

zerkalo77
Можно и так. Это уже на усмотрение автора программы. Тут даже можно убрать Val, ибо конвертировать строку в число и обратно в строку-глупо. Да и прога будет немножко быстрее работать, имхо.

всем добрый день.
Помогите кто может, скоро сессия, а мне надо сдать программирование на VBScriptе, а я его не знаю((((Пожалуйста....Вот задачка:

1.Вывести на экран диалоговое окно с кнопками Ok, Отмена и значком Stop Mark. Если нажата кнопка Ok, то вывести результат вычисления корней квадратного уравнения, коэффициенты которого передаются в сценарий в качестве параметров. Если нажата кнопка Отмена, вывести сообщение «Вы нажали Отмена».

zerkalo77, blaro - вообще нужно было один раз ввести дату рождения допустим 12.12.2000 и программа должна была сделать выборку: месяц в первый лейбл, день во второй, а год в третий. Но это оказалось сложновато. В итоге я решил сделать три инпут бокса. Препод сказал нормально и засчитал задачу.
На 41 странице указана задача полностью. Там уже нет D, M, G, кстати я их использую т.к. мне так проще.
Язык вроде не сложный но вот преподаватель не всё объясняет.

Ребята спасибо за то что заметили задачу и ответили. Т.к. когда первый раз задал вопрос ответ был один и тот не по теме.

Ребята, прошу прощения, если не в тему или если этот вопрос уже рассматривался. (цитата)
Хочу создать форму в VB в которой будут текстовые поля, в результате нажатие кнопки, всё что будет в текстовых полях записывалось в Ехсел в заранее заданные клетки и сохранялось там!!! Проблема с реализацией не знаю как заставить данные с текстового поля занести в Ехсел(((!!! если можно маленький пример плиз)))

7steeps
http://www.xtremevbtalk.com/archive/index.php/t-121161.html
http://forums.devx.com/showthread.php?t=168540

Ребята, помогите срочно решить вот такую задачку (программу составить на Visual Basic нужно, а йа дерево):

СОСТАВИТЬ ПРОГРАММУ ДЛЯ ВЫЧИСЛЕНИЯ ЗНАЧЕНИЯ ФУНКЦИИ. РЕЗУЛЬТАТЫ ВЫДАТЬ НА ПЕЧАТЬ:

N= 5x- 8lnx – 8, для х=2,5; шаг 0,1.


если поможете сегодня к 15:00 с меня на выходных пиво ^^

Aimerko

Цитата:

если поможете сегодня к 15:00 с меня на выходных пиво ^^

А если я живу в другой стране, обеспечишь мне прописку в Москве?

обеспечу в Питере)

Aimerko

Цитата:

обеспечу в Питере)

Тоже хорошо

Вот решение:

Код:
Dim x, N As Double
Dim i As Integer
x = 2.5
For i = 0 To 10
N = 5 * x - 8 * Math.Log10(x) - 8
x += 0.1
Console.WriteLine("{0}", N)
Next
Console.Read()

Спасибо огромное!

Скоро экзамен, а мне нужно сделать ещё несколько задач.
Вот 1я:
Нужно что бы введённое предложение(в текстбокс) выводилось в следующем текст боксе в виде:
Вводим: Москва Столица России.
Выводит:
Москва
Столица
России.
При это реализовать всё нужно при помощи циклов вида: Do, loop, until. Думаю понятно.
Вот 2я:
Нужно сделать программу используя выше написанные циклы: что бы по форме катался бильярдный шарик(простая точка) и отталкивался от краёв формы.
У меня точка даже не движется, хотя использовал обычный цикл.

Доброго времени суток! вопрос наверное тоже из часто задаваемых...
Как получить програмно список файлов и папок(их имен) - по указанной папки?
Задание:1. указывается путь к папке.
2. Получаем массив элементов, где значеними элементов явлюются - имена паппок и файлов входящих папку указанную в пункте 1.

Если есть подобные решения, то дайте пожалуйста просто ссылку....

GenyaMS
http://www.devx.com/vb2themax/Tip/19057
http://www.freevbcode.com/ShowCode.asp?ID=41
http://www.blueclaw-db.com/listbox-directory.htm
http://www.freevbcode.com/ShowCode.Asp?ID=1331

Здравствуйте, помогите пожалуйста решить задачку.
У меня есть документ Exel с определенными данными, эти данные стоят ссылками на другой документ. Каждый месяц мне нужно данные обновлять (изменением связей на другой месяц). Это не сложно, но все же.
Сделала всплывающий список в ячейке с месяцами, теперь хочу чтобы при выборе определенного месяца ссылка сама менялась на документ с данными выбираемого месяца.
Приблизительно понимаю как это сделать, но не знаю как написать все условия, так как в VBA не сильна (макрос на изменение ссылки я записала, про формулу "если" знаю, а вот как это все связать не пойму..))
Заранее спасибо ))))

хорошая предновогодняя шутка

Девушка, вам вроде бы сюда http://forum.ru-board.com/topic.cgi?forum=33&topic=8273#1

P.S.: Всех с наступающим!

Прошу помощи:
Есть программа SUBARU FAST 2, которая по мнению специалиста написана на VB 5.0

Цитата:

В базе страничная адресация, адрес задаётся 4мя байтами: ZZ YY XX UU
Абсолютный адрес получается так: (ZZ*0x8CA000 + YY*0x25800 +XX*0x800 + UU*0x8) - 4*0x25800). Индекс выполнен двоичным деревом.
Такая же база используется для большинства известных японских авто.

Как правильно экспортировать бд для последующего переформатирования в веб-приложение?

Читаешь по этому адресу данные записываешь в свою базу. В чем грабли?
чтоб тебе подробности написали нужно хотяб выложить пример базы данных.
а чтоб написали конвертор за Вас, указать сумму которую готов заплатить.

AndronH
Какой софт пользовать для чтения данных и конвертации?
Готов заплатить разумную цену за грамотный конвертер и фак к нему.

Ткните носом, нигде не смог найти нормального мануала как из VB.Net (MS studio 2008) работать с dbf . И вообще неплохобы мануал по работе с базами данных.

TayPen, подключаешь компоненты Microsoft ADO/DAO (какие привычней) и пользуешь. Не то?