http://www.foxtable.com/help/topics/0916.htm
Dim tv As WinForm.TreeViewtv =e.Form.Controls("TreeView1")tv.ExpandAll()