Procedure in vb in hindi | procedure in visual basic

Procedure in vb in hindi | procedure in visual basic


Procedure in vb in hindi | procedure in visual basic - 

Visual basic में Procedure का महत्वपूर्ण कार्य होता है । Procedure एक ऐसा block code होता है। जिसके द्वारा विशेष कार्य किया जाता है।

Visual basic में सभी events की coding Procedure  के अंदर की जाती है। ये Procedure Visual basic  में पहले से ही मौजूद है। इन्हें हम event Procedure  भी कहते हैं। Visual basic में प्रत्येक control की अपनी स्वयं की Procedure होती है। बिना Procedure के Visual basic में coding
करना सम्भव नहीं है।

एक Procedure के अंदर variable, methods, properties, object तथा function का इस्तेमाल किया जाता है।

Types of Procedure in vb -

1. Subroutines
2. Function

(1) Subroutines :-

Subroutines ऐसी procedure जो visual basic की Bydefault procedure होती है जिसमें code statement Sub/End sub के मध्य लिखा जाता है। यह user को किसी तरह का value return नहीं करती है तथा इसे अन्य procedure के द्वारा call नहीं कराया जा सकता है।

Syntex :- 
Private/Public/Static/Subprocedure name (argulist) statement

उदाहरण-
Private Sub Command1_Click ()
Dim x as integer.
............x = msgbox "This is procedure"
.............
End Sub.

यह एक ऐसी subroutine procedure है जिसका स्कोप private है तथा subkeyword इसके
sub-routine होने का प्रमाण है तथा command1_ सम्बन्धित Controls का procedure होने को दर्शाता
है तथा Click() इस procedure का event है जो mouse द्वारा किया जाएगा ।


(2) Function :- 

Function subroutine के ही समान होता है लेकिन function के द्वारा value को return कराया जा सकता है। function, function keyword के द्वारा परिभाषित होता है। इसे user directly code editor window में keyboard के द्वारा type करके अथवा option menu के Add procedure dailogbox में function का नाम, scope, तथा event दे कर भी create कर सकता है।

Syntex :-
Private/Public/Function Function_name (argulist) as datatype
Function name=Expression.
End Function.

उदाहरण :-
Function का प्रयोग करके दो Integer अक्षरों का जोड़ ज्ञात करो-

Private fun add() 
Dim a, b, c As integer
a=val (Text1. text)
b=val (Text2. text)
c= a+b
Text3. text=c
End function.

Private.     Sub Command1_click0
                  Dim x as integer
                  x=add ()
                  End sub.

Post a Comment

0 Comments