有关半角和全角的问题！

Question

你找到GBK.txt中找出全角字中所有可能半角的字，建一个对应表，
自己查询替换！****************************************************************
Welcome to www.easthot.net (Programer's web)
****************************************************************

Answer 1

把GBK.txt读出来，写到数组中，再找出里面可能是是半角的字写入到响应的 数组中，
使用时到数组中查找，替换吧！

Answer 2

Public Function Fun_strConvSingletoDouble(str_Single As String) As String
    Fun_strConvSingletoDouble = StrConv(str_Single, vbWide)
End Function

Answer 3

GBK.txｔ是什么文件！能不能给一个例子！