помогите с лабораторной работой / Visual Basic

ReSQL.ru

Мобильная версия Контакт Правила FAQ Помощь

Гость

Войти | Регистрация | Профиль | Очистить

Новые сообщения | Избранное

Форумы | Пользователи | Статистика | Мод. лог | Поиск

Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр

Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / помогите с лабораторной работой

17 сообщений из 17, страница 1 из 1

помогите с лабораторной работой

#33407148

APRILL

Гость

Задание: Создать массив из 10 элементов, заполнить его с использованием текстового поля и вывести на экран, разделить элементы массива на группы: "А-И", "К-Т", "У-Я" и вывести на экран в массив ListBox, записать в файл по 3 элемента в строку, сделать переход к форме 2 и считать файл по 2 элемента в 2 массива и вывести на экран.
Зарание спасибо.

...

Рейтинг:

0 / 0

29.11.2005, 22:34

| Ответить | Цитировать | Написать

помогите с лабораторной работой

#33407488

Melkiades

Участник

Откуда: Москва

Сообщения: 1 459

Рейтинг: 0 / 0

Ну вот, под конец года студенты активизировались...
Вы тоже хотите, чтобы за вас все написали, или у вас что-то конкретно не получается?

...

Рейтинг:

0 / 0

30.11.2005, 09:27

| Ответить | Цитировать | Написать

помогите с лабораторной работой

#33412513

APRILL

Гость

У меня все не получается, помогите

...

Рейтинг:

0 / 0

01.12.2005, 22:23

| Ответить | Цитировать | Написать

помогите с лабораторной работой

#33412517

APRILL

Гость

пожалуйста...

...

Рейтинг:

0 / 0

01.12.2005, 22:28

| Ответить | Цитировать | Написать

помогите с лабораторной работой

#33415147

APRILL

Гость

Людииии....help!!!

...

Рейтинг:

0 / 0

03.12.2005, 09:19

| Ответить | Цитировать | Написать

помогите с лабораторной работой

#33415150

Borya7

Участник

Сообщения: 141

Рейтинг: 0 / 0

Попробуем разобраться в постановке задачи.
Есть строковый массив(10), его надо разделить на 3 группы по лидирующим буквам, вопрос автору - вывести на экран все в один листбокс или в три отдельных?

...

Рейтинг:

0 / 0

03.12.2005, 09:42

| Ответить | Цитировать | Написать

помогите с лабораторной работой

#33415176

APRILL

Гость

[quot APRILL]Задание: Создать массив из 10 элементов
Не из 10, а из 12 элементов.
Вывести в 3 листбокса отдельно.

...

Рейтинг:

0 / 0

03.12.2005, 11:24

| Ответить | Цитировать | Написать

помогите с лабораторной работой

#33416280

Пользователь2

Гость

Распиши подробней, что к чему. А то ты походу разбора задачи начинаешь менять исходные данные.

1. Дан массив из 12 элементов.
2. Заполняем его посредством текстового поля.
3. Выводим на эран (в виде MsgBox или в список?).
4. Разделяем массив на 3 массива по группам "А-И", "К-Т", "У-Я".
5. Выводим все в 3 списка?
6. Записываем в файл (исходный массив или массивы групп?)
7. Считываем из этого файла по 2 элемента в 2 массива.
8. Выводим на экран (в виде MsgBox или в список?).

...

Рейтинг:

0 / 0

05.12.2005, 08:48

| Ответить | Цитировать | Написать

помогите с лабораторной работой

#33420821

APRILL

Гость

