RFFace.CalcAverageNormal

Description

Calculates the average normal vector of the face.

Syntax

Function RFFace.CalcAverageNormal(pNormal As RFVector3) As RFErrorCode

The CalcAverageNormal syntax has these parts:

Remarks

• Normal vectors of all adjacent faces along with this face are considered for computing the average normal in reference to the current coordinate system of the parent shell to which the face belongs. To get the normal vector of only this face, use RFFace.CalcNormal method instead.
  

Sample

Dim rfErr As RapidForm.RFErrorCode
Dim fcObj As RapidForm.RFFace

    ' Assign the RFFace interface object
    Set fcObj = RapidForm.Face
    
    ' Pick a face
    Dim pickedID As RFEntityID
    rfErr = RapidForm.SelectTools.PickEntity(RF_PICK_FACE, 1, pickedID)
    
    ' If an error happens, exit the subroutine.
    If rfErr <> RF_SUCCESS Then
        MsgBox RapidForm.Application.GetErrorMessage(rfErr)
        Exit Sub
    End If
    
    rfErr = fcObj.SetID(pickedID)
    
    ' Calculate the average normal vector of the face.
    Dim avgNm As RFVector3
    rfErr = fcObj.CalcAverageNormal(avgNm)