.版本 2 .子程序 _按钮1_被单击 .局部变量 hHash, 整数型 .局部变量 i, 整数型 .局部变量 t, 整数型 .局部变量 t2, 整数型 t ＝ 取启动时间 () hHash ＝ HashTableT_Create (#文本型, #整数型) .计次循环首 (100000, i) HashTableT_Put (hHash, 到文本 (i), 到整数 (i)) .计次循环尾 () t ＝ 取启动时间 () － t t2 ＝ 取启动时间 () .计次循环首 (100000, i) HashTableT_Get (hHash, 到文本 (i)) .计次循环尾 () 信息框 (“10万次存耗时：” ＋ 到文本 (t) ＋ #换行符 ＋ “10万次取耗时：” ＋ 到文本 (取启动时间 () － t2) ＋ #换行符 ＋ “取555的值试试：” ＋ 到文本 (HashTableT_Get (hHash, 到文本 (555))), 0, ) HashTableT_Destory (hHash) .子程序 _按钮2_被单击 .局部变量 哈希表, 哈希表T .局部变量 i, 整数型 .局部变量 t, 整数型 .局部变量 keys, 文本型, , "0" .局部变量 values, 整数型, , "0" .局部变量 count, 整数型 t ＝ 取启动时间 () 哈希表.创建 (#文本型, #整数型) .计次循环首 (100000, i) 哈希表.添加 (到文本 (i), 到整数 (i × 2)) .计次循环尾 () count ＝ 哈希表.取数量 () .计次循环首 (count, i) 哈希表.取值 (到文本 (i)) .计次循环尾 () count ＝ 哈希表.取所有键 (keys) count ＝ 哈希表.取所有值 (values) 信息框 (“添加、取值、取所有键 和 取所有值 总耗时：” ＋ 到文本 (取启动时间 () － t), 0, , )