diff --git a/DrawPageUC.xaml.vb b/DrawPageUC.xaml.vb
index d488f76..a19ad3f 100644
--- a/DrawPageUC.xaml.vb
+++ b/DrawPageUC.xaml.vb
@@ -513,6 +513,13 @@ Public Class DrawPageUC
          m_CompoDimension.GetNameEdit(j).Visibility = Windows.Visibility.Visible
          m_CompoDimension.GetValueEdit(j).Text = m_CVars(i - 1).ToString()
          m_CompoDimension.GetValueEdit(j).Visibility = Windows.Visibility.Visible
+         If m_CVars(i - 1).m_nType = 5 Then
+            TryCast(m_CompoDimension.GetValueEdit(j), EgtTextBox).Keyboard = EgtTextBox.KeyboardType.Alphanumeric
+            TryCast(m_CompoDimension.GetValueEdit(j), EgtTextBox).KeyboardDimension = 600
+         Else
+            TryCast(m_CompoDimension.GetValueEdit(j), EgtTextBox).Keyboard = EgtTextBox.KeyboardType.Calculator
+            TryCast(m_CompoDimension.GetValueEdit(j), EgtTextBox).KeyboardDimension = 300
+         End If
       Next
       m_bShowVar = False
       Return True
@@ -625,7 +632,7 @@ Public Class DrawPageUC
                If EgtGetType(nTextId) = GDB_TY.EXT_TEXT Then
                   Dim sText As String = String.Empty
                   EgtTextGetContent(nTextId, sText)
-                  Dim sNewText = sName & "  " & sText
+                  Dim sNewText = sName & "<br/>" & sText
                   EgtModifyText(nTextId, sNewText)
                   Exit While
                End If
diff --git a/My Project/AssemblyInfo.vb b/My Project/AssemblyInfo.vb
index 03434d8..7e2fec3 100644
--- a/My Project/AssemblyInfo.vb	
+++ b/My Project/AssemblyInfo.vb	
@@ -62,5 +62,5 @@ Imports System.Windows
 ' by using the '*' as shown below:
 ' <Assembly: AssemblyVersion("1.0.*")> 
 
-<Assembly: AssemblyVersion("1.9.10.3")> 
-<Assembly: AssemblyFileVersion("1.9.10.3")> 
+<Assembly: AssemblyVersion("1.9.11.1")> 
+<Assembly: AssemblyFileVersion("1.9.11.1")>