diff --git a/source/ide/ide_methods.bas b/source/ide/ide_methods.bas
index da16da711..aa5213107 100644
--- a/source/ide/ide_methods.bas
+++ b/source/ide/ide_methods.bas
@@ -7312,10 +7312,10 @@ SUB DebugMode
                             IF INSTR(varType$, "STRING") = 0 THEN
                                 GOSUB findVarSize
                             ELSE
-                                IF INSTR(varType$, " * ") = 0 THEN
-                                    varSize& = LEN(dummy%&) + LEN(dummy&)
-                                ELSE
+                                IF INSTR(varType$, " * ") > 0 AND (tempIsUDT& <> 0 OR tempIsArray& <> 0) THEN
                                     varSize& = VAL(_TRIM$(MID$(varType$, INSTR(varType$, "STRING *") + 8)))
+                                ELSE
+                                    varSize& = LEN(dummy%&) + LEN(dummy&)
                                 END IF
                             END IF