diff --git a/src/ShuttleGui.cpp b/src/ShuttleGui.cpp
index c7a91fc00..15e02e52f 100644
--- a/src/ShuttleGui.cpp
+++ b/src/ShuttleGui.cpp
@@ -617,7 +617,9 @@ wxTextCtrl * ShuttleGuiBase::AddTextBox(
    wxSize Size(wxDefaultSize);
    if( nChars > 0 )
    {
-      Size.SetWidth( nChars *5 );
+      int width;
+      mpDlg->GetTextExtent( wxT("9"), &width, nullptr );
+      Size.SetWidth( nChars * width );
    }
    miProp=0;