write the code to reverse a string without using Strrev
built in function.
Answers were Sorted based on User's Feedback
Answer / jay prakash
Try this:
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
'''''''''''''''Script Starts Here''''''''''''''''''''''''''
Dim i
Dim iStrLen
Dim strOut
Dim strTmp
Dim strMyString
strString=InputBox("Please enter the string to be
reversed:")
iStrLen = Len(strString)
For i = 0 To Len(strString) - 1
strOut = Mid(strString, iStrLen - i, 1)
strTmp = strTmp & strOut
Next
strMyString = strTmp
msgbox strMyString
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
'''''''''''''''Script Ends Here''''''''''''''''''''''''''
Please let me know if it helps
| Is This Answer Correct ? | 32 Yes | 5 No |
Answer / bhaskar
Str = InputBox("Please enter the string to be reversed:")
Cnt = len(str)
For i = 1 to Cnt
Rstr = mid(str , i ,1) &Rstr
Next
Msgbox Rstr
| Is This Answer Correct ? | 15 Yes | 8 No |
Answer / uday
All the above answers uses one the other string functions
like mid, len, instr.
But we can reverse a string without using any string functions.
Looks interesting? Try the below code:
str="Hello Uday"
Set regExpObj=new RegExp
regExpObj.pattern="[a-z A-Z]"
regExpObj.global=true
Set matches=regExpObj.execute(str)
For each letter in matches
result=letter.value&result
Next
print result
| Is This Answer Correct ? | 7 Yes | 0 No |
Answer / logesh gunasekar
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
int main(void)
{
char oldMsg[100], newMsg[100];
int cd = 12, cu = 0;
strcpy(newMsg, "Hello World!");
while (cd > 0)
{
newMsg[cu] = oldMsg[cd];
cu++;
cd--;
}
printf("%c", newMsg);
printf("\n\nPress ENTER to end . . .");
getchar();
return 0;
}
| Is This Answer Correct ? | 3 Yes | 2 No |
Answer / prasad
Option Explicit
Dim Str, Cnt , Rstr , i
Str = "Shiva"
Cnt = len(str)
For i = 1 to Cnt
Rstr = mid(str , i ,1) &Rstr
Next
Msgbox Rstr
| Is This Answer Correct ? | 11 Yes | 11 No |
Answer / chandrakanta
dim str,rs,i
str="chandrakanta panda"
rs=""
For i=0 to len(str)-1
rs=rs&mid(str,len(str)-i,1)
Next
print rs
| Is This Answer Correct ? | 2 Yes | 2 No |
Answer / rajesh kumar
can any one tel ;question is
a[1]=I
A[1]=N
A[1]=D
A[1]=I
A[1]=A
OUT PUT IS I NEED INDIA HOW WILL U DO THAT
USING A SIMPLE STRING
REPLY ME ITS NEED FUL.......
| Is This Answer Correct ? | 0 Yes | 0 No |
Answer / kondekar ashish k.
dim a, b as string
a=text1.text
b=strrev(a)
text2.text=b
| Is This Answer Correct ? | 0 Yes | 0 No |
Answer / prathyusha
without using built-in function we can go for RegExp.
str="Hello"
set oreg=new reg exp
oreg.global=true
oreg.ignorecase=true
oreg.pattern="[.]"
set omatches=oreg.execute("str")
for each match in omatches
res=match&vbcrlf&res
next
msgbox res
| Is This Answer Correct ? | 0 Yes | 0 No |
In a QTP project lets say there are 100+ function library and incorrectly we have duplicate some function in multiple libraries. How to find those duplicate functions and remove them?
How can i count the list box elements in QTP ?using script plz explain me (Chandana)
how to get the object count ?????????
how to generate numbers in between to numbers suppose numbers in between 500 to 1000 in sequencies using vbscript
How do you test siebel application using qtp?
In application which areas to be automated and what kind of situation will be take? using QTP? Plz give me the clear answer
0 Answers Tavant Technologies,
How to capture all the data of a webtable, weblist and combolist using QTP?
How to merge the two object repositories
Shall we add Local Repository to shared object repository,if yes,how we add
WAT IS DATA BASE AND XML CHECK POINT ?HOW TO IMPLEMENT IT ... GIVE PROPER EXAMPLE FOR IT
How to retrieve value (data) from notepad using QTP ?
how to create the varibles and how these are connect to qtp? plz tell me