str="QTP AUTOMATION TESTING"
here how many T are there in the str
finally i want to display the T

Answer Posted / cnu_thatavarthi

Dim strValue,i, blnFlag,incRement

strValue = "QTP AUTOMATION TESTING"
blnFlag = ""
incRement = 0
For i = 1 to Len(strValue)
If Ucase(mid(strValue,i,1)) = "T" Then
incRement = incRement+1
blnFlag = blnFlag &Ucase(mid(strValue,i,1))
End If
Next
Msgbox incRement 'Number of Ts are Displaying 5
Msgbox blnFlag

Is This Answer Correct ?    0 Yes 0 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

How to associate shared object repository to test in qtp?

505


What is system testing and what are the different types of tests you perform in system testing?

601


What is the syntax to call one action in another?

552


Explain how you can delete excel file in qtp?

592


What are table and db checkpoints?

588






When I click on a link in web page.Link should open in new window.can anyone please let me know the script for this ---Koti

2491


How to run a test using quicktest professional (qtp)?

544


Hi! Using Descriptive Programming How do we get Parent object for an object by writing script(DP). Say, i want to get a parent object for a "Link" in a web page by writing script in Descriptive Programming.

2103


what are all the fileds present in object repository?

1563


what is run-time data?

1697


I want to know can we integrate visual source safe tool with QTP and QC for our version controlling process? WE know QTP and QC 10.0 version is having the version control inbuilt in it but I want to know the merits and demerits of the inbuilt version control tool and the visual source safe tool using QTP and QC.

2467


Can any suggest me what is exposure testing?

1378


Dis advantages of XML checkpoint ?

1579


How may types of defects identify application or your currently working application?pls give me answer..

1517


What is active screen?

564