Fehler bei Ausgabe über Display

Dim L1 As String * 1
Dim L2 As String * 1
Dim L3 As String * 1
Dim L4 As String * 1