Buchstabenanzahl pro Zeile in einer TextBox berechnen

[Wulfi]

Hallo,

habe folgendes Problem. Wenn ich eine TextBox1 habe, die folgende Parameter besitzt:

TextBox1.Font.Name = "Courier New" 'nicht veränderbar
TextBox1.Font.Size = 10 'Schriftgröße variabel
TextBox1.MultiLine = True
TextBox1.Width = 100 'Textboxweite variabel

möchte ich in Abhängigkeit von einer variabel einzustellenden Schriftgröße mit TextBox1.Font.Size und einer ebenso variabel einzustellenden
Textboxweite TextBox1.Width errechnen können, wieviel Buchstaben jeweils in eine Zeile  dieser TextBox1 passen.
Die Schrifteinstellung mit TextBox1.Font.Name bleibt unveränderbar.

Wie könnte man so etwas umsetzen? Könnte man dafür eine Formel entwickeln?

[atilla]

Hallo,

meiner Erfahrung nach nicht möglich, bzw annäherungsweise möglich, da Klein- und Großbuchstaben oder Zeichen verschiedene Abmessungen haben.

In Zellen der Tabelle kann man ein Maß einstellen und nach erfolgter Eingabe eines Textes die Funktion AutoFit nutzen um dann den veränderten Wert mit dem eingestellten zu vergleichen.

[Wulfi]

Hi attila,

um das Problem der Groß- und Kleinschreibung zu umgehen, habe ich ja eine Festbreitenschriftart gewählt

[atilla]

Hallo,

ok, das habe ich übersehen.

Dann ginge theoretisch folgendes:
a = Breite eines Zeichens
x = die Anzahl der Zeichen z.B: x = len(Textbox1) .Text
Textbox1.Width = a * x