Public Function ConditionUIFormatHTML(ByVal sInput As String) As String If sInput Is Nothing Then Return "The condition is in Error" If sInput.Trim = "" Then Return "(Nothing Selected)" Dim p() As Pair = Nothing Dim paircount As Integer ' ' GetFormData converts a string in the form: name=value&name=value&name=value ' into pairs for easier processing. ' GetFormData(sInput, paircount, p) If paircount < 1 Then Return "(Nothing Selected)" For i As Integer = 0 To paircount - 1 If p(i).Name = "MyPlugTextBox" Then Return "You wrote: " & p(i).Value ElseIf p(i).Name = "2nd Condition Text" Then Return "You wrote: " & p(i).Value End If Next Return "No Sample Condition" End Function