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?
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
Mention what is vbscript?
Which object is used to work with the database in the vbscript language and what statement is used to create this object?
How to throw an error in vbscript?
How will you convert a string to upper case string using vbscript?
What is the use of the recordset object and which statement is used to create such an object?
Which conditional statement is the most convenient one to use in the case of multiple conditions in the vbscript language?
Does VB/Win make standalone .EXE files?
Is vbscript language a case-sensitive language and what does it mean?
Mention the environments where vbscript could be run?
How will you check that a variable is an array in vbscript?
Which keyword is used to declare a variable in the vbscript language?
How to declare an array in vbscript?
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
There are 5 web pages.write a script to click the button on 4th web page.
What is the output of a + b in vbscript if a = 5 and b = 10?