text Box & strings

• • Reply

  18 years ago

  by Dave Rees

  Dave Rees

  , United States

  Joined 19 years ago

  I place text from a file in a text box. I get "Hello//"How can I remove the 2 lines that apear at the end of the line. I did it once but can't remember.
  Somthing about seltext and seltext -2 or somthing like that
  

  
  

  Report abuse
• • Reply

  18 years ago

  by Tony Ho

  Tony Ho

  Lexington, KY, United States

  Joined 18 years ago

  Well, just for that string you can do this: (assuming that strFile is the variable that holds the text)
  

  
  strFile = Mid$(strFile,1,len(strFile) - 2)
  

  
  what it does is that it calls the function Mid$ with the following arguments:
  

  
  strFile = the string to be edited
  1 = starting position
  len(strFile) - 2 = where to end...
  

  
  len(strFile) gets how long the string is, subtract 2 from it and you'll just get "Hello"
  

  
  
  

  
  Hope its not too confusing or elaborate

  Report abuse
• • Reply

  18 years ago

  by Kimmy

  Kym Manson

  Kaboom! Kaboom!, United States

  Joined 19 years ago

  i think you mean  left$(mytext, len(mytext)-2)  would return "hello"
  

  
  does the same thing ~ its up to you

  Report abuse
• • Reply

  18 years ago

  by Stevesoft

  Steve Rayner

  Norfolk, England, United Kingdom

  Joined 19 years ago

  I have this little routine that i use to remove specific chars from a string:
  

  
  

  Code:

  Public Sub Purge_string(ac As Integer, text$)
  'this routine purges a specified char from a string
  'ac = ascii code for char to be purged
   Dim p As Integer
   Do
     quo$ = Chr$(ac)
     p = InStr(text$, quo$)
     If p <> 0 Then 'string contains invalid char
       text$ = Left$(text$, p - 1) + Right$(text$, Len(text$) - p)
     End If
   Loop Until p = 0 'string purged!
  End Sub

  
  

  
  It just does that same as what kimmy and tony suggested, but with this code it does not matter where the unwanted chars are (ie they could be in the middle or at the begining of the string).
  

  
  Stevesoft

  Report abuse
• • Reply

  18 years ago

  by Tony Ho

  Tony Ho

  Lexington, KY, United States

  Joined 18 years ago

  in .NET I dont think there is a Left$... do you know why MS took it out?  I was going to suggest what Kimmy was going to say, but it doesn't work for .NET so I just thought Mid$ would be best cuz it works with both versions

  Report abuse
• • Reply

  18 years ago

  by Stevesoft

  Steve Rayner

  Norfolk, England, United Kingdom

  Joined 19 years ago

  Can someone confirm that left$ has been excluded in .net ???
  

  
  if so, it may be a good enough reason to start to convert my progs to use mid$ instead of left$ (and maybe right$).
  

  
  I understand that .net attempts to convert vb6 programs to run under .net, in this case would the left$ be converted to mid$ ???
  

  
  These sort of things are good to know and bear in mind if you are considering upgrading to .net at some point.
  

  
  Stevesoft

  Report abuse
• • Reply

  18 years ago

  by Tony Ho

  Tony Ho

  Lexington, KY, United States

  Joined 18 years ago

  I'm actually wrong, sorry about that...
  

  
  When you type in Left() it lets u get or set the x-coordinate of the edge of the form in pixels
  

  
  Left$ is in... Microsoft.VisualBasic.Left$() ... This is what you get for making something so big! (cough) .NET Framework (cough)
  

  
  Sorry about my early assumption

  Report abuse