Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionFor Each p As Process In Process.GetProcesses If p.MainWindowTitle.Contains("Fonts") Then p.CloseMainWindow() End If Next
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long Private Declare Function PostMessage Lib "user32" Alias "PostMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long Const WM_CLOSE = &H10 Private Sub Command2_Click() Dim couichwnd As Long couichwnd = FindWindow(vbNullString, "Fonts") If couichwnd = 0 Then Exit Sub PostMessage couichwnd, WM_CLOSE, 0&, 0& End Sub
Imports System.Runtime.InteropServices Public Class Form1 Public Const SW_MINIMIZE = 6 <DllImport("user32.dll", SetLastError:=True, CharSet:=CharSet.Auto)> _ Private Shared Function ShowWindow(ByVal hwnd As IntPtr, ByVal nCmdShow As Int32) As Boolean End Function Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Process.Start(Environment.ExpandEnvironmentVariables("%SystemRoot%\explorer.exe"), Environment.ExpandEnvironmentVariables("%SystemRoot%\Fonts")) End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click For Each p As Process In Process.GetProcesses If p.MainWindowTitle.Contains("Fonts") Then ShowWindow(p.MainWindowHandle, SW_MINIMIZE) End If Next End Sub End Class
Et je ne serais pas étonné de ce que VB.Net offre du natif pour faire lui-même cela, sans fonctions de l'Api
je l'ai trouvé sur un traducteur automatique
Process.Start renvoie Nothing pour explorer.exe et c'est dommage car inutilisable ensuite. Un spécialiste pourra peut-être donner une explication
parce que le processus Explorer.Exe tourne en permanence et est utilisé en permanence (y compris pour tout ce qui est graphique : contrôles, etc ...) par Windows. Il n'y a donc qu'un seul processus Explorer.exe et il ne faut surtout pas le tuer. Lorsque l'on ouvre l'explorateur, on se sert de ce processus et on ouvre une fenêtre (une appli dans le seul volet des applications du gestionnaire des tâches).
parce que moi aussi j'ai autre chose à faire comme la sieste et pêcher la morue (Portugal oblige)
J'ose espérer que tu n'es pas représentatif de la France
Reste à espérer que le demandeur s'y connaisse suffisamment pour s'en sortir.