タブ付き MDI レイアウトの保存と復元

Private Sub UltraToolbarsManager1_ToolClick(ByVal sender As System.Object, _
  ByVal e As Infragistics.Win.UltraWinToolbars.ToolClickEventArgs) _
  Handles UltraToolbarsManager1.ToolClick
	If e.Tool.Key = "Load" Then
		' ファイル ストリームを作成します。
		Dim fs As FileStream
		Try
			' 指定したファイルを探します。
			fs = New FileStream(System.IO.Path.Combine(Application.StartupPath, _
			  "..\ExtraFiles\TabbedMDILayout.dat"), FileMode.Open)
			fs.Seek(0, IO.SeekOrigin.Begin)
			' レイアウトをファイルからロードします。
			Me.UltraTabbedMdiManager1.LoadFromBinary(fs)
		Catch ex As Exception
		Finally
			If Not fs Is Nothing Then
				' ファイル ストリームを閉じます。
				fs.Close()
			End If
		End Try
	ElseIf e.Tool.Key = "Save" Then
		' ファイル ストリームを作成します。
		Dim fs As New FileStream("TabbedMDILayout.dat", FileMode.OpenOrCreate)
		fs.Seek(0, SeekOrigin.Begin)
		' レイアウトをファイル ストリームに保存します。
		Me.UltraTabbedMdiManager1.SaveAsBinary(fs)
		' ファイル ストリームを閉じます。
		fs.Close()
	End If
End Sub

private void ultraToolbarsManager1_ToolClick(object sender,
  Infragistics.Win.UltraWinToolbars.ToolClickEventArgs e)
{
	if(e.Tool.Key == "Load")
	{
		// ファイル ストリームを作成します。
		FileStream fs = null;
		// ファイルが存在する場合
		if (!File.Exists("C:/TabbedMDILayout.dat"))
			return;
		try
		{
			// 指定したファイルを探します。
			fs = new FileStream(System.IO.Path.Combine(Application.StartupPath,
			  @"..\..\ExtraFiles\TabbedMDILayout.dat"), FileMode.Open);
			fs.Seek(0, SeekOrigin.Begin);
			// ファイルからレイアウトをロードします。
			this.ultraTabbedMdiManager1.LoadFromBinary(fs);
		}
		finally
		{
			if (!(fs == null))
			{
				// ファイル ストリームを閉じます。
				fs.Close();
			}
		}
	}
	else if(e.Tool.Key =="Save")
	{
		// ファイル ストリームを作成します。
		FileStream fs = new FileStream(@"TabbedMDILayout.dat", FileMode.OpenOrCreate);
		fs.Seek(0, SeekOrigin.Begin);
		// レイアウトをファイル ストリームに保存します。
		this.ultraTabbedMdiManager1.SaveAsBinary(fs);
		// Closes the file stream
		fs.Close();
	}
}