'弹出对话框确定图层保存的路径 CommonDialog1。DefaultExt = "tab" CommonDialog1。DialogTitle = "Pick a location for your layer" CommonDialog1。
Filter = "MapInfo Tables (*。tab)|*。tab" CommonDialog1。ShowSave If Len(CommonDialog1。Filename) = 0 Then Exit Sub End If Dim lyr As Layer Dim friendlyName As String '从文件名中删除。
tab扩展名 friendlyName = Left$(CommonDialog1。FileTitle, _ Len(CommonDialog1。FileTitle) - 4) On Error GoTo CreateErr '创建新图层 Set lyr = Map1。
Layers。CreateLayer(friendlyName, _ CommonDialog1。Filename) lyr。Editable = True 'UpdateControls True Exit SubCreateErr: MsgBox "无法创建图层: """ & friendlyName & """ 于： """ & _ CommonDialog1。
Filename & """: " & Error
查看原帖>>。
答：显示的这个只是目前可操作图层。是你在选择打开时背景是进来的，该图层是后选的。如果是你一次选中两个图片，它们就会同时在图层显示了。详情>>
问：手机被我玩得好烫好烫了，有什么办法能让数码产品的电池长时间运行也不会发烫啊。。。
答：那是cpu中央处理器在告诉运行才这样的，玩游戏都会发热的。给个好评哟亲详情>>
答：数码照片是什么含义呢详情>>
问：各位电子产品高手。请问三星i9150手机能升级到i9158吗？
答：不可以的。 诚心为你解答，给个好评哦亲，谢谢啦详情>>
