mahesh

• Aug 21st, 2015

QTP 10: Keyword Driven Testing Framework Introduced. Test Re usability increased.

Answer Question  Select Best Answer

Sandhya.Kishan

 Profile Answers by Sandhya.Kishan Questions by Sandhya.Kishan

• Jun 25th, 2012

Test case for fibonacci series can be 1.When an zero is entered it should return a zero. 2.When a negative integer is entered it should not accept the value and should return an error msg. 3.When a p...

Answer Question  Select Best Answer

if var="a1bc23"->separate this string into two strings like, abc, 123

SatishRaja

• Aug 6th, 2013

Code
var="a1bc23"
x=len(var)
For i= 1 to x
        a=mid(var,i,1)
        If IsNumeric(a) then
                myNumber=myNumber+a
        Else
                myString=myString+a
        End If
Next
MsgBox myString
MsgBox myNumber

ratna

• Jun 29th, 2012

Code
dim a,x
a="ab1c23"
for i=1 to len(a)
if asc(mid(a,i,1))<>32 then
if asc(mid(a,i,1))>=97 and asc(mid(a,i,1))<=122 and asc(mid(a,i,1))>=65 and asc(mid(a,i,1))<=90 then
mystring=mystring&mid(a,i,1)
else
if asc(mid(a,i,1))>=48 and asc(mid(a,i,1))<=57 then
mynumber=mynumber&mid(a,i,1)
end if
end if 
end if
next
msgbox (mystring)
msgbox (mynumber) 

Answer Question  Select Best Answer