add scrollbars to text box

2022-08-11 13:21:37 +02:00
parent b7b137e690
commit d206c30ad8
1 changed files with 1 additions and 0 deletions
--- a/app/DD_PM_WINDREAM/ClassControlCreator.vb
+++ b/app/DD_PM_WINDREAM/ClassControlCreator.vb
@@ -287,6 +287,7 @@ Public Class ClassControlCreator
                control.ReadOnly = oControlRow.Item("READ_ONLY")
                control.TabStop = Not oControlRow.Item("READ_ONLY")
                control.BackColor = IIf(oControlRow.Item("READ_ONLY"), Color.LightGray, Color.White)
+                control.ScrollBars = ScrollBars.Vertical
            Else
                control.ReadOnly = True
            End If