Wie ermittle ich in VB.NET 2003 den systemweiten Font für Fenstertexte (Explorerliste)?

Question

Wie ermittle ich in VB.NET 2003 den systemweiten Font für Fenstertexte (Explorerliste)?

Antwort

Verwandte Fragen

Warum erzeugt thumb.Dispose() in VB.NET 2003 nach Verwendung den Fehler 'ungültige Parameter verwendet'?

Wann und wie muss man in VB.NET 2003 ein erstelltes Thumbnail disposen?

Wie erstelle ich in VB.NET 2003 ein Thumbnail eines Bildes zur Weiterverwendung?

Was ist der Unterschied zwischen frm.Resize und frm.SizeChanged in VB.NET 2003?

Was ist das Gegenteil von Path.Combine(...) in VB.NET 2003?

Gibt es ‚Path.GetFileName‘ in VB.NET 2003?

Gibt es fertigen Code für einen selbstgebauten FileDialog in VB.NET 2003 und wie lautet dieser?

Gibt es einen Weg, die Dateiansicht (View) aus einer VB.NET 2003-App heraus zu ändern?

Kann man in der IDE von VB.NET 2023 nachträglich den Namen der zu kompilierenden EXE-Datei ändern?

Warum werden ä, ö, ü und ß beim Speichern einer RichTextBox in VB.NET 2003 als type.plaintext nicht korrekt gespeichert?

Accepted Answer

