سؤال در مورد کامند و آیکون دست برای موس

[Hassan2500]

سلام
دو تا سؤال داشتم
1- یه فرم داریم با دو دکمه کامند و یک تکست من میخام وقتی روی کامند1 کلیک کردم برنامه ورد داخل کامپیوترم باز شود و همچنین میخام وقتی روی کامند2 کلیک کردم نوشته های تکست1 داخل ورد آورده شود و Save شود

2-آیکون دست در کجای ویندوز قرار گرفته و بعد چطوری اونو برای لیبل قرار دهم یعنی وقتی نشانگر موس روی آدرس سایت اینترنتی نوشته شده داخل لیبل قرار گرفت نشانگر موس بشکل دست شود

[M.T.P]

برای کرسر دست کد زیر رو توی ماژول بگذارید:




Option Explicit

Public Declare Function LoadCursor Lib "user32" Alias "LoadCursorA" (ByVal hInstance As Long, ByVal lpCursorName As Long) As Long
Public Declare Function SetCursor Lib "user32" (ByVal hCursor As Long) As Long
Public Const IDC_HAND As Long = &H7F89 '32649

Public Sub SetHandCursor()
Dim IntRet As Long
IntRet = SetCursor(LoadCursor(0, IDC_HAND))
End Sub


و در رویداد Mouse_Move هر کنترلی که خواستید فراخوانی کنید.



Private Sub Label1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
SetHandCursor
End Sub