hat jemand eine idee wie ich daraus weniger code mach ?!
Danke im vorraus
VB.NET-Quellcode
- Dim Button15 As Byte() = New UTF8Encoding(True).GetBytes("Selektierten Link Öffnen")
- Dim Label19 As Byte() = New UTF8Encoding(True).GetBytes("Mod ansicht")
- Dim Label35 As Byte() = New UTF8Encoding(True).GetBytes("Mod ändern")
- Dim Label22 As Byte() = New UTF8Encoding(True).GetBytes("Füllmenge")
- Dim Label31 As Byte() = New UTF8Encoding(True).GetBytes("Benötigte Zugkraft")
- Dim Label23 As Byte() = New UTF8Encoding(True).GetBytes("Treibstoff")
- Dim Label30 As Byte() = New UTF8Encoding(True).GetBytes("Betrag pro stunde")
- Dim Label24 As Byte() = New UTF8Encoding(True).GetBytes("Preis")
- Dim Label29 As Byte() = New UTF8Encoding(True).GetBytes("Schwer")
- Dim Label2 As Byte() = New UTF8Encoding(True).GetBytes("Geschwindigkeit")
- Dim Label32 As Byte() = New UTF8Encoding(True).GetBytes("Normal")
- Dim Label26 As Byte() = New UTF8Encoding(True).GetBytes("Preis pro Tag")
- Dim Label33 As Byte() = New UTF8Encoding(True).GetBytes("leicht")
- Dim Label28 As Byte() = New UTF8Encoding(True).GetBytes("Lebenszeit")
- Dim Label7 As Byte() = New UTF8Encoding(True).GetBytes("Füllmenge: ")
- Dim Label8 As Byte() = New UTF8Encoding(True).GetBytes("Treibstoff: ")
- Dim Label6 As Byte() = New UTF8Encoding(True).GetBytes("Preis: ")
- Dim Label11 As Byte() = New UTF8Encoding(True).GetBytes("Preis pro Tag")
- Dim Label3 As Byte() = New UTF8Encoding(True).GetBytes("Kategorie: ")
- Dim Label12 As Byte() = New UTF8Encoding(True).GetBytes("Lebenszeit: ")
- Dim Label17 As Byte() = New UTF8Encoding(True).GetBytes("Benötigte Zugkraft: ")
- Dim Label13 As Byte() = New UTF8Encoding(True).GetBytes("Betrag pro Stunde:")
- Dim Label14 As Byte() = New UTF8Encoding(True).GetBytes("Schwer: ")
- Dim Label15 As Byte() = New UTF8Encoding(True).GetBytes("Normal: ")
- Dim Label16 As Byte() = New UTF8Encoding(True).GetBytes("Leicht: ")
- Dim Button8 As Byte() = New UTF8Encoding(True).GetBytes("Speichern")
- Dim Button7 As Byte() = New UTF8Encoding(True).GetBytes("Mod Hinzufügen")
- fs.Write(Button15, 1, Button15.Length)
- 'etc... noch nicht ganz fertig
Danke im vorraus