Hi, i have a string like "INDIA". I need to display this
string vertically in Msgbox?

Answers were Sorted based on User's Feedback



Hi, i have a string like "INDIA". I need to display this string vertically in Msgbox?..

Answer / lakshmi

Dim Str,I,J,Temp
Str="INDIA"
For i=1 to Len(Str)
J=Mid(Str,i,1)
Temp=Temp&J&VbCrlf
Next
Msgbox Temp


Please let me know if u any other answer which is simplest
than this.

Is This Answer Correct ?    10 Yes 2 No

Hi, i have a string like "INDIA". I need to display this string vertically in Msgbox?..

Answer / mandar

Dim Str,I,J,Temp
Str="INDIA"
For i=1 to Len(Str)
J=Mid(Str,i,1)
Temp=Temp&J&Vbnewline
Next
Msgbox Temp

Is This Answer Correct ?    2 Yes 0 No

Hi, i have a string like "INDIA". I need to display this string vertically in Msgbox?..

Answer / dinesh1433

str="INDIA"

For i=0 to len(str)

x=Mid(str,i,1)
Print x&VBCRLF

next

Is This Answer Correct ?    0 Yes 0 No

Post New Answer

More QTP Interview Questions

Explain the check points in quicktest professional (qtp)?

0 Answers  


HI, Based On The Information Below Write A Data Driven test Script Edit Box 1 Should take Value From Num1 Column Edit Box 2 Should take Value From Num2 Column Click On Add Button, Get The Value Of Exp res Column, Get Value From Actual Result Edit Box , Compare Two Values, Write Pass / Fail Value Into Result Column Thanks In Advance... Kavitha Input.Xls Num1 Num2 Exp res Act res Result 10 30 40 40 Pass 50 40 90 90.5 - - - - - - - - - - - - - - - -

5 Answers   UHG,


what is defination of intergration testing?

2 Answers  


How to create an Action Template?

1 Answers  


HI, Anybody can explain Automation Test Framework...and wht do we do before start of Automation.....

5 Answers   Polaris, Siemens,






Hi I have created a table in the MS access database. I want to access the table in this database through QTP. The code is given below. The code is not working.The following error is displayed "Data source name not found and no default driver specified". Any one can correct the code. Thanks in advance. Dim dbconnection, rs Dim ca, sname Set dbconnection = createobject("ADODB.Connection") Set rs = createobject("ADODB.Recordset") dbconnection.open "DSN = MS Access Database","", "" rs.open "select * from Research", dbconnection rs.movefirst If rs.EOF <> True AND rs.BOF<> True then ca = rs("order_number") sname = rs("customer_number") rs.movenext msgbox ca msgbox sname End If

1 Answers  


What is the use of text output value in quicktest professional (qtp)?

0 Answers  


Hi guys can any plz help me how to send fax in sample Flight Appication

1 Answers  


How will you compare keyword and expert view?

0 Answers  


how can we handle errors other than using recovery scenerios in qtp

0 Answers  


can u pls explain me About Driver script.

4 Answers  


Can we run test with out adding object in object repository? How it is possible?

0 Answers  


Categories