clean up getplaceholdervalue
This commit is contained in:
parent
33fa89bae9
commit
b8cc39a7c7
@ -1728,8 +1728,8 @@ Public Class frmIndex
|
|||||||
End Try
|
End Try
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Function GetPlaceholderValue(InputValue As String, FileName As String, UserShortName As String)
|
Function GetPlaceholderValue(InputValue As String, FileName As String, UserShortName As String) As String
|
||||||
Dim oResult = Nothing
|
Dim oResult As String
|
||||||
|
|
||||||
Try
|
Try
|
||||||
Select Case InputValue.ToString.ToUpper
|
Select Case InputValue.ToString.ToUpper
|
||||||
|
|||||||
Loading…
x
Reference in New Issue
Block a user