write the vbscript code to print the following pattern
:-
1 + (1 + 2)
+(1+2+3).....
Answer / sandeep chitta
msgbox "Type the number of terms in a pattern:"
dim x
x=inputbox("type the no of terms")
c=""
p=0
for i=1 to x
for j=1 to i
p=p+j
next
c=c&p&" "
p=0
next
msgbox c
Is This Answer Correct ? | 3 Yes | 0 No |
How to Check if a string is alphanumeric or not using VB Script
Hi, My name is satish kumar dega I am learing QTP I have one doubt. I need to count the radio buttons in a particular page. In QTP how to write descriptive progming and how I will get all the radiobuttons count.In a paricular page having two WebRadioGroups under each group having 3 radiobuttons.I need to count all the radio buttons could you plz help me regarding this one
write a vb script to check equal two 2*2 matrix
how to use the GetTickCount() properly and what is that procedure for?
Keep all the contract numbers in a array and make a loop . Example:12134,5678,91011,1214125 are contract numbers.
Can Any one suggest how we connect QTP and Mainframe and do validation from Mainfram screen
How to write a reusable function for testing an "Button" Objects in a page without passing the page name to a function? (Think if page names are dynamic and doesn't have any pattern matching between each page). Send me code which works in QTP 9.2.....
How to change winform look?
write the vbscript code to print the following pattern :- 1 + (1 + 2) +(1+2+3).....
In QTP one function can return more than one value?
can everyone explain this code Private Sub DrawRect(rectSource As RECT, lngColour As Long) Line (rectSource.Left, rectSource.Top)-(rectSource.Left, rectSource.Bottom), lngColour Line (rectSource.Left, rectSource.Top)- (rectSource.Right, rectSource.Top), lngColour Line (rectSource.Right, rectSource.Bottom)- (rectSource.Right, rectSource.Top), lngColour Line (rectSource.Right, rectSource.Bottom)- (rectSource.Left, rectSource.Bottom), lngColour End Sub
display 1 to 9 in a 3*3 matrix in vbscript