Visual Basic 6
Funktionsförfaranden
Sök…
Introduktion
Funktion är en serie uttalanden som bifogas uttalanden "Funktion" och "Slutfunktion".
Funktionen utför en aktivitet och returnerar kontrollen till den som ringer. När den returnerar kontrollen returnerar den också ett värde till den ringande koden.
Du kan definiera en funktion i en klass, struktur och modul. Som standard är det offentligt. Det betyder att du kan ringa det var som helst i din applikation som har tillgång till klassen, strukturen eller modulen där du definierade den.
Syntax
- [Modifiers] Funktionsnamn_Of_The_Function [(Arg_List)] Som Return_Type
- [Statements]
- Avsluta funktion
Anmärkningar
- De två funktionsmodifierarna som används i dessa exempel är offentliga och privata. Denna modifierare definierar omfattningen av funktionen.
- Funktioner med privat räckvidd kan endast anropas från källfilen där de definierades. I vårt fall kan det kallas med i modulen. Och kan inte kallas utanför modulen.
- Funktioner med allmän räckvidd kan kallas både utanför och inuti modulen. Vi kan helt enkelt säga "Vi kan kalla det var som helst i programmet".
- Standardmodifieraren för funktionen är offentlig.
- Som standard skickas funktionsargumenten med referens (i ett separat ämne förklaras detta i detalj).
Skapa och ringa en funktion
Detta exempel med standard EXE-projekt med tillägg av en modulfil.
- Skapa ett nytt "standard EXE" -projekt. Så här kommer ett formulär att läggas till i projektet som standard.
- Lägg till en modulfil till projektet
- Placera en kommandoknapp på formuläret
- Skapa kommandoknapp Klicka på Event.
Modulkod
Skapade två funktioner i modulen. Den ena är en offentlig funktion (FnAdd). Det krävs två heltalargument val_1 & val_2. Det returnerar ett heltal. Denna funktion lägger till de två argumenten och returnerar värdet till den som ringer. Innan tillägget genomgår de två argumenten en process i en annan funktion. Vilket är en privat funktion. Egenskaper / regler för den offentliga och privata funktionen som förklaras i avsnittet Kommentarer.
Public Function FnAdd(val_1 As Integer, val_2 As Integer) As Integer
'Calling private function
val_1 = FnMultiplyBy5(val_1)
'Calling private function
val_2 = FnMultiplyBy5(val_2)
'Function return statement
FnAdd = val_1 + val_2
End Function
Nedan visas den privata funktionen i modulen. Det tar ett heltalsargument val. Det returnerar ett heltal. Denna funktion multiplicerar ett värde 5 med argumentet och returnerar resultatet till den som ringer.
Private Function FnMultiplyBy5(Val As Integer) As Integer
'Function return statement
FnMultiplyBy5 = Val * 5
End Function
Formkod
Klicka på Händelse i kommandoknappen. Här kallar vi modulen Offentlig funktion "FnAdd"
Private Sub Command1_Click()
Debug.Print FnAdd(3, 7)
End Sub
Resultat i det omedelbara fönstret
50