display 1 to 9 in a 3*3 matrix in vbscript
Answer / sandeep chitta
Dim a(3,3)
p=1
for i=1 to 3
for j=1 to 3
a(i,j)=p
p=p+1
next
next
c=""
for i=1 to 3
for j=1 to 3
c=c&a(i,j)&" "
next
c=c&vbnewline
next
msgbox c
Is This Answer Correct ? | 5 Yes | 1 No |
Hi All, Do anyone have a solution/script for Uploading the Excel file in Local drive to QC Resources folder..?? TIA Dwaraka.
write a vb script to check equal two 2*2 matrix
what is the full form of dim?
How to store the iterations value in some variable/ in excel? Dim objExcel, ObjFolder, objPath, objWorkbook, objSheet, ObjFSo, ObjFolderName, strExcelPath Const xlExcel7 = 39 ObjFolderName = "Testing" & Hour(time()) & Minute(time()) &Second(time()) objPath = "D:\" strExcelPath = objPath & ObjFolderName & "\testing.xls" Set ObjFSo = CreateObject("Scripting.FileSystemObject") Set objFolder = objFSO.CreateFolder(objPath & ObjFolderName) On Error Resume Next Set objExcel = CreateObject("Excel.Application") If (Err.Number <> 0) Then On Error GoTo 0 Wscript.Echo "Excel application not found." Wscript.Quit End If On Error GoTo 0 Set objWorkbook = objExcel.Workbooks.Add() Set objSheet = objExcel.ActiveWorkbook.Worksheets(1) Dim arr1, arr2, arr3 Set outputLines = CreateObject ("System.Collections.ArrayList") arr1 = 123arr2 = 99 arr3 = 10 outputLines.Add arr1 outputLines.Add arr2 outputLines.Add arr3 outputLines.Sort() For Each outputLine in outputLines WScript.Echo outputLine ' how to store this value in excel/ variable? Next objExcel.ActiveWorkbook.SaveAs strExcelPath, xlExcel7 objExcel.ActiveWorkbook.Close objExcel.Application.Quit This above code is working fine but the qs is is there any way to store the sort data in variables / in the excel and how?
how to write a program to accept names and marks of 10 students from the user and display the names and markes of only the passed students. Marks greater than or equal to 35 is considered as pass.
how to manage mlng timer because they don't explain what's it's function?
Can Any one suggest how we connect QTP and Mainframe and do validation from Mainfram screen
what does mbln in mblnrects mean? my boolean?
Keep all the contract numbers in a array and make a loop . Example:12134,5678,91011,1214125 are contract numbers.
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
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.....
write the vbscript code to print the following pattern :- 1 + (1 + 2) +(1+2+3).....