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


No Answer is Posted For this Question
Be the First to Post Answer

Post New Answer

More VB Script Code Interview Questions

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

1 Answers  


how to use the GetTickCount() properly and what is that procedure for?

0 Answers  


How to change winform look?

0 Answers  


How to Check if a string is alphanumeric or not using VB Script

1 Answers  


what does mbln in mblnrects mean? my boolean?

0 Answers  






Can Any one suggest how we connect QTP and Mainframe and do validation from Mainfram screen

0 Answers   Polaris,


Hi All, Do anyone have a solution/script for Uploading the Excel file in Local drive to QC Resources folder..?? TIA Dwaraka.

0 Answers   NHS,


what is the full form of dim?

5 Answers  


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.

4 Answers  


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

0 Answers  


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?

0 Answers   Wipro,


write the vbscript code to print the following pattern :- 1 + (1 + 2) +(1+2+3).....

1 Answers  


Categories
  • PHP Code Interview Questions PHP Code (33)
  • JSP Code Interview Questions JSP Code (6)
  • ASP Code Interview Questions ASP Code (5)
  • CGI Perl Code Interview Questions CGI Perl Code (3)
  • JavaScript Code Interview Questions JavaScript Code (63)
  • VB Script Code Interview Questions VB Script Code (20)
  • Shell Script Code Interview Questions Shell Script Code (31)
  • Python Code Interview Questions Python Code (34)
  • WinRunner Code Interview Questions WinRunner Code (1)
  • HTML DHTML XHTML Code Interview Questions HTML DHTML XHTML Code (13)
  • XML Interview Questions XML (43)
  • Scripts_Markup Code AllOther Interview Questions Scripts_Markup Code AllOther (5)