-
Nov 25th, 1999, 08:39 AM
#1
Thread Starter
Hyperactive Member
Hello.. when i make my program save textbox Text or any text it keeps saving the text into quotes like i would put
Write #1, Textbox.text (Textbox has "Blarb")
Inside the saved file:
"Blarb"
is there a way when i save text to get rid of the quotes inside the file??
-
Nov 25th, 1999, 10:06 AM
#2
Hyperactive Member
Use this code to remove quotes from the ends of a string:
Code:
Private Sub Command1_Click()
Text1.Text = ChopQuotes(Text1.Text)
End Sub
Function ChopQuotes(ByVal str As String) As String
On Error Resume Next
Dim ReturnValue As String
ReturnValue = str
If Left$(ReturnValue, 1) = Chr(34) Then ReturnValue = Right$(ReturnValue, Len(ReturnValue) - 1)
If Right$(ReturnValue, 1) = Chr(34) Then ReturnValue = Left(ReturnValue, Len(ReturnValue) - 1)
ChopQuotes = ReturnValue
End Function
------------------
Tom Young, 14 Year Old
tyoung@stny.rr.com
ICQ: 15743470 Add Me ICQ Me
AIM: TomY10
PERL, JavaScript and VB Programmer
-
Nov 25th, 1999, 12:21 PM
#3
To save to a File without the Quotes, use Print # not Write #
------------------
Aaron Young
Analyst Programmer
aarony@redwingsoftware.com
adyoung@win.bright.net
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|