Sub Expand()
	document.all("Tab1").style.display = "none"
	document.all("Tab2").style.display = "none"
	document.all("Tab3").style.display = "none"
	
	ID = window.event.srcElement.getAttribute("DivID")
	If document.all(ID).style.display = "none" Then
		document.all(ID).style.display = "block"
	Else
		document.all(ID).style.display = "none"
	End If
End Sub