'********************************************** ' Name : ChangeTabTitle ' Purpose : Use DHTML to Change the Tab Title '********************************************** Sub ChangeTabTitle(sTabName, sNewTabTitle) Dim sTabId sTabId = "Tab_" + _ CStr((UIMaster.RUICenter.Form.Tabs(sTabName). _ Ordinal - 2)) UIMaster.documentCenter. _ GetElementById(sTabId).innerText = sNewTabTitle End Sub