devxlogo

Creating a For/Next Loop

Creating a For/Next Loop

Question:
I tried using the replace function as shown below, but I receive an error on using “Next i”.

Function formatOutput( theText )Dim iDim sNewStringFor i = 1 to Len(theText)     If Mid(theText, i, 1)  "’" Then     sNewString = sNewString &  Mid(theText, i, 1)  End IfNext iEnd Function

The error reads: “Expected end of statement”.If I take the i out, I receive a blank output which I’m assuming is because I’ve stopped the loop. What am I doing wrong?
As soon as I can get this working I’d like to try assigning two single quotes as the value of an extra variable to replace all single quotes with two.

Answer:
The Replace function isn’t the issue…Next i is. VBScript does not list the variable following the Next keyword.
Simply remove the i so that the line is just Next, and you’re all set. I typically leave the variable following the Next keyword in a comment, like so:

Next  ’ i

Otherwise, I get confused.

devxblackblue

About Our Editorial Process

At DevX, we’re dedicated to tech entrepreneurship. Our team closely follows industry shifts, new products, AI breakthroughs, technology trends, and funding announcements. Articles undergo thorough editing to ensure accuracy and clarity, reflecting DevX’s style and supporting entrepreneurs in the tech sphere.

See our full editorial policy.

About Our Journalist