Um in VB.NET 2003 den systemweiten Font für Fenstertexte (wie sie z.B. in Explorer-Listen verwendet werden) zu ermitteln, kannst du auf die SystemFonts-Klasse zugreifen. Allerdings ist die SystemFonts-Klasse erst ab .NET Framework 2.0 verfügbar. In .NET 1.1 (wie in VB.NET 2003 üblich) musst du auf die Win32-API zurückgreifen. Der relevante Font ist der sogenannte „Shell Font“ oder „System Font“, der für Fenstertexte verwendet wird. In der Regel ist das der Wert von `NONCLIENTMETRICS.lfMessageFont`. Hier ein Beispiel, wie du diesen Font mit P/Invoke ausliest: ```vb Imports System.Runtime.InteropServices Imports System.Drawing Public Class SystemFontHelper <StructLayout(LayoutKind.Sequential, CharSet:=CharSet.Auto)> Private Structure LOGFONT Public lfHeight As Integer Public lfWidth As Integer Public lfEscapement As Integer Public lfOrientation As Integer Public lfWeight As Integer Public lfItalic As Byte Public lfUnderline As Byte Public lfStrikeOut As Byte Public lfCharSet As Byte Public lfOutPrecision As Byte Public lfClipPrecision As Byte Public lfQuality As Byte Public lfPitchAndFamily As Byte <MarshalAs(UnmanagedType.ByValTStr, SizeConst:=32)> Public lfFaceName As String End Structure <StructLayout(LayoutKind.Sequential, CharSet:=CharSet.Auto)> Private Structure NONCLIENTMETRICS Public cbSize As Integer Public iBorderWidth As Integer Public iScrollWidth As Integer Public iScrollHeight As Integer Public iCaptionWidth As Integer Public iCaptionHeight As Integer <MarshalAs(UnmanagedType.Struct)> Public lfCaptionFont As LOGFONT Public iSmCaptionWidth As Integer Public iSmCaptionHeight As Integer <MarshalAs(UnmanagedType.Struct)> Public lfSmCaptionFont As LOGFONT Public iMenuWidth As Integer Public iMenuHeight As Integer <MarshalAs(UnmanagedType.Struct)> Public lfMenuFont As LOGFONT <MarshalAs(UnmanagedType.Struct)> Public lfStatusFont As LOGFONT <MarshalAs(UnmanagedType.Struct)> Public lfMessageFont As LOGFONT End Structure Private Const SPI_GETNONCLIENTMETRICS As Integer = 41 Private Const LF_FACESIZE As Integer = 32 <DllImport("user32.dll", CharSet:=CharSet.Auto)> Private Shared Function SystemParametersInfo( _ ByVal uAction As Integer, _ ByVal uParam As Integer, _ ByRef lpvParam As NONCLIENTMETRICS, _ ByVal fuWinIni As Integer) As Boolean End Function Public Shared Function GetWindowTextFont() As Font Dim ncm As New NONCLIENTMETRICS() ncm.cbSize = Marshal.SizeOf(ncm) If SystemParametersInfo(SPI_GETNONCLIENTMETRICS, ncm.cbSize, ncm, 0) Then Dim lf As LOGFONT = ncm.lfMessageFont Return New Font(lf.lfFaceName, Math.Abs(lf.lfHeight), FontStyle.Regular) Else Return SystemFonts.DefaultFont End If End Function End Class ``` Verwendung: ```vb Dim sysFont As Font = SystemFontHelper.GetWindowTextFont() MessageBox.Show("System-Font: " & sysFont.Name & ", Größe: " & sysFont.Size) ``` **Hinweis:** - In neueren .NET-Versionen kannst du einfach `SystemFonts.MessageBoxFont` oder ähnliche Eigenschaften verwenden. - In VB.NET 2003 ist der oben gezeigte Weg über die Win32-API notwendig. Weitere Infos: - [Microsoft Doku zu SystemParametersInfo](https://learn.microsoft.com/en-us/windows/win32/api/winuser/nf-winuser-systemparametersinfoa) - [SystemFonts-Klasse (ab .NET 2.0)](https://learn.microsoft.com/en-us/dotnet/api/system.drawing.systemfonts)

Accepted Answer

Der Fehler „Ungültige Parameter verwendet“ beim Aufruf von `thumb.Dispose()` in VB.NET 2003 (bzw. .NET Framework 1.1) tritt häufig auf, wenn das `thumb`-Objekt (vermutlich ein `S... [mehr]

Accepted Answer

Der Fehler „Ungültige Parameter verwendet“ beim Aufruf von `thumb.Dispose()` in VB.NET 2003 (bzw. .NET Framework 1.1) tritt häufig auf, wenn das `thumb`-Objekt (vermutlich ein `System.Drawing.Image` oder `Bitmap`) noch von einer anderen Ressource verwendet wird oder bereits freigegeben wurde. **Typische Ursachen:** 1. **thumb ist bereits disposed:** Wenn du `Dispose()` mehrfach aufrufst oder das Objekt schon durch einen anderen Vorgang freigegeben wurde, kann dieser Fehler auftreten. 2. **thumb ist noch in Benutzung:** Wenn du das Bild-Objekt (`thumb`) z.B. noch in einem PictureBox, Graphics-Objekt oder Stream verwendest, kann das Dispose fehlschlagen. 3. **Fehlerhafte Erstellung des Objekts:** Wenn das `thumb`-Objekt nicht korrekt initialisiert wurde (z.B. durch einen fehlgeschlagenen Ladevorgang), ist es möglicherweise gar kein gültiges Image-Objekt. **Beispielproblem:** ```vb Dim thumb As Image = Image.FromFile("bild.jpg") thumb.Dispose() thumb.Dispose() ' <-- Fehler: Ungültige Parameter verwendet ``` **Lösungsvorschläge:** - **Nur einmal Dispose aufrufen:** Stelle sicher, dass `Dispose()` nur einmal aufgerufen wird. - **Verwendung prüfen:** Prüfe, ob das Objekt noch irgendwo verwendet wird (z.B. in einer PictureBox). Entferne es ggf. vorher: ```vb PictureBox1.Image = Nothing thumb.Dispose() ``` - **Try-Catch verwenden:** Um Fehler abzufangen: ```vb Try thumb.Dispose() Catch ex As Exception MessageBox.Show(ex.Message) End Try ``` - **Objekt-Status prüfen:** Prüfe, ob das Objekt gültig ist, bevor du `Dispose()` aufrufst. **Zusammenfassung:** Der Fehler „Ungültige Parameter verwendet“ beim Aufruf von `Dispose()` deutet meist darauf hin, dass das Objekt entweder schon disposed ist, noch verwendet wird oder nie korrekt initialisiert wurde. Überprüfe die Lebensdauer und Verwendung des Objekts im Code und stelle sicher, dass keine Mehrfachverwendung oder parallele Nutzung stattfindet. Weitere Infos zu `Image.Dispose()` findest du in der [Microsoft-Dokumentation](https://learn.microsoft.com/de-de/dotnet/api/system.drawing.image.dispose).

Accepted Answer

In VB.NET 2003 (also .NET Framework 1.1) ist das Ressourcenmanagement bei Objekten wie Bildern und Thumbnails besonders wichtig, da diese oft nicht verwaltete Ressourcen (z.B. GDI-Handles) verwenden.... [mehr]

Accepted Answer

In VB.NET 2003 (also .NET Framework 1.1) ist das Ressourcenmanagement bei Objekten wie Bildern und Thumbnails besonders wichtig, da diese oft nicht verwaltete Ressourcen (z.B. GDI-Handles) verwenden. Das betrifft insbesondere Objekte vom Typ `Image`, `Bitmap` oder auch Thumbnails, die du mit Methoden wie `GetThumbnailImage` erzeugst. **Wann musst du ein Thumbnail disposen?** Du musst ein Thumbnail (also ein `Image`-Objekt), das du mit `GetThumbnailImage` oder ähnlichen Methoden erzeugt hast, **immer dann disposen, wenn du es nicht mehr benötigst**. Das gilt insbesondere, wenn du: - das Thumbnail nicht mehr anzeigen oder weiterverarbeiten willst, - das Programm beendest und vorher Ressourcen freigeben möchtest, - ein neues Thumbnail erzeugst und das alte nicht mehr brauchst. **Wie disposest du ein Thumbnail?** Du rufst die `Dispose`-Methode auf dem betreffenden Objekt auf, z.B.: ```vb.net Dim thumb As Image = originalImage.GetThumbnailImage(100, 100, Nothing, IntPtr.Zero) ' ... Verwendung des Thumbnails ... thumb.Dispose() ``` **Wichtige Hinweise:** - Wenn du das Thumbnail z.B. in einer PictureBox anzeigst, solltest du es erst disposen, wenn die PictureBox das Bild nicht mehr verwendet (z.B. nach dem Entfernen oder beim Schließen des Formulars). - Wenn du das Thumbnail mehrfach verwendest, dispose es erst ganz am Ende. - In VB.NET 2003 gibt es noch kein `Using`-Block wie in späteren Versionen, daher musst du das Dispose explizit aufrufen. **Zusammengefasst:** Du musst ein in VB.NET 2003 erstelltes und weiterverwendetes Thumbnail immer dann disposen, wenn du es nicht mehr benötigst, um Speicherlecks und GDI-Fehler zu vermeiden. Das geschieht durch den Aufruf von `Dispose()` auf dem betreffenden Objekt.

Accepted Answer

Um in VB.NET 2003 ein Thumbnail eines Bildes zu erstellen und zur Weiterverwendung bereitzustellen, kannst du die Methoden der `System.Drawing`-Bibliothek nutzen. Hier ein einfaches Beispiel, wie du e... [mehr]

Accepted Answer

Um in VB.NET 2003 ein Thumbnail eines Bildes zu erstellen und zur Weiterverwendung bereitzustellen, kannst du die Methoden der `System.Drawing`-Bibliothek nutzen. Hier ein einfaches Beispiel, wie du ein Thumbnail erzeugst und in einer Variablen speicherst: ```vb.net Imports System.Drawing ' Bild laden Dim originalImage As Image = Image.FromFile("C:\Pfad\zum\Bild.jpg") ' Thumbnail-Größe festlegen Dim thumbWidth As Integer = 100 Dim thumbHeight As Integer = 100 ' Thumbnail erzeugen Dim thumbnail As Image = originalImage.GetThumbnailImage(thumbWidth, thumbHeight, Nothing, IntPtr.Zero) ' Das Thumbnail steht jetzt in der Variable "thumbnail" zur Weiterverwendung bereit, ' z.B. zum Anzeigen in einer PictureBox: PictureBox1.Image = thumbnail ' Oder zum Speichern: thumbnail.Save("C:\Pfad\zum\Thumbnail.jpg") ``` **Hinweise:** - Die Methode `GetThumbnailImage` erstellt ein neues Bildobjekt mit den angegebenen Abmessungen. - Das Thumbnail kann wie jedes andere `Image`-Objekt weiterverwendet werden (z.B. anzeigen, speichern, weiterverarbeiten). - Vergiss nicht, die Ressourcen nach der Verwendung mit `Dispose()` freizugeben, um Speicherlecks zu vermeiden. Weitere Informationen findest du in der [Microsoft-Dokumentation zu System.Drawing.Image.GetThumbnailImage](https://learn.microsoft.com/de-de/dotnet/api/system.drawing.image.getthumbnailimage).

Accepted Answer

In VB.NET 2003 gibt es einen wichtigen Unterschied zwischen den Ereignissen `Resize` und `SizeChanged` eines Formulars (`Form`): **1. Resize-Ereignis (`frm.Resize`):** - Dieses Ereignis wird ausgel&o... [mehr]

Accepted Answer

In VB.NET 2003 gibt es einen wichtigen Unterschied zwischen den Ereignissen `Resize` und `SizeChanged` eines Formulars (`Form`): **1. Resize-Ereignis (`frm.Resize`):** - Dieses Ereignis wird ausgelöst, **wenn sich die Größe des Formulars ändert**. - Es wird **bei jeder Größenänderung** ausgelöst, auch während der Benutzer das Formular mit der Maus zieht. - Es kann also **mehrfach während einer einzigen Größenänderung** ausgelöst werden. **2. SizeChanged-Ereignis (`frm.SizeChanged`):** - Dieses Ereignis wird ebenfalls ausgelöst, **wenn sich die Größe des Formulars ändert**. - Es wird jedoch **erst ausgelöst, nachdem die Größenänderung abgeschlossen ist**. - Es ist also **weniger häufig** als das `Resize`-Ereignis und wird typischerweise **nur einmal pro Größenänderung** ausgelöst. **Zusammengefasst:** - `Resize` = Wird bei jeder Änderung der Größe ausgelöst, auch während des Ziehens. - `SizeChanged` = Wird ausgelöst, wenn die Größenänderung abgeschlossen ist. **Quelle:** [Microsoft-Dokumentation zu Form.Resize](https://learn.microsoft.com/de-de/dotnet/api/system.windows.forms.form.resize) [Microsoft-Dokumentation zu Form.SizeChanged](https://learn.microsoft.com/de-de/dotnet/api/system.windows.forms.form.sizechanged) **Hinweis:** In der Praxis werden beide Ereignisse oft ähnlich verwendet, aber für aufwändige Berechnungen oder Layout-Updates empfiehlt sich meist `SizeChanged`, um unnötige Mehrfachausführungen zu vermeiden.

Accepted Answer

In VB.NET 2003 ist das Gegenteil von `Path.Combine(...)` das Zerlegen eines zusammengesetzten Dateipfads in seine Einzelteile (Verzeichnisse und Dateiname). Während `Path.Combine` mehrere Teile z... [mehr]

Accepted Answer

In VB.NET 2003 ist das Gegenteil von `Path.Combine(...)` das Zerlegen eines zusammengesetzten Dateipfads in seine Einzelteile (Verzeichnisse und Dateiname). Während `Path.Combine` mehrere Teile zu einem Pfad zusammenfügt, möchtest du beim "Gegenteil" die einzelnen Komponenten eines Pfads extrahieren. Dafür gibt es in .NET verschiedene Methoden in der Klasse [`System.IO.Path`](https://learn.microsoft.com/de-de/dotnet/api/system.io.path): - `Path.GetDirectoryName(pfad)` – Gibt das Verzeichnis eines Pfads zurück. - `Path.GetFileName(pfad)` – Gibt den Dateinamen zurück. - `Path.GetFileNameWithoutExtension(pfad)` – Gibt den Dateinamen ohne Erweiterung zurück. - `Path.GetExtension(pfad)` – Gibt die Dateierweiterung zurück. **Beispiel:** ```vb Dim pfad As String = "C:\Ordner\Unterordner\datei.txt" Dim verzeichnis As String = Path.GetDirectoryName(pfad) ' "C:\Ordner\Unterordner" Dim dateiname As String = Path.GetFileName(pfad) ' "datei.txt" ``` Wenn du alle Einzelteile (also auch die einzelnen Ordner) brauchst, kannst du das Verzeichnis mit `Split` weiter zerlegen: ```vb Dim ordner() As String = verzeichnis.Split("\"c) ' ordner = {"C:", "Ordner", "Unterordner"} ``` **Zusammengefasst:** Es gibt keine direkte "Uncombine"-Methode, aber mit den genannten Funktionen kannst du die Einzelteile eines Pfads extrahieren.

Accepted Answer

Richtig, in VB.NET 2003 (also .NET Framework 1.1) gibt es die Methode `Path.GetFileName` bereits, aber möglicherweise hast du einen Fehler im Code oder im Import der Namespaces. So funktioniert... [mehr]

Accepted Answer

Richtig, in VB.NET 2003 (also .NET Framework 1.1) gibt es die Methode `Path.GetFileName` bereits, aber möglicherweise hast du einen Fehler im Code oder im Import der Namespaces. So funktioniert es korrekt: ```vb.net Imports System.IO Dim filename As String = Path.GetFileName(dir) ``` **Wichtige Hinweise:** - Stelle sicher, dass du `Imports System.IO` am Anfang deiner Datei hast. - Die Methode heißt `GetFileName`, nicht `getfilename` (Groß- und Kleinschreibung beachten). - `dir` muss ein String sein, der einen Pfad enthält. **Beispiel:** ```vb.net Dim pfad As String = "C:\Ordner\datei.txt" Dim dateiname As String = Path.GetFileName(pfad) ' Ergibt "datei.txt" ``` **Dokumentation:** [Microsoft Docs: Path.GetFileName](https://learn.microsoft.com/de-de/dotnet/api/system.io.path.getfilename) Falls du eine Fehlermeldung bekommst, prüfe bitte: - Schreibweise der Methode - Ob `System.IO` importiert ist - Ob du wirklich .NET 1.1 verwendest (VB.NET 2003) Die Methode ist also schon in VB.NET 2003 verfügbar.

Accepted Answer

Für VB.NET 2003 gibt es keinen offiziellen, fertigen Code für einen komplett selbstgebauten FileDialog, da normalerweise der Standarddialog (`OpenFileDialog`, `SaveFileDialog`) verwendet wir... [mehr]

Accepted Answer

Für VB.NET 2003 gibt es keinen offiziellen, fertigen Code für einen komplett selbstgebauten FileDialog, da normalerweise der Standarddialog (`OpenFileDialog`, `SaveFileDialog`) verwendet wird. Möchtest du jedoch einen eigenen, einfachen FileDialog bauen, kannst du ein eigenes Formular mit Steuerelementen wie `ListBox`, `TextBox` und `Button` verwenden. Hier ein sehr einfaches Beispiel für einen selbstgebauten Open-File-Dialog in VB.NET 2003: **1. Neues Formular erstellen (z.B. "MyFileDialog")** Füge folgende Steuerelemente hinzu: - `ListBox` (Name: `lstFiles`) - `TextBox` (Name: `txtPath`) - `Button` (Name: `btnOpen`, Text: "Öffnen") - `Button` (Name: `btnCancel`, Text: "Abbrechen") **2. Code für das Formular:** ```vbnet Imports System.IO Public Class MyFileDialog Public SelectedFile As String = "" Private Sub MyFileDialog_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load txtPath.Text = "C:\" LoadFiles(txtPath.Text) End Sub Private Sub LoadFiles(ByVal path As String) Try lstFiles.Items.Clear() For Each dir As String In Directory.GetDirectories(path) lstFiles.Items.Add("<DIR> " & Path.GetFileName(dir)) Next For Each file As String In Directory.GetFiles(path) lstFiles.Items.Add(Path.GetFileName(file)) Next Catch ex As Exception MessageBox.Show("Fehler: " & ex.Message) End Try End Sub Private Sub lstFiles_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles lstFiles.DoubleClick If lstFiles.SelectedItem Is Nothing Then Exit Sub Dim item As String = lstFiles.SelectedItem.ToString() If item.StartsWith("<DIR> ") Then txtPath.Text = Path.Combine(txtPath.Text, item.Substring(6)) LoadFiles(txtPath.Text) Else SelectedFile = Path.Combine(txtPath.Text, item) Me.DialogResult = DialogResult.OK Me.Close() End If End Sub Private Sub btnOpen_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnOpen.Click If lstFiles.SelectedItem Is Nothing Then Exit Sub Dim item As String = lstFiles.SelectedItem.ToString() If Not item.StartsWith("<DIR> ") Then SelectedFile = Path.Combine(txtPath.Text, item) Me.DialogResult = DialogResult.OK Me.Close() End If End Sub Private Sub btnCancel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCancel.Click Me.DialogResult = DialogResult.Cancel Me.Close() End Sub End Class ``` **3. Verwendung im Hauptformular:** ```vbnet Dim dlg As New MyFileDialog() If dlg.ShowDialog() = DialogResult.OK Then MessageBox.Show("Ausgewählte Datei: " & dlg.SelectedFile) End If ``` **Hinweis:** Dies ist ein sehr einfaches Beispiel und bietet keine Filter, keine Navigation nach oben, keine Dateityp-Filter usw. Für produktive Anwendungen empfiehlt sich die Nutzung des Standarddialogs oder eine umfangreichere Eigenentwicklung. Weitere Informationen zu VB.NET findest du z.B. auf [Microsoft Learn](https://learn.microsoft.com/de-de/dotnet/visual-basic/).

Accepted Answer

Ja, es ist möglich, die Dateiansicht (View) eines Datei-Dialogs (z. B. OpenFileDialog oder SaveFileDialog) in einer VB.NET 2003-Anwendung zu ändern – allerdings nur mit Einschränk... [mehr]

Accepted Answer

Ja, es ist möglich, die Dateiansicht (View) eines Datei-Dialogs (z. B. OpenFileDialog oder SaveFileDialog) in einer VB.NET 2003-Anwendung zu ändern – allerdings nur mit Einschränkungen und nicht direkt über die Standard-Eigenschaften des Dialogs. **Hintergrund:** Die Standard-Dialoge in .NET (wie `OpenFileDialog`) bieten keine öffentliche Eigenschaft, um die Ansicht (z. B. Details, Liste, Symbole) direkt zu setzen. Die Ansicht ist standardmäßig auf „Liste“ oder „Details“ eingestellt, abhängig von der Windows-Version und den letzten Benutzereinstellungen. **Mögliche Ansätze:** 1. **SendKeys (nicht empfohlen):** Man kann versuchen, nach dem Öffnen des Dialogs Tastenkombinationen zu senden, um die Ansicht zu ändern (z. B. `Alt+V` gefolgt von einer weiteren Taste). Das ist jedoch fehleranfällig und nicht zuverlässig. 2. **Windows-API (fortgeschritten):** Mit Windows-API-Aufrufen (z. B. über `FindWindow`, `SendMessage`) kann man versuchen, das Fenster des Dialogs zu finden und Nachrichten zu senden, um die Ansicht zu ändern. Das ist jedoch komplex, nicht offiziell unterstützt und kann zu Problemen führen. 3. **Eigener Datei-Dialog:** Die zuverlässigste Methode ist, einen eigenen Datei-Dialog mit einem `ListView`-Steuerelement zu erstellen. Dort kann die Ansicht über die `View`-Eigenschaft (`Details`, `List`, `LargeIcon`, etc.) beliebig gesetzt werden. **Fazit:** In VB.NET 2003 gibt es keine einfache, offizielle Möglichkeit, die Ansicht des Standard-Datei-Dialogs zu ändern. Für volle Kontrolle empfiehlt sich ein eigener Dialog mit einem `ListView`. Für einfache Anwendungen kann ein Workaround mit SendKeys oder Windows-API versucht werden, ist aber nicht empfehlenswert. **Weiterführende Links:** - [OpenFileDialog-Klasse (Microsoft)](https://learn.microsoft.com/de-de/dotnet/api/system.windows.forms.openfiledialog) - [ListView.View-Eigenschaft (Microsoft)](https://learn.microsoft.com/de-de/dotnet/api/system.windows.forms.listview.view) Falls du einen bestimmten Ansatz (z. B. API oder eigenen Dialog) näher erklärt haben möchtest, bitte die Frage entsprechend präzisieren.

Accepted Answer

Ja, in der IDE von VB.NET (Visual Studio) kannst du den Namen der zu kompilierenden EXE-Datei nachträglich ändern. Das geht folgendermaßen: 1. **Projektmappen-Explorer öffnen:**... [mehr]

Accepted Answer

Ja, in der IDE von VB.NET (Visual Studio) kannst du den Namen der zu kompilierenden EXE-Datei nachträglich ändern. Das geht folgendermaßen: 1. **Projektmappen-Explorer öffnen:** Rechtsklick auf dein Projekt. 2. **Eigenschaften auswählen:** Im Kontextmenü auf „Eigenschaften“ klicken. 3. **Anwendung:** Im Eigenschaftenfenster den Reiter „Anwendung“ auswählen. 4. **Assembly-Name:** Dort findest du das Feld „Assembly-Name“. Der hier eingetragene Name bestimmt, wie die EXE-Datei nach dem Kompilieren heißt. 5. **Namen ändern:** Trage den gewünschten Namen ein (ohne .exe). 6. **Speichern und neu kompilieren:** Speichere die Änderungen und baue das Projekt neu. Die erzeugte EXE-Datei im Ausgabeordner (meistens `bin\Debug` oder `bin\Release`) trägt dann den neuen Namen. **Hinweis:** Die genaue Bezeichnung der Menüpunkte kann je nach Visual Studio-Version leicht variieren, das Prinzip bleibt aber gleich. Weitere Infos findest du auch in der offiziellen [Microsoft-Dokumentation](https://learn.microsoft.com/de-de/visualstudio/ide/visual-studio-ide?view=vs-2022).

Accepted Answer

Das Problem, dass deine `RichTextBox` in VB.NET 2003 beim Speichern als `type.plaintext` die Zeichen **ä, ö, ü** und **ß** „verschluckt“, liegt sehr wahrscheinlich an... [mehr]

Accepted Answer

Das Problem, dass deine `RichTextBox` in VB.NET 2003 beim Speichern als `type.plaintext` die Zeichen **ä, ö, ü** und **ß** „verschluckt“, liegt sehr wahrscheinlich an einer **Zeichenkodierungsproblematik**. Standardmäßig verwendet die `RichTextBox.SaveFile`-Methode in .NET Framework 1.1 (also auch in VB.NET 2003) beim Speichern als Plaintext das **ANSI-Encoding** (meist Windows-1252 oder systemabhängig), nicht aber UTF-8 oder Unicode. Wenn dein Text Sonderzeichen wie ä, ö, ü oder ß enthält und diese Zeichen beim Speichern nicht korrekt kodiert werden, gehen sie verloren oder werden durch Fragezeichen oder andere Symbole ersetzt. **Lösung:** Die `RichTextBox.SaveFile`-Methode unterstützt in .NET 1.1 **keine direkte Angabe der Encoding**. Du kannst aber den Textinhalt der RichTextBox auslesen und selbst mit dem gewünschten Encoding speichern: ```vb.net ' Text auslesen Dim text As String = RichTextBox1.Text ' Datei mit UTF-8 Encoding speichern System.IO.File.WriteAllText("dateiname.txt", text, System.Text.Encoding.UTF8) ``` **Wichtige Hinweise:** - Wenn du die Datei später wieder einliest, verwende das gleiche Encoding (`System.Text.Encoding.UTF8`). - Wenn du die Datei mit einem Editor öffnest, stelle sicher, dass dieser das verwendete Encoding unterstützt. **Zusammengefasst:** Die Zeichen werden verschluckt, weil das Standard-Encoding der SaveFile-Methode keine Umlaute unterstützt. Speichere den Text explizit mit UTF-8 oder Unicode, um das Problem zu lösen. **Weitere Infos:** - [Microsoft-Dokumentation zu File.WriteAllText](https://learn.microsoft.com/de-de/dotnet/api/system.io.file.writealltext) - [RichTextBox.SaveFile-Methode (MSDN)](https://learn.microsoft.com/de-de/dotnet/api/system.windows.forms.richtextbox.savefile) Falls du noch mit .NET 1.1 arbeitest, ist ein Update auf eine neuere Version empfehlenswert, da dort Encoding-Optionen besser unterstützt werden.