Отправляет email-рассылки с помощью сервиса Sendsay
  Все выпуски  

RusFAQ.ru: Программирование на Basic / VBA


Информационный Канал Subscribe.Ru

RusFAQ.ru: Программирование на Basic / VBA

Выпуск № 142
от 21.09.2004, 13:30

Администратор:
Имя: Калашников О.А.
URL: Информационный ресурс
ICQ: 68951340
Россия, Москва
О рассылке:
Задано вопросов: 311
Отправлено ответов: 261
Активность: 83.92 %
[Задать вопрос >>][Регистрация эксперта >>]
[Поиск в базе][Обсудить на форуме]


 Список экспертов, ответы которых опубликованы в данном выпуске

Puma
Статус: Профессиональный
Общий рейтинг: 103.04
[Подробней >>]
Licvidator
Статус: Профессиональный
Общий рейтинг: 107.09
URL: PC Info
[Подробней >>]
Miklucho
Статус: Доверительный
Общий рейтинг: 109.81
[Подробней >>]


 Краткий перечень вопросов

Вопрос № 303. Привет всем cool-программистам!! Не могли бы вы мне помочь с маленькой проблемкой. Мой препод дал за... (ответов: 3)
Вопрос № 304. Здравствуйте, господа. А не подскажет ли кто, как в ВБ работать с файлами, но не только открыть проч... (ответов: 1)
Вопрос № 305. То - Licvidator >А зачем такие сложности? Чем обычный Seek не подходит? >Seek sets the position for ... (ответов: 1)

Вопросов: 3, ответов: 5


 Вопрос № 303

Привет всем cool-программистам!!
Не могли бы вы мне помочь с маленькой проблемкой. Мой препод дал задание на VisualBasic и сказал, что всё что нам надо ищите сами где хотите, можете хелп почитать на английском и точка. Задание лёгкое, на половину я его сама сделала, но вот не могу кое чего додумать (я ведь ещё только начала изучать Basic). Дано такое задание x=ln(y)-1.5sin(y), у=[4;8] с шагом 0.25. Необходимо вывести каждое значение в отдельную ячейку таблицы. Всё что у меня получилось, так это следующее:
for у=4 to 8 step 0.25
x=ln(y)-1.5sin(y)
print using ;x,y
next x
выводятся только два столбика, а как сделать табличку?????
Помогите мальчишки!!!!
ЗЫ Если кто знает дайте ссылочку, где понятным языком написаны азы прграммирования на Visual Basic, или какойнибудь электронный учебник.
Большое Спосибо!!!!!!!



Вопрос отправлен: 17.09.2004, 19:22
Отправитель: Света

[Следующий вопрос >>] [Список вопросов]

Отвечает Puma

Приветствую Вас, Света!
Могу посоветовать переписать строчку
print using ;x,y
так
print using; vbTab, x,vbtab, y
vbTab - вставляет символ табуляции
Чтобы ввести шапку перед циклом поставить:
print space$(10); vbTab, x,vbtab, y
И что же все таки такое переменная Using. ну как то не к месту она

Ответ отправлен: 17.09.2004, 20:22
Отправитель: Puma


Отвечает Licvidator

Доброе время суток, Света!
Извините, но в каком месте это VISUAL basic? Где Вы там нашли ln или print using? Это все операторы от обычного бейсика (в ВБ тоже есть print, но никак не print using).
К тому же, у Вас в цикле переменная y фигурирует, а next по x... И еще есть ошибки, в общем, непорядок.
А про табличку - препод скорее всего и имел в виду вывод в два столбика.
Учебник по Visual Basic находится тут: http://www.prog2004.km.ru/id17.htm.

Ответ отправлен: 17.09.2004, 20:36
Отправитель: Licvidator


Отвечает Miklucho

