I'm trying to include quotes into my string to add to a text box, i am using this code.
t.AppendText("Dim Choice" & count + " As String = " + "Your New Name is: & pt1 + "" & pt2 +" + vbNewLine)
but it doesnt work, i want it to output like so:
Dim Choice As String = "Your New Name is开发者_StackOverflow: NAME_HERE"
You have to escape the quotes. In VB.NET, you use double quotes - "":
t.AppendText("Dim Choice" + count.ToString() + " As String = ""Your New Name is: " + pt1 + " " + pt2 + """" + vbNewLine)
This would print as:
Dim Choice1 As String = "Your New Name is: NAME HERE"
Assuming count = 1 (Integer), pt1 = "NAME" and pt2 = "HERE".
If count
is not an Integer, you can drop the ToString() call.
In C#, you escape the " by using a \, like this:
t.AppendText("string Choice" + count.ToString() + " = \"Your New Name is: " + pt1 + " " + pt2 + "\"\n");
Which would print as:
string Choice1 = "Your new Name is: NAME HERE";
As Tim said, simply replace each occurrence of "
inside the string with ""
.
Furthermore, use String.Format
to make the code more readable:
t.AppendText( _
String.Format( _
"Dim Choice{0} As String = ""Your New Name is: {1} {2}""{3}", _
count, pt1, pt2, vbNewLine)
Depending on the type of your t
, there might even be a method that supports format strings directly, i.e. perhaps you can even simplify the above to the following:
t.AppendText( _
"Dim Choice{0} As String = ""Your New Name is: {1} {2}""{3}", _
count, pt1, pt2, vbNewLine)
You have to escape them, however you cannot dynamically generate variable names as you're attempting to here:
"Dim Choice" & count + " As String = "
this will just be a string.
You can use the Chr Function with the quotes ASCII Code: 34 to have a result as this:
t.Append(Dim Choice As String = " & Chr(34) & "Your New Name is: NAME_HERE" & Chr(34))
Although escaping the string is the correct way of doing things it is not always the easiest to read. Consider trying to create the following string:
Blank "" Full "Full" and another Blank ""
To escape this you need to do the following:
"Blank """" Full ""Full"" and another Blank """""
But if you using String.Format
with Chr(34)
you can do the following:
String.Format("Blank {0}{0} Full {0}Full{0} and another Blank {0}{0}", Chr(34))
This is an option if you find this easier to read.
In VB .Net
you can do this :
Assuming count = 1 (Integer), pt1 = "NAME" and pt2 = "HERE"
.
t.AppendText("Dim Choice" & count.Tostring() + " As String ="+ CHR(34) + "Your New Name is: " & pt1 + "_" & pt2 +CHR(34) + vbNewLine)
The output will be Dim Choice As String = "Your New Name is: NAME_HERE"
str = "Me.TextBox" + (box).ToString + ".Name = " + Chr(34) + "TextBox" + box.ToString + Chr(34)
Result:
Me.TExtBox123.Name = "TextBox123"
where box = 123
integer
Using VB.Basic 2019.
精彩评论