MYRADIO168'S Blog

Private Sub RichTextBox_Click()
    '
    On Error Resume Next
    '
    Dim i, n, ss
    Dim SearchText As String
    '

More...

WOR文件转换成GST文件
 

在csdn社区里，答案是：

1.先打开wor  
2."工具"->"工具管理器"  
3.添加"Mapx   Geoset   Utility"  
4.然后使用它的时候，会有“Save   Mapx   Geoset..."

Private Const OFFSET_4 = 4294967296#                                            '&h100000000 的数值
Private Const MAXINT_4 = 2147483647                                             '整型数据所能表示的最大正数值 (&h7fffffff)
Private Const Bit_32 = 2147483648#                                              '&h80000000 的正整数形式
Private Const DELTA = &H9E3779B9                                                'TEA算法的DELTA值

More...