56 lines
1.8 KiB
VB.net
56 lines
1.8 KiB
VB.net
Public Class logo
|
|
Inherits System.Windows.Forms.Form
|
|
|
|
#Region " Código generado por el Diseñador de Windows Forms "
|
|
|
|
Public Sub New()
|
|
MyBase.New()
|
|
|
|
'El Diseñador de Windows Forms requiere esta llamada.
|
|
InitializeComponent()
|
|
|
|
'Agregar cualquier inicialización después de la llamada a InitializeComponent()
|
|
|
|
End Sub
|
|
|
|
'Form reemplaza a Dispose para limpiar la lista de componentes.
|
|
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
|
|
If disposing Then
|
|
If Not (components Is Nothing) Then
|
|
components.Dispose()
|
|
End If
|
|
End If
|
|
MyBase.Dispose(disposing)
|
|
End Sub
|
|
|
|
'Requerido por el Diseñador de Windows Forms
|
|
Private components As System.ComponentModel.IContainer
|
|
|
|
'NOTA: el Diseñador de Windows Forms requiere el siguiente procedimiento
|
|
'Puede modificarse utilizando el Diseñador de Windows Forms.
|
|
'No lo modifique con el editor de código.
|
|
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
|
|
Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(logo))
|
|
'
|
|
'logo
|
|
'
|
|
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
|
|
Me.BackgroundImage = CType(resources.GetObject("$this.BackgroundImage"), System.Drawing.Bitmap)
|
|
Me.ClientSize = New System.Drawing.Size(616, 440)
|
|
Me.Cursor = System.Windows.Forms.Cursors.Hand
|
|
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None
|
|
Me.Name = "logo"
|
|
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
|
Me.Text = "logo"
|
|
|
|
End Sub
|
|
|
|
#End Region
|
|
|
|
|
|
|
|
Private Sub logo_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Click
|
|
Me.Close()
|
|
End Sub
|
|
End Class
|