Hola a todos ojala me puedan ayudar con este codigo...
este codigo hace los siguiente :
Lo que hace es comparar la palabra "Imprimir" con los menu de los programas ejemplo : office, notepad, blogdenotas, etc. y busca en el menu la palabra imprimir.
entonces si yo ingreso al notepad en este caso y voy a archivo --> "Imprimir" el sistema detecta que yo presione del menu la palabre imprimir y me arroja un msgbox ("Se ha abierto la ventana de impresión")
ahora con este codigo y al presionar en cualquier menu el "Imprimir" me salen montones de mensajes ( "Se ha abierto la ventana de impresión") pude hacer que por lo menos me tome la palabra imprimir, pero se me vuleve loco con los mensajes... :s
para mas datos en las propiedades del Timer1 en "Enabled" puse True.
Código:
Public Class Form1
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Integer
Private Sub Form_Load()
Label1.Text = "Esperando a que se habra la ventana de impresión..."
Timer1.Enabled = True
Timer1.Interval = 200
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
If FindWindow(vbNullString, "Imprimir") <> 0 Then
MsgBox("Se ha habierto la ventana de impresion")
Label1.Text = "Se ha abierto la ventana de impresión"
Timer1.Enabled = False
End If
End Sub
ojala me puedan ayudar