در خواست دستورات ارتباط با سخت افزار در وی بی به همراه توضیح

[MoBiN.R]

شما میتونید با استفاده از دستور Printer هرچی خواستینو به خروجی چاپ بفرستید .. برای باز و بسته کردن درب سی دی رام نیاز به ارتباط مستقیم با سخت افزار نیست .. در ضن پیشنهاد میکنم یکم کتاب های برنامه نویسی وی بی رو بیشتر مطالعه کنید .. با استفاده از کد های زیر میتونید این کارو انجام بدید :

تابع mciSendString وظیفه ی باز بسته کردن سی دی رام را بر عهده دارد.ابتدا باید تابع را در قسمت General فرم تعریف کنیم به این صورت:

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

کد باز کردن درب سی دی رام:

&mciSendString "Set CDAudio Door Open Wait", 0&, 0&, 0

کد بستن درب سی دی رام:

&mciSendString "Set CDAudio Door Closed Wait", 0&, 0&, 0

این تابع با دستورات متنی کار می کند.اگر متن پیغام را تغییر دهید تابع کاری را انجام نخواهد داد