Добрый день, Света!
Сетку нужно строить отдельно - методом line
Синтаксис: line(x1,y1)-(x2,y2), где x1,x2,y1,y2 - координаты начала и конца линии.
Либо можно можно поступить проще - использовать элемент управления shape. Но в любом случае придется совмещать полученную сетку и числа.
Насчет мануала по VB: введи в любой поисковик(#Rambler.ru) слова 'программирование на VB' и все - получишь кучу сайтов, учебников, примеров.

Приложение:

Ответ отправлен: 20.09.2004, 06:01
Отправитель: Miklucho


 Вопрос № 304

Здравствуйте, господа. А не подскажет ли кто, как в ВБ работать с файлами, но не только открыть прочитать или дописать в конец, а ещё и играться указателем. я полистав MSDN наткнулся на API SetFilePointer. Всё бы хорошо, но ему нужен хэндл файла. Воспользовался APIем CreateFile. Теперь читаю файл при помощи ReadFile и здесь есть трабл... не читаеться он... Ошибок нет. GetLastError постоянно возвращает 0. Чего ему нужно? Если у кого есть пример того, как всё это добро вместе работает, поделитесь пожалуйста... Заранее всем благодарен.



Вопрос отправлен: 17.09.2004, 23:39
Отправитель: Ламероид

[Следующий вопрос >>] [Список вопросов]

Отвечает Licvidator

Приветствую Вас, Ламероид!
А зачем такие сложности? Чем обычный Seek не подходит?

Seek sets the position for the next read/write operation within a file opened using the Open statement.
Syntax: Seek [#]filenumber, position


Ответ отправлен: 18.09.2004, 01:04
Отправитель: Licvidator


 Вопрос № 305

То - Licvidator
>А зачем такие сложности? Чем обычный Seek не подходит?
>Seek sets the position for the next read/write operation >within a file opened using the Open statement.
>Syntax: Seek [#]filenumber, position
а не работает оно так!!! Seek принимает только один параметр (номер файла) и ТОЛЬКО возвращает положение указателя.. (проверенно неоднократно на ВБ6).
Вот вырезка из описания на русском
===========================================================
Seek(FileNumber)
Функция Seek определяет текущее положение указателя чтениязаписи внутри файла, открытого с помощью инструкции Open
Возвращаемое значение
Возвращает значение типа Long в интервале от 1 до 2 147 483 647 (т.е. 2^31 – 1) включительно, определяющее текущее положение указателя чтения/записи внутри файла, открытого с помощью инструкции Open
Описание значений, возвращаемых для каждого режима доступа к файлу
Random - Номер записи, которая бу дет считана или записана
следующей
Binary,
Output,
Append и
Input - Номер байта, с которого начинается выполнение
следующей операции ввода/вывода. Первому байту файла
соответствует номер 1, второму 2 и т.п.
Параметры
FileNumber Обязательный аргумент является выражением типа
Integer, содержащим допустимый номер файла
==========================================================
Вот такие помидоры... А мне нужно именно передвигать указатель внутри файла... И инфа в файле отнюдь не однородная... :(



Вопрос отправлен: 18.09.2004, 12:26
Отправитель: Ламероид

[Следующий вопрос >>] [Список вопросов]

Отвечает Licvidator

Добрый день, Ламероид!
Так, а теперь учимся читать внимательно:) Вы прочитали про Seek Function, который возвращает значение указателя, и тогда Вы действительно правы. Я же Вам говорю про Seek Statement, который устанавливает позицию указателя.
Вы также можете открыть файл в двоичном доступе и оперировать указателем с помощью Put [#]filenumber, [recnumber], varname и Get [#]filenumber, [recnumber], varname.
RTFM!

Ответ отправлен: 19.09.2004, 15:35
Отправитель: Licvidator



Форма отправки вопроса

Внимание!
Мы рекомендуем открывать рассылку в программе Internet Explorer 5.0+ или отправлять вопросы с сайта по адресу: http://rusfaq.ru/cgi-bin/Message.cgi.

(C) 2002-2003 Команда RusFAQ.ru.

 Персональные данные

Ваше имя:

Ваш e-mail:

Опубликовать мой e-mail в рассылке


 Вопрос и дополнение

Ваш вопрос:


Приложение (если необходимо):


Получить ответов:


 Выбор рассылки

Программисту
Assembler (25)
C / C++ (17)
Perl (7)
Builder / Delphi (14)
Pascal (20)
Basic / VBA (6)
Java / JavaScript (7)
PHP (15)
Криптография (8)
WinAPI (14)
Радиоэлектроника (11)
Пользователю
Windows 95/98/Me (48)
Windows NT/2000/XP (65)
"Железо" (43)
Поиск информации (22)
Администратору
Windows NT/2000/XP (45)
Linux / Unix (16)
Юристу
Гражданское право (9)
Семейное право (6)
Трудовое право (8)
КоАП (6)

Отправить вопрос всем экспертам выбранной рассылки.




Задать вопрос | Регистрация эксперта | Поиск в базе | Чат | Форумы | Новости
Проект экспертов RusFAQ.ru | Фотоальбом | Virus.RusFAQ.ru | Администрирование


Яндекс цитирования
© 2001-2004 Россия, Москва. Идея, дизайн, программирование: Калашников О.А. ICQ: 68951340
При перепечатке материалов ссылка на данный сайт обязательна!

http://subscribe.ru/
http://subscribe.ru/feedback/
Подписан адрес:
Код этой рассылки: comp.soft.prog.basicvba
Отписаться

В избранное