Va bene cosi Più articoli riguardanti dei progetti di Network - Rete Più articoli in linguaggio C/C++ Più articoli in linguaggio Visual Basic 6 Più articoli in linguaggio Visual Basic .NET Più articoli in linguaggio PHP Più articoli in linguaggio JAVA Più articoli in linguaggio PERL Più articoli con le novità Tecnologiche Più articoli in linguaggio ANDROID Più articoli in linguaggio C# Più articoli in linguaggio PYTHON
Dim i as Integer Text1.Text = "" i = 1 While Environ$(i) <> "" Text1.Text = Text1.Text + Mid(Environ$(i), 1, InStr(1, Environ(i), "=") - 1) + vbNewLine i = i + 1 Wend