产品类库

1、暂时只有微软的2个，一个是WinRT的WordsSegmenter，一个是IWordBreaker

前者封装成了GetWordBreak，后者封装成了GetWordBreak2

WinRT好像是Win8之后才能用的，IWordBreaker依赖系统的Windows Search服务

2、使用样例

#If VBA7 Then
Declare PtrSafe Function GetWordbreak Lib "loquat.segment.x64.dll" (ByVal str As Variant) As String()
Declare PtrSafe Function GetWordbreak2 Lib "loquat.segment.x64.dll" (ByVal str As Variant) As String()
#Else
Declare Function GetWordbreak Lib "loquat.segment.x86.dll" (ByVal str As Variant) As String()
Declare Function GetWordbreak2 Lib "loquat.segment.x86.dll" (ByVal str As Variant) As String()
#End If

Sub test()
    Dim s As String
    Dim arr() As String

    ChDir "C:\\\\\\\\Users\\\\\\\\Administrator\\\\\\\\Desktop\\\\\\\\Build"  '定位到你的dll路径
    s = "广州大学大学生的大学生活"

    arr = GetWordbreak(s)
    debug.print join(arr)
    arr = GetWordBreak2(s)
    debug.print join(arr)
End Sub

3、下载地址

 跳转下载