Sub ClearTable() を宣言します
ハッシュテーブルのデータを消去します。
例:
#include "HashTable.bi"
MHashTemplate(Zstring、Zstring)
Dim As THASHTABLEzstringzstring Ptr pTable = New THASHTABLEzstringzstring
pTable-> insert( "Key0", "Value1")
pTable-> insert( "Key1", "Value2")
pTable-> insert( "Key2", "Value3")
?* pTable-> find( "Key0")
?* pTable-> find( "Key1")
?* pTable-> find( "Key2")
?"クリア"
pTable-> cleartable() 'クリア
pTable-> insert( "Key", "Value")
?* pTable-> find( "Key")
pTable-> cleartable()
pTable-> freetable()
Sleep