Reverse a each word of a String without using StrReverse function Vb Scripting
str="character/share/bangalore/chennai/trap"
x=split(str,"/")
For i = 0 to UBound(x)
sRev = StrReverse(x(i))
expStr = expStr & sRev & "/"
Next
MsgBox expStr
Reverse a each word of a String with using StrReverse function Vb Scripting
Dim oStr,i
oStr="Quick Test Professional"
StrArray=split(oStr," ")
For i=0 to ubound(StrArray)
msgbox strreverse(StrArray(i))
Next
str="character/share/bangalore/chennai/trap"
x=split(str,"/")
For i = 0 to UBound(x)
sRev = StrReverse(x(i))
expStr = expStr & sRev & "/"
Next
MsgBox expStr
Reverse a each word of a String with using StrReverse function Vb Scripting
Dim oStr,i
oStr="Quick Test Professional"
StrArray=split(oStr," ")
For i=0 to ubound(StrArray)
msgbox strreverse(StrArray(i))
Next
No comments:
Post a Comment