程序段38
　　這段程序判斷存儲是否在指定的子存儲，若存在就刪除它的名稱，然后
再存回去。

int i
boolean exist
stg_first.MemberExists("subl",exist)
if exist then
i=stg_first.MemberDelete("subl")
if i=0 then stg_first.Save( )  //若刪除成功，就存回 OLE 存儲并顯示信息
end if