Example
The following example creates a workbook with three sheets. When the user changes the active sheet, the SheetChanged event occurs, and the old and new sheet indices are displayed.
C++
#include "tchar.h"
BOOL CAboutDlg::OnInitDialog()
{
CDialog::OnInitDialog();
// Set number of sheets
m_Spread.SetSheetCount(3);
}
void CAboutDlg::OnSheetChangedFpSpread1(short OldSheet, short NewSheet)
{
CString buffero;
CString buffern;
CString message;
// Convert variables to show in message box
buffero.Format(_T("%x"), OldSheet);
buffern.Format(_T("%x"), NewSheet);
message =_T("Old ") + buffero + _T(" New ") + buffern;
::MessageBox(NULL, (LPCTSTR)message, "message body", MB_OK);
}
Visual Basic
Private Sub Form_Load()
' Set number of sheets
fpSpread1.SheetCount = 3
End Sub
Private Sub fpSpread1_SheetChanged(ByVal OldSheet As Integer, ByVal NewSheet As Integer)
' Show old and new sheet numbers in immediate window
Debug.Print OldSheet, NewSheet
End Sub