Guest User

Untitled

a guest
Jan 21st, 2019
69
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.30 KB | None | 0 0
  1. If (blnOverwrite = True)
  2.  
  3. mstrTextToShow = strTextToShow
  4.  
  5. Else If (mblnKeepStatus = True AndAlso strTextToShow = " ")
  6.  
  7. mstrTextToShow = mstrTextToShow.Substring(0, mstrTextToShow.IndexOf(":"))
  8.  
  9. Else
  10.  
  11. mstrTextToShow = mstrTextToShow & ": " & strTextToShow
  12.  
  13. End If
Add Comment
Please, Sign In to add comment