Diferencia entre revisiones de «Ecología»
Apariencia
Contenido eliminado Contenido añadido
Sin resumen de edición |
Sin resumen de edición |
||
Línea 21: | Línea 21: | ||
End Sub |
End Sub |
||
End Class |
End Class |
||
(QUE LE PASO AL TERMINO DE ECOLOGIA..?????????) |
Revisión del 17:24 11 may 2009
Imports System.Drawing.Drawing2D Imports System.Windows.Forms Public Class Form1
Dim g As System.Drawing.Graphics Dim h As Integer Dim b As Integer Dim pen1 As New System.Drawing.Pen(Color.Navy, 2) Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click Me.Refresh() End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click g = Me.CreateGraphics() g.DrawRectangle(pen1, 60, 60, h, b) h = TextBox2.Text b = TextBox1.Text Label4.Text = (TextBox1.Text * TextBox2.Text) End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub
End Class
(QUE LE PASO AL TERMINO DE ECOLOGIA..?????????)