Folge 3 – Unterschied SUB / FUNCTION

In dieser Episode geht es um den Unterschied zwischen einer Sub und einer Function.

Und an dieser Stelle der Code der im Makro vorhanden ist.

Option Explicit
Dim intFlaeche As Integer
Sub main()
    Dim swApp As SldWorks.SldWorks
    Set swApp = Application.SldWorks
    Debug.Print "Vor Zuweisung: " & intFlaeche
    'intFlaeche = flaeche(5)
    flaeche2 6
    Debug.Print "Nach Zuweisung: " & intFlaeche
End Sub
Function flaeche(intSeitenlaenge As Integer)
    flaeche = intSeitenlaenge * intSeitenlaenge
End Function
Sub flaeche2(intSeitenlaenge As Integer)
    intFlaeche = intSeitenlaenge * intSeitenlaenge
End Sub
Code-Sprache: VB.NET (vbnet)
Option Explicit
Sub main()
    Dim swApp As SldWorks.SldWorks
    solidworks_object swApp
End Sub
Sub solidworks_object(swApp As SldWorks.SldWorks)
    Dim swApp As SldWorks.SldWorks
    Set swApp = Application.SldWorks
End SubCode-Sprache: VB.NET (vbnet)

Schreibe einen Kommentar

Deine E-Mail-Adresse wird nicht veröffentlicht. Erforderliche Felder sind mit * markiert