02:40

Tibsy - Mas alla de lo visible

Banda de Santiago, Chile
Género: Rock/Postpunk/Screamo
Web: Myspace
Mas Allá De Lo Visible (2007)
01. Rostros De Verguenza
02. Sabes
03. La Clave
04. Mas Allá De Lo Visible
05. Sol De Noche
06. Un Oscuro Final


Descargar

2 comentarios:

3 CaRaJoS dijo...

3 Carajos: Hola somos una banda de funk si les interesa peguense una vuelta!! saludos . www.3carajos.blogspot.com

Anónimo dijo...

Dim x, y, filas As Integer
Dim sitio As String


Private Sub Command1_Click()
x = Text1.Text
MSFlexGrid1.AddItem sitio 'agrega filas
filas = MSFlexGrid1.Rows

MSFlexGrid1.Row = filas - 2

While Text1.Text = ""
MSFlexGrid1.Cols = x + 1
Wend
While x = "" Or Not IsNumeric(x) = True

MsgBox ("error...no ha ingresado todos los datos")
x = Val(InputBox("ingrese el numero de mediciones"))

Wend

MSFlexGrid1.ColWidth(0) = 2000 'tamaño de la celda
MSFlexGrid1.Row = 0
MSFlexGrid1.Text = "ingrese el numero de mediciones"


Text2.Text = y
While y = "" Or IsNumeric(y) = True

MsgBox ("no olvides ingresar el nombre del sitio")
y = InputBox("ingrese el nombre del sitio")
Wend

Text2.Text = y
MSFlexGrid1.Col = o
MSFlexGrid1.Text = y

MSFlexGrid1.ColWidth(0) = 2000 'tamaño de la celda
MSFlexGrid1.Row = 0
MSFlexGrid1.Text = "nombre del sitio"

c = 1

While c < x + 1
MSFlexGrid1.ColWidth(c) = 1000
MSFlexGrid1.Col = 0
MSFlexGrid1.Row = 0
MSFlexGrid1.Text = "medicion" & c

p = Val(InputBox("ingrese mediciones"))
MSFlexGrid1.Row = 1
MSFlexGrid1.Text = p
c = c + 1

Wend
End Sub

Private Sub Form_Load()

End Sub

Private Sub Text1_Change()
Text1.MaxLength = 2

End Sub