Public Function IsSpreadSSFile( _
   ByVal fileName As String _
) As Boolean

Dim instance As FpSpread
Dim fileName As String
Dim value As Boolean
 
value = instance.IsSpreadSSFile(fileName)

public bool IsSpreadSSFile( 
   string fileName
)

bool b;
FarPoint.Win.Spread.FpSpread fpSpread1 = new FarPoint.Win.Spread.FpSpread();
FarPoint.Win.Spread.SheetView shv = new FarPoint.Win.Spread.SheetView();
fpSpread1.Location = new Point(10, 10);
fpSpread1.Height = 200;
fpSpread1.Width = 400;
Controls.Add(fpSpread1);
fpSpread1.Sheets.Add(shv);
b = fpSpread1.IsSpreadSSFile(Application.StartupPath + "\\data.ss6");
label1.Visible = true;
label1.ForeColor = Color.Red;
if (b == true)
{
     fpSpread1.OpenSpreadFile(Application.StartupPath + "\\data.ss6", 0);
     label1.Text = "Is the file a Spread file = " + b.ToString();
}

Dim b As Boolean
Dim fpSpread1 As New FarPoint.Win.Spread.FpSpread()
Dim shv As New FarPoint.Win.Spread.SheetView()
fpSpread1.Location = New Point(10, 10)
fpSpread1.Height = 200
fpSpread1.Width = 400
Controls.Add(fpSpread1)
fpSpread1.Sheets.Add(shv)
b = fpSpread1.IsSpreadSSFile(Application.StartupPath & "\data.ss6")
Label1.Visible = True
Label1.ForeColor = Color.Red
If b = True Then
     fpSpread1.OpenSpreadFile(Application.StartupPath & "\data.ss6", 0)
     Label1.Text = "Is the file a Spread file = " & b.ToString()
End If