MiHApank, купи себе диск и не мучайся, я себе покупал. Там мало того сам vb на русском + дополнения к нему, различные библиотеки и тому подобное, так там еще есть документация по нему... Всегда лежит на полке
Люди, сам я на бейсике не пишу, но меня вот спросили: Как нарисовать точку, а потом чтоб она сразу же исчезла. Типа появление точки на короткое время. Вроде, правильно изъяснился)
Miha, чтобы поставить точку на экране используется оператор PSET: pset(x,y),c где x,y - координаты точки на экране. Для того чтобы стереть точку с экрана можно просто нарисовать точку в том же месте с цветом 0 (черный) или использовать оператор PRESET: Формат его таков: preset (x,y)
Pasha2O98357, Очень просто ========= Option Explicit Private Declare Function mciSendString Lib "winmm.dll" _ Alias "mciSendStringA" (ByVal lpstrCommand As String, _ ByVal lpstrReturnString As String, ByVal uReturnLength As Long, _ ByVal hwndCallback As Long) As Long Private Sub Command1_Click() "Открыть дверцу CD-Rom: Call mciSendString("Set CDAudio Door Open Wait", 0&, 0&, 0&) End Sub Private Sub Command2_Click() "Закрыть дверцу CD-Rom: Call mciSendString("Set CDAudio Door Closed Wait", 0&, 0&, 0&) End Sub
Pasha2O98357, на форме не забудь две кнопки создать, первая будет открывать CD-ROM, вторая закрывать. Я так одному другу мини программу подсунул, которая постоянно открывала и закрывала CD-ROM, ох долго он меня матюкал и за мной бегал
22 июн 2009 в 19:54