Declare Function STRINGVer Lib "STRING.DLL" (ByVal hwnd As Integer) As Integer
Declare Function ReverseStr Lib "STRING.DLL" (ByVal lpstrDATA As String) As Integer
Declare Function FindRightChar Lib "STRING.DLL" (ByVal lpstrDATA As String, ByVal iChar As Integer) As Integer
Declare Function FindFirstNIS Lib "STRING.DLL" (ByVal lpstrDATA As String, ByVal lpstrSUBSET As String) As Integer
Declare Function LexSortStr Lib "STRING.DLL" (ByVal lpstrSTRING1 As String, ByVal lpstrSTRING2 As String, ByVal iNofC As Integer, ByVal iCase As Integer) As Integer
'user declares
Declare Function GetTickCount Lib "user" () As Long