MS
This commit is contained in:
@@ -1379,7 +1379,9 @@ Public Class ClassControlBuilder
|
||||
Try
|
||||
Dim control As Label = New Label
|
||||
Dim defaultSize As Size = New Size(200, 27)
|
||||
|
||||
If id = 735 Then
|
||||
Dim i = "Obacht"
|
||||
End If
|
||||
Dim metadata As New ClassControlMetadata()
|
||||
metadata.Id = id
|
||||
metadata.Name = name
|
||||
@@ -1422,6 +1424,13 @@ Public Class ClassControlBuilder
|
||||
control.Text = result.ToString
|
||||
End If
|
||||
End If
|
||||
Else
|
||||
If text <> "" Then
|
||||
control.Text = text
|
||||
Else
|
||||
control.Text = "NO CAPTION/TEXT"
|
||||
End If
|
||||
|
||||
End If
|
||||
End If
|
||||
|
||||
|
||||
Reference in New Issue
Block a user