How can we return a value from User Defined Function ?
For Eg. we have 2 functions. In Fun1 i am getting 2 values
(a,b) and i am addding those 2 and storing in to another var
(c). Now i want to pass that var(c) to another function
(fun2). What will be the script?
- 6 Answers
- 20182 Views
- Nous, I also Faced
- E-Mail Answers
Answer Posted / varun
dim a,b,c
fun1 a,b,c
fun2 c
msgbox("done")
sub fun1(a,b,c)
a = cint(inputbox("first number"))
b = cint(inputbox("second number"))
c = a + b
End sub
sub fun2(c)
msgbox(c)
end sub
| Is This Answer Correct ? | 2 Yes | 1 No |
Post New Answer View All Answers
Write a test case using Test if the images,a particular test exists,check if the page links match,page response is within a certain range,parameterization of the test,the test should comprise of actions,the test should use a custom function,the test should use global repository
What is the output of a + b in vbscript if a = 5 and b = 10?
Out of the different type of operators, which are evaluated first and last in the vbscript language?
Which function is used in the vbscript language to convert the specified expression into a date type value?
What purpose does ‘on error resume next’ serves?
Write a Script for ATM in QTP
Dear All, I am geting below IE error whilie executing the QTP scripts in Batch mode "Internet Explorer has encountered a problem and needs to close. We are sorry for the inconvenience." can any one suggest me how to resolve this issue . Thanks Balaji
What is sql loader? Explain the files used by sql loader to load file?
write any ttest cases using check points and parameterization
Explain about tristate constants in vbscript?
In what way program "hello world" you can write in vbscript?
What is the event handling in vbscript?
Explain the adodb.stream class?
What is Procedure or Subroutine in VB Script?
Sub link() Dim k As Integer Dim rand As Integer Dim URL As String Dim foldernum As Integer Dim folderstring As String Dim filenum As Integer Dim filestring As String k = 1 'for AC Numbers For i = 11 To 40 foldernum = 0 foldernum = 1000 + i folderstring = CStr(foldernum) folderstring = Mid(folderstring, 2, 3) folder = "ac" & folderstring 'folderstring = Sheets(2).Cells(i, 1) ' for Number of Random files For j = 1 To 10 rand = Int(Rnd * (200 - 1) + 1) filenum = 0 filenum = 1000 + rand filestring = CStr(filenum) filestring = Mid(filestring, 2, 3) 'URL = "http://ceobihar.nic.in/PSCDROM/ac" & folderstring & "/i" & folderstring & "0" & filestring & ".pdf" URL = "http://www.elections.tn.gov.in/pdfs/dt1/" & folder & "/" & folder & filestring & ".pdf" ' URL =http://www.wb.nic.in/wbeco/EROLLS/PDF/English/A001/a0010105 .pdf Cells(k, 1) = folderstring Cells(k, 2) = folder Cells(k, 3) = filestring Cells(k, 3) = URL k = k + 1 Next j Next i End Sub plz define it
