26/05/10 15:49
salva94
Ragazzi poco fa dato che un user non sapeva come chiudere una cartella ho pensato di dargli un code Api trovato su un sito . Però vorrei capire come si utilizzano e a cosa servono tutte quelle lettere e numeri accostati fra di loro :
Qualcuno riesce a spiegarmi riga per riga questo code? Vorrei capirci qualcosa in più
Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long Declare Function PostMessage Lib "user32" Alias "PostMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As String) As Long Public Const WM_CLOSE = &H10 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim winHwnd As Long Dim RetVal As Long winHwnd = FindWindow(vbNullString, "Nomecartella") If winHwnd <> 0 Then RetVal = PostMessage(winHwnd, WM_CLOSE, 0&, 0&) If RetVal = 0 Then MsgBox("Errore nella chiusura.") End If Else MsgBox("Errore non trovato il File.") End If
Qualcuno riesce a spiegarmi riga per riga questo code? Vorrei capirci qualcosa in più
aaa