VBA编译错误，ByRef参数类型不符

写VBA实现计算句子相似度，返回相似度最大的编号，在接受是设定句子列表为Variant，后面遍历列表是，里面的元素需要是String类型，但是不会改代码，刚学，应该怎么改呢

转换下，假设你的 Variant 变量是 a，那么 a & "" 就可以转换为 String 了