Гиперссылка на форме

@ara_gorn · Регистрация: 07.06.2011

Author24 — интернет-сервис помощи студентам

Как говорится, не бейте палками если что. Нужно чтобы на форме отображалась гиперссылка это раз, второе нужно чтобы например в процедуре

Visual Basic

1
2
3

Private Sub CommandButton1_Click()
 
End Sub

был некий код который бы создавал событие "создание нового письма" в Outlook, тобиш нечто вроде гиперссылки mailto:
PS: зарание благодарен

@Pro_grammer · 17.04.2012, 18:35

Было уже и не раз. Через Label (в примере lblEmail) , поменяй цвет, установи подчеркивание и курсор

Visual Basic

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 Sub lblEmail_Click()
    ShellExecute Me.hWnd, vbNullString, "mailto: mymail(с)yahoo.com", vbNullString, "c:\", 1
End Sub

	17.04.2012, 18:35