replace的用法：replace(整个字符串，要查找的字符串，把要查找的替换成某个字符串）
假如现在一个字符窜是test, myvalue=replace("test","e","love"),这个程序就是把test里的e找到然后替换成love,所以myvalue=tlovest，懂了吗？这里的replace就是查找并替换的意思，Trim(NameKey.Value)是输入的关键字，程序中在这个关键字前后各加了一个空格，然后通过replace把这两个空格再替换成*号，比如现在这个关键字是test,执行完后keys(0)就变成了*test*，其实这个程序等同 keys(0)="*" & Trim(NameKey.Value) & "*".
