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?
Answers were Sorted based on User's Feedback
Answer / chivukula.kumar
'Try this Code in Only MS-Excel
'After opened should be press Alt+F11
'select and double click the ThisWoorkbook in VBA Project
leftside of application
' paste this code in that
Private Sub Workbook_Open()
Call add(1000, 20000, c)
Call subb(c, 20000)
End Sub
'Creation of Fun1 and Fun2(add and subb)
Function add(a, b, c)
a = a + b
c = a
MsgBox c
End Function
Function subb(c, d)
sb = c - d
MsgBox sb
End Function
Is This Answer Correct ? | 10 Yes | 3 No |
Answer / sangee
Call add(40,20,c)
Call subs(c,10)
Function add(a,b,c)
c=a+b
msgbox c
End Function
Function subs(c,d)
e=c*d
msgbox e
End Function
Is This Answer Correct ? | 6 Yes | 2 No |
Answer / siri
'vbscript
dim a:a=20
dim b:b=30
dim d
d=add(a,b)
call subtract(d)
function add(a,b)
dim c
c=a+b
add=c
end function
function subtract(d)
dim f:f=10
dim e
e=d-f
msgbox e
end function
Is This Answer Correct ? | 6 Yes | 3 No |
Answer / siri
'vbscript
'create two functions
dim a,b,d
a=20,b=30
dim c
d=add(a,b)
msgbox d
call subtract(d)
function add(a,b)
dim c
c=a+b
add=c 'add is the function name:this statetment can
return c value
end function
function subtract(c)
dim f,e
f=20
e=d-c
msgbox e
End function
Is This Answer Correct ? | 6 Yes | 5 No |
Answer / 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 |
Answer / saahasikan
Please tell me how to write and call functions in classic ASP
Is This Answer Correct ? | 0 Yes | 1 No |
Explain the tristate constants in vbscript?
why variable name should not exceed 255 characters?
what do you mean .ota mobile format
what is the differance between BYVAL,BYREF?
How will you check that a variable is an array in vbscript?
Is VB Script Case sensitive or Case insensitive?
accept an email id & validate it .email id should not exceed 25 characters the mail id should contain 3 characters excluding domain name,@ and .(dot) the last 3 characters of the domain should be net,com or org
Set srchobj=Description.Create() srchobj("type").value="text" srchobj("name").value="q" srchobj("html tag").value="input" browser("micclass:=google").Page("micclass:=google").webedit (srchobj).Set "qtp" what's wrong in my code pls tell me ? the above code working fine and i got my result pass,now i am trying to run the program it shows general run time error why?pls help me i am in learning stage ?
What are class events?
What are the differences between sub procedures and function procedures?
What are keywords in the vbscript language?
i need to login to my yahoo accoutnt using VB Script, automating the operation of webobjects, even launching of IE. How?