19 lines
727 B
Plaintext
19 lines
727 B
Plaintext
' ShowDebugBox(Title : String)
|
|
' ----------------------------------------------------------------------------
|
|
' Zeigt die DEBUG-MsgBox an
|
|
'
|
|
' Returns: -
|
|
' ----------------------------------------------------------------------------
|
|
' Copyright (c) 2021 by Digital Data GmbH
|
|
'
|
|
' Digital Data GmbH • Ludwig-Rinn-Strasse 16 • D-35452 Heuchelheim
|
|
' Tel.: 0641/202360 • E-Mail: info-flow(at)digitaldata.works
|
|
' ----------------------------------------------------------------------------
|
|
' Creation Date / Author: 10.08.2020 / XX
|
|
' Version Date / Editor: 10.08.2020 / XX
|
|
' Version Number: 1.0.0.0
|
|
|
|
Sub ShowDebugBox(Title)
|
|
MsgBox DEBUG_MESSAGE, vbOkonly, DEBUG_TITLE & " - " & Title
|
|
DEBUG_MESSAGE = ""
|
|
End Sub |