Diferencia entre revisiones de «Bombilla»
Apariencia
Contenido eliminado Contenido añadido
Sin resumen de edición |
m Revertidos los cambios de 201.156.1.195 a la última edición de Maleiva |
||
Línea 7: | Línea 7: | ||
{{wikcionario|bombilla}} |
{{wikcionario|bombilla}} |
||
{{desambiguación}} |
{{desambiguación}} |
||
Public Class Form1 |
|||
Dim A(2, 3) |
|||
Dim i, j As Integer |
|||
Dim B(3, 2) |
|||
Dim C(2, 2) |
|||
Dim MatrizA As String |
|||
Dim MatrizB As String |
|||
Dim MatrizC As String |
|||
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load |
|||
End Sub |
|||
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click |
|||
For i = 1 To 2 |
|||
For j = 1 To 3 |
|||
A(i, j) = InputBox("Enter the element") |
|||
Next |
|||
Next |
|||
End Sub |
|||
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click |
|||
MatrizA = "" |
|||
For i = 1 To 2 |
|||
For j = 1 To 3 |
|||
MatrizA = MatrizA & A(i, j) & Chr(9) |
|||
Next |
|||
MatrizA = MatrizA & Chr(13) & Chr(10) |
|||
Next |
|||
RichTextBox2.Text = MatrizA |
|||
End Sub |
|||
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click |
|||
For i = 1 To 3 |
|||
For j = 1 To 2 |
|||
B(i, j) = InputBox("Enter the element") |
|||
Next |
|||
Next |
|||
End Sub |
|||
Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click |
|||
For i = 1 To 3 |
|||
For j = 1 To 2 |
|||
MatrizB = MatrizB & B(i, j) & Chr(9) |
|||
Next |
|||
MatrizB = MatrizB & Chr(13) & Chr(10) |
|||
Next |
|||
RichTextBox1.Text = MatrizB |
|||
End Sub |
|||
Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click |
|||
For i = 1 To 2 |
|||
For j = 1 To 2 |
|||
C(i, j) = A(i, 1) * B(1, j) + A(i, 2) * B(2, j) + A(i, 1) * B(j, 1) + A(i, 2) * B(j, 2) + A(1, j) * B(1, j) + A(2, j) * B(2, j) + A(j, 1) * B(j, 1) + A(j, 2) * B(j, 2) |
|||
Next |
|||
Next |
|||
MatrizC = "" |
|||
For i = 1 To 2 |
|||
For j = 1 To 2 |
|||
MatrizC = MatrizC & C(i, j) & Chr(9) |
|||
Next |
|||
MatrizC = MatrizC & Chr(13) & Chr(10) |
|||
Next |
|||
RichTextBox3.Text = MatrizC |
|||
End Sub |
|||
End Class |
Revisión del 15:27 22 abr 2010
Como bombilla se conoce a:
- la lámpara incandescente, un dispositivo eléctrico que produce luz mediante el calentamiento de un filamento metálico;
- la bombilla, un sorbete metálico utilizado para beber el mate o el terere en la región rioplatense.
- El nombre común de la planta Dipsacus fullonum.
- El nombre común de la planta Cynara cardunculus.
- Wikcionario tiene definiciones y otra información sobre bombilla.