Private Sub UserControl_WriteProperties(PropBag As PropertyBag)
    Debug.Print "WriteProperties"
    PropBag.WriteProperty "Caption", Caption, Extender.Name
End Sub

'UPGRADE_ISSUE: (2068) PropertyBag object was not upgraded.
'UPGRADE_WARNING: (6002) UserControl Event WriteProperties is not supported.
Private Sub UserControl_WriteProperties(ByVal PropBag As UpgradeSolution1Support.UpgradeStubs.PropertyBag)
	Debug.WriteLine("WriteProperties")
	'UPGRADE_ISSUE: (2064) UserControl property UserControl1.Extender was not upgraded.
	'UPGRADE_ISSUE: (2064) PropertyBag method PropBag.WriteProperty was not upgraded.
	PropBag.WriteProperty("Caption", Text, Me.getExtender().Name)
End Sub

//UPGRADE_ISSUE: (2068) PropertyBag object was not upgraded.
//UPGRADE_WARNING: (6002) UserControl Event WriteProperties is not supported.
private void UserControl_WriteProperties(UpgradeStubs.PropertyBag PropBag)
{
	Debug.WriteLine("WriteProperties");
	//UPGRADE_ISSUE: (2064) UserControl property UserControl1.Extender was not upgraded.
	//UPGRADE_ISSUE: (2064) PropertyBag method PropBag.WriteProperty was not upgraded.
	PropBag.WriteProperty("Caption", Convert.ToString(Caption), this.getExtender().Name);
}

private void UserControl_WriteProperties()
{
	Debug.WriteLine("WriteProperties");
	Properties.Settings.Default.Caption = this.Name;
}