how to reverse a string with out using string or predefined
function,ex:string is " i love india". the output should be
like this "i evol aidni"
Answers were Sorted based on User's Feedback
Answer / karthikjanahan
Dim str,arr
str = "i love india"
strlen = len(str)
ReDim arr(strlen)
For i = strlen to 1 step -1
arr(i) = mid(str,i,1)
x = x & arr(i)
Next
msgbox x
| Is This Answer Correct ? | 10 Yes | 5 No |
Answer / rupesh
Hi Karthik,
ur script will reverse the string but not the individual
words...
output of ur script will be "aindi evol i"
| Is This Answer Correct ? | 6 Yes | 1 No |
Answer / nivas
The below given is perfect script for this Query.
Dim str
str = "i love india"
arr = split(str, " ")
for i=lbound(arr) to ubound(arr)
revStr = strreverse(arr(i))
fStr = fStr & revStr & " "
next
msgbox fStr
| Is This Answer Correct ? | 5 Yes | 0 No |
Answer / janardhan
Given sting
String str="i love india";
String s[]=str.split();
for(int i=str.length();i>0;i--)
System.out.println(s[i]);
| Is This Answer Correct ? | 5 Yes | 2 No |
Answer / praveen ponnala
hi guys
Try this
Dim MyStr, MyArray
MyStr = "I Love India"
MyArray = Split(MyStr," ")
msgbox StrReverse(MyArray (0)) &" " &StrReverse(MyArray
(1)) &" "&StrReverse(MyArray (2))
| Is This Answer Correct ? | 3 Yes | 2 No |
Answer / rajender singh
aa = "i love india"
bb = split(aa," ")
dd = ""
For i=0 to ubound(bb)
cc = StrReverse(bb(i))
dd = dd&" "&cc
Next
msgbox dd
| Is This Answer Correct ? | 1 Yes | 0 No |
Answer / sreenu
Dim str,arr
str = "i love india"
m=split(str," ")
For k=lbound(m) to ubound(m)
mystr=m(k)
strlen = len(mystr)
ReDim arr(strlen)
For i = strlen to 1 step -1
arr(i) = mid(mystr,i,1)
x = x & arr(i)
Next
x=x&" "
Next
msgbox x
| Is This Answer Correct ? | 0 Yes | 0 No |
Answer / k.chalapathirao
i cheched it , but 8it is not reverse, plz chech it once
| Is This Answer Correct ? | 0 Yes | 0 No |
Answer / ramesh
Str="I Love india"
arr1=split(Str," ")
for i=0 to ubound(arr1)
arr=arr1(i)
lenarr=len(arr)
if lenarr=1 then
sing=sing&arr&" "
End if
if lenarr<> 1 then
for j=lenarr to 1 step-1
val=mid(arr,j,1)
rev=rev&val&" "
next
end if
rev=rev&" "
next
msgbox sing&rev
| Is This Answer Correct ? | 0 Yes | 0 No |
Answer / lak
Reverse a string without using String Functons
(mid,split,len..)
str=" i love india"
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
msgbox result
| Is This Answer Correct ? | 0 Yes | 0 No |
can u tell me website address of VBscript with examples.
1.How to find in which row or column,string "Hyderabad" exist in excel sheet? 2.How to find how many times character "a" repeated in a given string "Koteswararao"
How to capture the tooltip of webelement,if there are two values displayed in tooltip of webelement?
tell me exact differenceb bw qtp and selenium?(could not tell open soure and licennce? difference in usage and technical difference?
I have two For loop, first For loop does is creates a customer and input the customer info and then the second for loop within the first for loop does the follows which is capture the customer name and verify the with the data within the datatable. The problem I am coming across is that when it goes through the second time creating another customer and then verify the second customer then it creates the following during runtime. I want is to have the customer2 below Customer1 under the Customer_from_Apps. Any help will be greatly appreciate it. Customer Customer_from_Apps Customer_from_Apps1 Customer1 Customer 1 Customer2 Customer2 Window("Customer Desktop").Window("Customer Tracking (Privacy").WinObject("TreeView20WndClass").Click 92,244 runtimevalue = .VbTreeView("vbname:=AppServerTree").GetROProperty("Selectio n") Customer_Val= Datatable.GlobalSheet.AddParameter ("Customer_from_Apps",runtimevalue) row=datatable.getsheet("Global").GetRowCount For x=1 to row datatable.SetCurrentRow(x) Data_Val=Datatable.Value("Customer",dtGlobalSheet) If (trim(Customer_Val)=trim(Data_Val)) Then Reporter.ReportEvent micPass, "Customer validation successful", "Actual Value: " &Data_Val&vbcrlf& "Customer Value: " &Customer_Val else Reporter.ReportEvent micFail, "Cusotmer validation unsuccessful", "Actual Value: " &Data_Val&vbcrlf& "Customer Value: " &Customer_Val End If Next
How to add object to object repository in qtp9.0 Suppose for brower yahoo home page
What is Environment Variable and when we apply this in QTP?
Explain data driven framework?
In Object Repository, two actions r there. Action1 name is A.tsr, Action2 name is B.tsr. Is it Possible? if Yes, what is the out put of A+B? if No, why?
How can I generate customized logs in QTP ?
what does it mean when a check point is in red color? what do u do?
I want to write some certification courses, so friends could you guide me? which certification is best and how to write exam and what tutorials need to be studied,what to do first, I am working on automation tool QTP 9.2