Программирование на Visual Basic

[LSN]

Я увлекаюсь программированием на VISUAL BASIC 6.0 и создал кучу программ для издевательства над компьютером. Могу написать все, что угодно, но не знаю, можно ли создавать прозрачные окна на VISUAL BASIC 6.0?

 

[klever]

НЕТ.

 

[GamerDenis]

Вхай? APIшки в руки и хоть прозрачность, хоть нет Но для 2000-ХР only.

 

[Angey]

Help! Программирую недавно. Возникла проблема. База на Accesse, из 3-х таблиц. Таблицы связана друг с другом по отношению "один-ко-многим".
В Basice создал форму для заполнения основной таблицы. На форме использую поле DataCombo для выборки данных из другой таблицы и занесения в основную. По этому полю у меня в основную таблицу заносится только код элемента связанной таблицы, как и должно быть. Но вся проблема в том, что при внесении новых данных код связанной таблицы меняется только в соответствующем поле в первой строчке, а не в той где заносятся данные, т.е. сколько бы я не заносил данных код связанной таблицы попадает всегда в первую строку таблицы, а не в ту куда занесены данные. В чем может быть ошибка? И есть ли решение проблемы?

 

[Kosh]

Решение есть и весьма простое: При создании таблицы со связью один-ко-многим в лавной, допустим идёт код(уникальный) и наименование, а в подчинённой идёт код(уникальный), расшифровка(какой-нибудь текст), связное поле - в нём заносится код из главной таблицы, т.е. 1 записи из главной таблицы с кодом 1 соответсвуют 3 записи из подчинённой таблицы с кодами 1,2 и 3, и связным полем, в котором стоит число 1 во всех трёх записях... Может не понятно выразился, но вот примерно

главная таблица..............подчинённая таблица
kod......naim..................kod.......svaznoe...........text
1.......валенки.................1.............1..............синие
.....................................2.............1..............жёлтые
.....................................3.............1............. красные
2........сапоги..................4.............2............резиновые
.....................................5.............2.............кирзовые

Лишь в этом случае у тебя каждой строке главной таблицы будут соответствовать одна или несколько строк из подчинённой таблицы.
А так, как я понял, у тебя программа просто "не понимает", что эти таблицы связаны.

P.S.: Извиняюсь, что заполнил пространство точками, но форум упорно игнорирует пробелы и сжимает их до 1

 

[Шогал]

На allapi.net есть такая вещь как API-Guide - мануал по API-функциям специально для бейсика, со всякими примерами

 

[РыЖаЯ СоНя]

Так. Может я не в ту тему, но все же...У меня такая проблема. Как сделать, чтобы при нажатии какой-либо кнопки проигрывался конкретный звуковой файл?

 

[Kosh]

РыЖаЯ СоНя, ну, для начала, необходимо запустить проигрыватель, которым файл будет воспроизводиться, либо использовать компонент MediaPlayer(так он называется в Delphi, в VB не помню...) - у данного компонента есть свойство воспроизвести звук, либо видео...

 

[РыЖаЯ СоНя]

До этого я и сама догадалась. Как заставить его проигрывать что-либо по нажатию конкретной кнопки, причем так, чтобы его самого (проигрыватель) на форме не было видно.

 

[Kosh]

Делаешь компонент невидимым и на событие нажатия кнопки пишешь примерно следующее:
MediaPlayer1.FileName:='C:\file.avi';
MediaPlayer1.Open;
MediaPlayer1.Play;
Но это в Delphi, по VB надо смотреть в Help'е, а у меня на компьютере VB в данный момент не установлен...

 

[РыЖаЯ СоНя]

Irmion , спасибо. Попробую.

Разобралась пишется так:
MediaPlayer1.FileName = ("D:\sound\guiSoundOk.wav")
MediaPlayer1.Command = "open"
MediaPlayer1.Command = "play"

Теперь новая проблема. Нажала раз на кнопку, все ок, проигрывается. Нажимаю второй, третий и т.д. и тишина! Что сделать?

 

[Kosh]

РыЖаЯ СоНя, конечно, одна кнопка делает одно действие, каждый раз он пытается открыть этот файл, не закрывая его Если хочешь, чтобы он заново открылся без проблем, то перед строкой MediaPlayer1.Command = "open", надо будет написать MediaPlayer1.Command = "close".
Если же ты хочешь, чтобы выполнялось что-то другое, то это уже необходимо решать блоками условий If, then...

 

[РыЖаЯ СоНя]

Irmion , я решила эту пробелму простой "перемоткой". Если же его закрыть, то звук проигрывается не до конца(у меня при нажатии этой кнопки еще и форма меняется), искажается сильно.
Еще один вопрос. Как из картинки сделать файл с расширением ico?

 

[Kosh]

Как из картинки сделать файл с расширением ico?

Это уже не сюда вопрос, но всё же отвечу: файл *.bmp, размером 32х32 пиксела может претендовать на роль иконки, т.е. если создать файл bmp размером 32х32 и переименовать его в ico, то получится обычная иконка...

 

[РыЖаЯ СоНя]

спасибо. Просто мне это нужно сделать для програмки на vb.

 

[martisha]

Visual Basic

В какой системе работает Visual Basic 6.0 версия?

 

[Шогал]

Да вроде в любой от MS.

 

[Мертвый анархист]

Чат в VB

Подскажите пожалуйста, можно ли в Visual Basic 6.0 написать, чат, работающий по сети? Если кто-нибудь знает, то подскажите... Буду очень благодарен.

 

[Trotil]

1) Вот тебе пример чата: ссылка. Там работоспособное клиент-серверное приложение на VB на winsock.

2) Обычно чат - это клиент-серверное приложение, сетевое взаимодействие осуществляется с помощью компонента winsock. Это компонент MS WinSock Control 6.0. Нашел очень простой пример его работы: реализуется передача текстовой строки серверу и получение строки от сервера (ссылка). О принципах раюоты этого компонента можно узнать из этой подробной статьи: ссылка, а так же поизучав исходники предыдущих примеров.

P.S. Переименовал тему. Последнее устное предупреждение.

 

[Мертвый анархист]

Спасибо, попробую! =)