From 2ce61cd5abfa06958f356ccea4ffad624acd7b8c Mon Sep 17 00:00:00 2001 From: Demetrio Cassarino Date: Mon, 10 Nov 2025 11:50:33 +0100 Subject: [PATCH] -inserito controllo su terminazione stringa --- OptionPanel/DrawOptionPanel/InputExpander/InputExpanderVM.vb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/OptionPanel/DrawOptionPanel/InputExpander/InputExpanderVM.vb b/OptionPanel/DrawOptionPanel/InputExpander/InputExpanderVM.vb index fcdb2a7..ff57932 100644 --- a/OptionPanel/DrawOptionPanel/InputExpander/InputExpanderVM.vb +++ b/OptionPanel/DrawOptionPanel/InputExpander/InputExpanderVM.vb @@ -170,7 +170,7 @@ Public Class InputExpanderVM If m_ComboSelectedIndex >= 0 AndAlso tmpInfoList.Count > 0 Then ' se la info รจ presente la aggiungo alla textbox per modificarla If m_TextBox IsNot String.Empty Then - m_TextBox &= vbCrLf + If Not m_TextBox.EndsWith(vbCrLf) Then m_TextBox &= vbCrLf m_TextBox &= (tmpInfoList(m_ComboSelectedIndex).sKey & "=" & m_tmpInfoList(m_ComboSelectedIndex).sValour).Trim() ElseIf m_TextBox Is String.Empty Then m_TextBox &= (tmpInfoList(m_ComboSelectedIndex).sKey & "=" & m_tmpInfoList(m_ComboSelectedIndex).sValour).Trim() & vbCrLf