jueves, 12 de junio de 2014
Public Class Form1
Private Sub
Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles
MyBase.Load
Dim BFF(2) As String
BFF(1) = "VALERIA"
BFF(2) = "BELEN"
End Sub
Private Sub
BtnBFF_Click(ByVal sender As System.Object, ByVal
e As System.EventArgs) Handles
BtnBFF.Click
MessageBox.Show("Valeria")
MessageBox.Show("Belen")
End Sub
End Class
