Le sous-marin privé Button1_Click (expéditeur de ByVal comme System.Object, ByVal e comme System.EventArgs) manipule Button1.Click
Si >= 2 de TextBox1.Lines.Count puis
Faible ligne comme corde = TextBox1.Lines (2) 'troisième ligne
Faibles vals () comme corde = ligne. Fente (« =")
Si vals. >= 1 de longueur puis
Faible valeur comme corde = vals (1).Split (« ; ") (0)
Label1.Text = valeur
Finir si
Finir si
Finir le sous-marin
|