Advertisement
jsbsan

ejemplouso

Jun 22nd, 2014
1,627
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1.  
  2. Public Sub Button1_Click()
  3.  
  4.   Dim datos As New String[]
  5.   Dim etiquetas As New String[]
  6.  
  7.   etiquetas.Add("Primera:")
  8.   etiquetas.Add("Segunda:")
  9.   etiquetas.Add("Tercera:")
  10.   etiquetas.Add("Cuarta:")
  11.   etiquetas.Add("Quinta:")
  12.  
  13.   datos.Add("dato1")
  14.   datos.Add("dato2")
  15.   datos.Add("dato3")
  16.   datos.Add("dato4")
  17.   datos.Add("dato5")
  18.  
  19.   datos = FormInput.abrir(etiquetas, datos)
  20.  
  21.   Label1.text = datos[0]
  22.   Label2.text = datos[1]
  23.   Label3.text = datos[2]
  24.   Label4.text = datos[3]
  25.   Label5.text = datos[4]
  26.  
  27. End
Advertisement
RAW Paste Data Copied
Advertisement