¿Cómo modificar la forma del botón en VB?
Es un poco complicado, pero puedo cambiarlo a una elipse o un círculo y crear un nuevo comando1 'Declaración de función para establecer la forma elíptica
Función de declaración privada CreateEllipticRgn Lib "gdi32 " (ByVal X1 mientras, _
ByVal Y1 mientras, ByVal X2 mientras, ByVal Y2 mientras) Mientras
Función de declaración privada SetWindowRgn Lib "user32" (ByVal hWnd Mientras, _ p>
ByVal hRgn Mientras, ByVal bRedraw Mientras) Mientras LongPrivate Sub Form_Load()
Dim a, b Mientras
Dim w, h As Long
h = Comando1.Alto / 15' Alto y diámetro del círculo = Comando1.Alto
w = Comando1.Ancho / 15' Ancho y diámetro del círculo = h
a = CreateEllipticRgn( 0, 0, w, h)
b = SetWindowRgn(Command1.hWnd, a, True) 'Establece Command1 en un círculo
End Sub