Answer / hariharasudhan s

str1="1,1,2,2,3,3,4,2"
A = Split(str1,",")

For i = 0 to ubound(A)
IF A(i) = "1" then
Count1 = Count1 + 1
Elseif A(i) = "2" then
Count2 = Count2 + 1
End if
Next

Msgbox Count1
Msgbox Count2

Answer / sisira

str1="1,1,2,2,3,3,4,2"
l=len(str1)
for i=1 to l
if mid(str1,i,"1")="1" then
count1=count1+1
elseif mid(str1,i,"1")="2" then
count2=count2+1
end if
next
msgbox count1
msgbox count2

Answer / rajesh

str= "1,1,2,2,3,3,4,2"
arr = split(str,",")
for i =0 to ubound(arr) step 1
if arr(i) = "1" then
counter = counter + 1
elseif arr(i) = "2" then
counter1 = counter1 + 1
elseif arr(i) = "3" then
counter2 = counter2 + 1
elseif arr(i) = "4" then
counter3 = counter3 + 1


end if
next
msgbox "No of 1's :- " & counter
msgbox "No of 2's :- " & counter1
msgbox "No of 3's :- " &counter2
msgbox "No of 4's :- " &counter3

While writing script using For Next Statement in QTP, I try defining the variable in Lib File I am getting syntax error whereas if I use the variable in script file, the script works fine. Can anyone help me in finding the reason behind this?. E:g Dim intStartRow (Define in Lib File----- say abc.vbs) Dim intRow (If I define this variable in Lib file I am getting Syntax error where as if I define in the script file ---- say xyz.mts the script works fine) IntStartRow=2 For intRow = intStartRow to xlWrksht.UsedRange.Rows.Count ‘Some Code here Next

1 Answers  

---

hello...any one tell me , where can i get company email id.. actually i am searching on testing... in my CV i put 3+ exp.. but all companies are asked company email id.. please provide solution for that... thanx in advance...

9 Answers   HDFC,

---

How to capture a window in QTP?

0 Answers   IBM, Mphasis,

---

What is wrong in my code?

3 Answers  

---

what is Property......End Property loop? how to write sript for it in QTP

0 Answers  

---

hi i have one doubt i have 4 yrs exp in testing and iam working one mnc in north but i have completed my degree correspodene is the companies are accept in south side some people are tellig they won't agree but i need correct answer plz let me know which companies are taking and not taking thanks in advance

8 Answers  

---

What are the enhancements u did after recording ur script?

1 Answers  

---

Explain the concept of object repository and how QTP recognizes objects?

0 Answers  

---

What is the Diff between Image check-point and Bit map Check point?

3 Answers   Ordain Solutions,

---

Can a function return a dictionary object?

2 Answers   CG, Semantic Space,

---

Which scripting language used by quicktest professional?

0 Answers  

---

How to creating an output value using quicktest professional (qtp)?

0 Answers  

---