Red de conocimiento informático - Conocimiento de la instalación - Ver el código de barras del menú de la bandeja vb

Ver el código de barras del menú de la bandeja vb

1. Establezca las propiedades de la siguiente manera:

.Name=Form1

.Caption="Prueba del icono de la barra de notificaciones"

.Icon=(Icono), elija un hermoso icono

Otros valores predeterminados también están disponibles

2. Establezca las variables globales de la ventana y establezca el valor inicial

' para identificar si la ventana ha sido minimizada Botón

Dim MinFlag As Boolean

Private Sub Form1_Load()

MinFlag = False

End Sub

3. La ventana se minimiza para generar el evento Resize El evento Resize se utiliza para determinar si la ventana está minimizada

Private Sub Form1_Resize()

'Determinar. si la ventana está minimizada y cuando se presiona el botón de minimizar La primera vez que ocurre el evento Resize después de cambiar el botón

If IsIconic(Me.hwnd) lt;gt 0 And MinFlag = False Then

MinFlag = True

IcCardMain.Visible = False 'Ocultar ventana

'Agregar icono de ventana a la barra de notificaciones

Llame a Icon_Add(Me. hwnd, Me. Caption, IcCardMain.Icon, 0)

End If

End Sub

4. Como se muestra en la figura, utilice el diseñador de menús para cree un menú emergente y asígnele el nombre principal. Hay una matriz de menú en principal:

Menú 1: m_Menu(0) Título: Ventana de visualización

Menú 2: m_Menu(1). ) Título: Salir

Eventos de menú:

Sub privado m_Menu_Click(Índice como entero)

Seleccionar índice de caso

Caso 0: ' Al hacer clic en el menú "Mostrar ventana"

上篇: ¿Alguien ha utilizado alguna vez el software PPT para crear animaciones MG sencillas? ¿Se puede lograr? 下篇: Ayuda a los profesionales: ¿Cómo consultar el saldo de la tarjeta UnionPay de la Cooperativa de Crédito Rural de Guangdong a través de mensajes de texto del teléfono móvil?

Artículos populares