how to write basic programs in VB Script like addition,
multiplication?
Answers were Sorted based on User's Feedback
Answer / vaibhav
function vaibhav x,y
dim x,
dim y,
dim z,
z=x*y
msgbox z
| Is This Answer Correct ? | 116 Yes | 59 No |
Answer / dev
1.addition
DIM A=10
DIM B=20
DIM C
DIM D
C=A+B
MSGBOX C (here output is 1020)
C=INT A+INT B
MSGBOX C (HERE OUTPUT IS 30)
D=A*B
MSGBOX D (OUTPUT IS 200)
| Is This Answer Correct ? | 84 Yes | 54 No |
Answer / chandra
'addition
DIM A
A=INPUTBOX("enter a val")
DIM B
B=INPUTBOX("enter b val")
DIM C
DIM D
C=A+B
MSGBOX C (here output is 1020)
C=INT (A)+INT (B)
MSGBOX C '(HERE OUTPUT IS 30)
D=A*B
MSGBOX D '(OUTPUT IS 200)
| Is This Answer Correct ? | 50 Yes | 29 No |
Answer / rohit yadav
private sub command 1_click()
text3.text=val(text1.text)+val(text2.text)
end sub
| Is This Answer Correct ? | 26 Yes | 10 No |
Answer / ramesh
dim a,b,c,d
a=inputbox ("enter the value a: ")
b=inputbox ("enter the value b: ")
c=cint(a)+ cint (b)
d=a*b
msgbox c
msgbox d
| Is This Answer Correct ? | 13 Yes | 3 No |
Answer / chandan
'script for adding two numbers
option explicit
dim num1,num2,result
num1=200
num2=300
result=num1+num2
msgbox result
| Is This Answer Correct ? | 11 Yes | 8 No |
Answer / venkat
Dim a
Dim b
a=inputbox("enter a value")
b=inputbox("enter b value")
Dim c
c=int(a)+int(b)
Msgbox c
| Is This Answer Correct ? | 6 Yes | 3 No |
Answer / vani
dim a,b,sum,mul
a=cdbl(inputbox("enter a?"))
b=cdbl(inputbox("enter b?"))
sum=a+b
mul=a*b
msgbox sum
msgbox mul
| Is This Answer Correct ? | 5 Yes | 4 No |
Answer / pravati
Call sum(x,y)
Function sum(x,y)
x=cint(inputbox ("enter a no"))
y=cint(inputbox ("enter a no"))
z=inputbox("enter the value")
Select Case z
Case "+" msgbox x+y
Case "-" msgbox x-y
End Select
End Function
| Is This Answer Correct ? | 1 Yes | 1 No |
How will you get a subset of a array in vbscript?
what does create object actually do when you call it in vbscript?
what is the standards used for writing the script in QTP
What are the differences between Visual Basic, VBA and VBScript? When would it be appropriate to use one as opposed to another?
how to find the textfile in the folder and copy file from one folder to another folder useing parameterigation in QTP
How will you get the smallest subscript of an array in vbscript?
I am running a windows based application.While running the script on QTP ,The Application pop-up an Error Message as "object Disabled" in two different scenarios Scenario 1-->The Application pop-up up a Message for Max Session Reached(as the application is set to hold 2 session and if if crosses the pre-defined limit then the error message pop-up) Scenario 2-->When Network connectivity is disabled the Application screen gets greyed out in colour with no operation possible. Now through Exception handling features in QTP ,we need to do the following For Scenarion 1-->Through Exception handling we need to just accept the Message pop-up in the Application and and resume with the call function as is for Scenario 2--> Through Exception Handling featutes on QTP we need to shut down the client , restart the client and resume the call functions as it is Note: The Application returns an Error Message as "object disabled" in both the cases i.e for pop-up message and when the Apllication getting greyed out due to Network failure how can we enhance the script in such a way that for the same error message retured by the application in two different and how to handle them????
who you define variables and functions in VB?
What is the purpose of regexp object in vbscript?
My questions is while writting descriptve programming, lets take flight reservation. Line1: systemutil.Run "D:\Program Files\Mercury Interactive\QuickTestProfessional\samples\flight\app\flight4 a.exe" dialog("text:=Login").WinEdit("attached text:=Agent Name:").Set "mercury" dialog("text:=Login").WinEdit("attached text:=Password:").Set "mercury" dialog("text:=Login").WinButton("text:=OK").click window("text:=Flight Reservation").Activate window("text:=Flight Reservation").ActiveX ("acx_name:=MaskEdBox").Type "111111" window("text:=Flight Reservation").WinComboBox("attached text:=Fly From:").Select "Frankfurt" window("text:=Flight Reservation").WinComboBox("attached text:=Fly To:").Select "London" window("text:=Flight Reservation").WinButton ("text:=FLIGHT").Click window("text:=Flight Reservation").dialog("text:=Flights Table").WinList("text:=From").Select "13536 FRA 08.00AM LON 08.45AM SR $163.00" window("text:=Flight Reservation").dialog("text:=Flights Table").WinButton("text:=OK").Click window("text:=Flight Reservation").WinEdit("attached text:=Name:").Exist window("text:=Flight Reservation").WinEdit("attached text:=Name:").Set "sagar", Now i m getting the error in the last line. it is not accepting the WinEdit("attached text:=Name:") Please do solve this urgent...! and i want to know how to insert additional properties for an object and which properties we need to select from the object spy.
Mention what is the technology used by vb script?
My Salary is 65000. How Much TDS I have to pay