Пара вопросов

[VKar]

Люди! Кто знает, можно ли в VB открыть какой-нибудь файл приложением по умолчанию(т.е. если *.txt то блокнотом, если рисунок, то пайнтом)?

[ANDLL]

Shell "имя_файла"

[xolod]

Уважаемый ANDLL, вы бы пробовали, прежде чем советовать

Основной минус Shell как раз в том, что он исполняет только .exe, .com и .bat файлы. А вот на .txt и другие он скажет Invalide Procedure Call or Argument.

Чтобы запустить файл с ассоциацией, есть несколько способов.
Самый простой (помести в форму и добавь CommandButton):

Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

Private Const SW_SHOWNORMAL = 1

Private Sub Command1_Click()
dim m_lngHandle as long
m_lngHandle = ShellExecute(hwnd, "open", "путь_к_твоему_файлу","параметы_если_есть","",SW_SHOWNORMAL)
if m_lngHandle=0 then
MsgBox "Ошибочка при запуске"
else
MsgBox "Хэндл главного окна: " & m_lngHandle
end if
End Sub

[Sebas]

по простому в 98х

shell "Start FILE_NAME"

[VKar]

Сенкю всем! Попробовал, всё работает,буду разрабатывать