From 54afd3754ff771887c694d883d8c7846e81b0aea Mon Sep 17 00:00:00 2001 From: Digital Data - Marlon Schreiber Date: Thu, 23 May 2019 10:35:34 +0200 Subject: [PATCH] SelectedValuesIssue --- app/DD_PM_WINDREAM/frmValidator.vb | 2 ++ 1 file changed, 2 insertions(+) diff --git a/app/DD_PM_WINDREAM/frmValidator.vb b/app/DD_PM_WINDREAM/frmValidator.vb index 8331b87..4afb84c 100644 --- a/app/DD_PM_WINDREAM/frmValidator.vb +++ b/app/DD_PM_WINDREAM/frmValidator.vb @@ -2439,6 +2439,7 @@ Public Class frmValidator Dim oLookup As LookupControl2 = oControl Dim oWindreamValue = CURRENT_WMFILE.GetVariableValue(oWMIndexName) Try + oLookup.SelectedValues = Nothing oLookup.SelectedValues = New List(Of String) Catch ex As Exception @@ -2447,6 +2448,7 @@ Public Class frmValidator If oWindreamValue.GetType.ToString.Contains("System.Object") Then Dim oArrlist As New List(Of String) For Each oVectorRow As Object In oWindreamValue + Dim Ocontent = oVectorRow.ToString oArrlist.Add(oVectorRow.ToString) Next oLookup.SelectedValues = oArrlist