public void GetInfo_WallFoundation(WallFoundation wallFoundation)
{
    string message = "Wall Foundation : ";

    // Get Analytical model
    if (null != wallFoundation.GetAnalyticalModel())
    {
       message += "\nAnalytical model : " + wallFoundation.GetAnalyticalModel();
    }

    // Get Footing type name
    Document doc = wallFoundation.Document;
    message += "\nFoundation type name is : " + doc.GetElement(wallFoundation.GetTypeId()).Name;

    TaskDialog.Show("Revit",message);
}

Public Sub GetInfo_WallFoundation(wallFoundation As WallFoundation)
   Dim message As String = "Wall Foundation : "

   ' Get Analytical model
   If wallFoundation.GetAnalyticalModel() IsNot Nothing Then
      message += vbLf & "Analytical model : " & wallFoundation.GetAnalyticalModel().ToString()
   End If

   ' Get Footing type name
   Dim doc As Document = wallFoundation.Document
   message += vbLf & "Foundation type name is : " & Convert.ToString(doc.GetElement(wallFoundation.GetTypeId()).Name)

   TaskDialog.Show("Revit", message)
End Sub