3.Вывести на экран по-любому, все равно в List или в MsgBox
4.=5.Создаем массив ListBox из 3-х элементов для вывода результатов деления массива из 12 элементов строкового типа на 3 группы: "А-И", "К-Т", "У-Я"
(Это делается с помощью Select Case)
6.Записываем в файл результаты из списков.Это выглядит приблизительно так:
Private Sub Command2_Click()
Open "File1.txt" For Output As #1
Write #1, mass(0), mass(1), mass(2), mass(3)
Write #1, mass(4), mass(5), mass(6), mass(7)
Write #1, mass(8), mass(9), mass(10), mass(11)
Close #1
End Sub
(Я взяла это из другой программы)
7. Сделать переход ко 2-й форме, открыть файл для чтения(Open "File1.txt" For Input As #1), считывать данные этого файла по 2 элемента в 2 массива
8. Вывести тоже без разницы куда, можно в List

...

Рейтинг:

0 / 0

06.12.2005, 21:26

| Ответить | Цитировать | Написать

помогите с лабораторной работой

#33420826

APRILL

Гость

Пожалуйста, напишите хоть что-то...

...

Рейтинг:

0 / 0

06.12.2005, 21:28

| Ответить | Цитировать | Написать

помогите с лабораторной работой

#33421907

Пользователь2

Гость

Насчет пункта 4,5.

Допустим у нас есть массив Arr(11):

Код: plaintext

1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.

0	ААА
1	БББ
2	ВВВ
3	ГГГ
4	ДДД
5	ККК
6	ЛЛЛ
7	МММ
8	ННН
9	ООО
10	УУУ
11	ЯЯЯ

APRILL5.Создаем массив ListBox из 3-х элементов для вывода результатов деления массива из 12 элементов строкового типа на 3 группы: "А-И", "К-Т", "У-Я"

Должен получится один массив ArrGroup(2):

Код: plaintext

1.
2.

0 ААА;БББ;ВВВ;ГГГ;ДДД
1 ЛЛЛ;МММ;ННН;ООО
2 УУУ;ЯЯЯ

...

Рейтинг:

0 / 0

07.12.2005, 12:42

| Ответить | Цитировать | Написать

помогите с лабораторной работой

#33423021

Андрей Il

Участник

Откуда: г. Брянск

Сообщения: 476

Рейтинг: 0 / 0

f = FreeFile()
For i = 1 To 2
Load Lst(i)
Lst(i).Visible = True
Lst(i).Left = Lst(i - 1).Left + Lst(i - 1).Width + 250
Next i
St = ""
Open "w:\1.txt" For Append As #f
For i = 1 To 12
Mas(i) = InputBox("Введите элемент № " & i)
St = St & " " & Mas(i)
If i / 3 = i \ 3 Then
Print #f, St
St = ""
End If
Select Case InStr(RusAlf, LCase(Left(Mas(i), 1)))
Case Is < 12
Lst(0).AddItem Mas(i), Lst(0).ListCount
Case Is < 21
Lst(1).AddItem Mas(i), Lst(1).ListCount
Case Is > 20
Lst(2).AddItem Mas(i), Lst(2).ListCount
End Select
Next i
Close #f
Form2.SetFocus
i = 0
St = ""
Open "w:\1.txt" For Input As #f
While Not EOF(f)
Input #f, St
Слова разделены пробелами. Считываешь строку и значения массива из нее. Записываешь в 2 новых массива.
Wend
Close #f

Я правильно понял?

...

Рейтинг:

0 / 0

07.12.2005, 16:44

| Ответить | Цитировать | Написать

помогите с лабораторной работой

#33426208

Пользователь2

Гость

APRILL, набросал. Посмотри.

...

Рейтинг:

0 / 0

08.12.2005, 22:58

| Ответить | Цитировать | Написать

помогите с лабораторной работой

#33428428

APRILL

Гость

Пользователь2, спасибо огромное!!!
А можно в Select Case обойтись без With...End With ?
Если бы еще комментарии были...

...

Рейтинг:

0 / 0

09.12.2005, 19:43

| Ответить | Цитировать | Написать

помогите с лабораторной работой

#33429720

Пользователь2

Гость

APRILLА можно в Select Case обойтись без With...End With ?
Да можно.

...

Рейтинг:

0 / 0

12.12.2005, 08:34

| Ответить | Цитировать | Написать

Период между сообщениями больше года.

помогите с лабораторной работой

#38128908

Paflik

Гость

помогите сделать вот такое на Visual Basic Моделирование движения тела с переменной массой (взлет ракеты).

...

Рейтинг:

0 / 0

29.01.2013, 14:35

| Ответить | Цитировать | Написать

помогите с лабораторной работой

#38128930

Antonariy

Участник

Откуда: ☭

Сообщения: 80 221

Рейтинг: 0 / 0

Читал уже?

...

Рейтинг:

0 / 0

29.01.2013, 14:40

| Ответить | Цитировать | Написать

17 сообщений из 17, страница 1 из 1

Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / помогите с лабораторной работой

Цитировать

Написать

Автор*:

Ввести пароль для входа

Тема*:

Сообщение

Данное сообщение тематическое

Сообщение содержит картинки или видео 18+

Автор:

ВНИМАНИЕ! На данном подфоруме действуют строгие правила. Удостоверьтесь, что ваше сообщение соответствует им!

Форум или тема закрыты для гостей. Необходима авторизация!

Загрузить последнюю сохраненную версию

Вложение:

Вставить как галерею

Максимальный размер вложений: 4,0 МБ, аудио/видео: 8,0 МБ. Картинки большего размера ужимаются, если возможно.

Введите код, изображенный на картинке. Если код нечитаемый, кликните картинку, чтобы загрузить другой вариант.

Отправляя сообщение, я выражаю свое согласие с правилами форума и принимаю пользовательское соглашение.

Читали тему (0):

Читали форум (0):

Пользователи онлайн (0):

start [/forum/topic.php?fid=60&msg=33416280&tid=2157177]:	0ms
get settings:	9ms
get forum list:	15ms
check forum access:	3ms
check topic access:	3ms
track hit:	37ms
get topic data:	9ms
get forum data:	2ms
get page messages:	53ms
get tp. blocked users:	1ms
others:	13ms

total:	145ms