El submarino privado Button1_Click (remitente de ByVal como System.Object, ByVal e como System.EventArgs) dirige Button1.Click
Si >= 2 de TextBox1.Lines.Count entonces
Línea dévil como la secuencia = TextBox1.Lines (2) 'tercera línea
Vals déviles () como secuencia = línea. Fractura (“=")
Si vals. >= 1 de la longitud entonces
Valor dévil como la secuencia = vals (1).Split (“; ") (0)
Label1.Text = valor
Terminar si
Terminar si
Terminar el submarino
|