University Of Pune Question Paper
P. G. D. C. A. (Semester - II) Examination - 2010
VISUAL BASIC
(New 2008 Pattern)
Time : 3 Hours] [Max. Marks : 70
Instruction :
All questions are compulsory.
Q.1) Give output for the following Section of Code and explain it :
(Any Five) [20]
(a) Dim i as integer, n as integer
do until n = 10
if n < = 0 Then Exit do
n = n – 1
i = i + 1
1oop
Msg Box (“The loop run” &i & “times”)
(b) Dim i as integer
Dim j as integer
for i = 1 to 3
for j = 1 to 5
print “*”
next
i = i + 2
next
(c) Dim dt as Date
dt = dateAdd (“m”, 3, # 12\12\2009#)
print dt
dt = dateSerial (2008, 22, 11)
print dt
(d) Dim arr(7) as integer, n as integer
n = 1
for i = 0 to 6
j = n * n
a(i) = j
print a(i)
n = n + 1
next
(e) Dim j $
print VarType (j)
print TypeName (j)
print Len (j)
(f) Dim a(4) as Integer
Redim a(3)
a(1) = 10
a(2) = 20
a(3) = 10
print a(1) + a(2) + a(3)
Q.2) Explain properties of the following controls : (Any Two) [10]
(a) Checkbox
(b) Listbox
(c) Scrollbar
(d) Textbox
Q.3) Write short notes : (Any Two) [10]
(a) Control Array
(b) Common Dialog Box
(c) Loops used in Visual Basic
(d) Date Functions with example
Q.4) Solve any three from the following : [30]
(a) Write a code to accept 15 numbers from user, to find out
Maximum, Minimum and Average of them. (Use Array)
(b) Create a form with one textbox and one timer. After every two
seconds the textbox background colour will change to
Red/Green/Blue continuously.
(c) Write a VB Code to accept Name and Password from user, when
the command button “Login” is clicked, display “Hello! Friends”
message if user name and password is correct, else display
“Sorry, wrong password entered”.
(d) Accept two numbers from user and print all odd and even
numbers between them.
P. G. D. C. A. (Semester - II) Examination - 2010
VISUAL BASIC
(New 2008 Pattern)
Time : 3 Hours] [Max. Marks : 70
Instruction :
All questions are compulsory.
Q.1) Give output for the following Section of Code and explain it :
(Any Five) [20]
(a) Dim i as integer, n as integer
do until n = 10
if n < = 0 Then Exit do
n = n – 1
i = i + 1
1oop
Msg Box (“The loop run” &i & “times”)
(b) Dim i as integer
Dim j as integer
for i = 1 to 3
for j = 1 to 5
print “*”
next
i = i + 2
next
(c) Dim dt as Date
dt = dateAdd (“m”, 3, # 12\12\2009#)
print dt
dt = dateSerial (2008, 22, 11)
print dt
(d) Dim arr(7) as integer, n as integer
n = 1
for i = 0 to 6
j = n * n
a(i) = j
print a(i)
n = n + 1
next
(e) Dim j $
print VarType (j)
print TypeName (j)
print Len (j)
(f) Dim a(4) as Integer
Redim a(3)
a(1) = 10
a(2) = 20
a(3) = 10
print a(1) + a(2) + a(3)
Q.2) Explain properties of the following controls : (Any Two) [10]
(a) Checkbox
(b) Listbox
(c) Scrollbar
(d) Textbox
Q.3) Write short notes : (Any Two) [10]
(a) Control Array
(b) Common Dialog Box
(c) Loops used in Visual Basic
(d) Date Functions with example
Q.4) Solve any three from the following : [30]
(a) Write a code to accept 15 numbers from user, to find out
Maximum, Minimum and Average of them. (Use Array)
(b) Create a form with one textbox and one timer. After every two
seconds the textbox background colour will change to
Red/Green/Blue continuously.
(c) Write a VB Code to accept Name and Password from user, when
the command button “Login” is clicked, display “Hello! Friends”
message if user name and password is correct, else display
“Sorry, wrong password entered”.
(d) Accept two numbers from user and print all odd and even
numbers between them.
0 comments:
Pen down your valuable important comments below