und zwar ich habe den quelltext und möchte mal nach fragen ob es einer verleichterung gibt dafür
git es einer erleichterung dafür ??
VB.NET-Quellcode
- My.Computer.FileSystem.WriteAllText("C:\Schule\lehrer_zahl.txt", TextBox104.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label4.txt", TextBox4.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label5.txt", TextBox5.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label6.txt", TextBox6.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label7.txt", TextBox7.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label8.txt", TextBox8.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label9.txt", TextBox9.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label10.txt", TextBox10.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label11.txt", TextBox11.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label12.txt", TextBox12.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label13.txt", TextBox13.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label14.txt", TextBox14.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label15.txt", TextBox15.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label16.txt", TextBox16.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label17.txt", TextBox17.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label18.txt", TextBox18.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label19.txt", TextBox19.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label20.txt", TextBox20.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label21.txt", TextBox21.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label22.txt", TextBox22.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label23.txt", TextBox23.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label24.txt", TextBox24.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label25.txt", TextBox25.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label26.txt", TextBox26.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label27.txt", TextBox27.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label28.txt", TextBox28.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label29.txt", TextBox29.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label30.txt", TextBox30.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label31.txt", TextBox31.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label32.txt", TextBox32.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label33.txt", TextBox33.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label34.txt", TextBox34.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label35.txt", TextBox35.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label36.txt", TextBox36.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label37.txt", TextBox37.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label38.txt", TextBox38.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label39.txt", TextBox39.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label40.txt", TextBox40.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label41.txt", TextBox41.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label42.txt", TextBox42.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label43.txt", TextBox43.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label44.txt", TextBox44.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label45.txt", TextBox45.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label46.txt", TextBox46.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label47.txt", TextBox47.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label48.txt", TextBox48.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label49.txt", TextBox49.Text, False)
- My.Computer.FileSystem.WriteAllText("C:\Schule\Label\label50.txt", TextBox50.Text, False)
git es einer erleichterung dafür ??