MapBasic开发教程.ppt

MapInfo二次开发环境—MapBasic简介;主要内容;一、MapBasic概述;（一） MapBasic的定义 MapBasic是基于桌面地图信息系统软件MapInfo Professional的二次开发和应用的软件包，是一种强健的类Basic编程语言。;（二） MapBasic的主要功能;（三） MapBasic的主要特点;（四） MapBasic集成开发环境和菜单命令; 集成开发环境的组成部分;MapBasic的菜单命令;二、MapBasic基础知识;主要内容;MapBasic包含的头文件;(一)常量与变量;2、变量;例：定义字符串变量和数组变量 Dim str_name As String Dim str_fixed_name As String * 10 Dim num_list(10) As Float str_name = “Jonden” str_fixed_name = “Jonden” ‘实际上Jonden （后面有四个字符） num_list(1) = 17.23 ;定义局部变量Dim语句 语法形式： Dim var_name[,var_name…]As var_type [,var_name[,var_name]As var_type] 其中： var_name:定??的变量名 var_type:变量的类型 例如： Dim var_x As string;定义全局变量Global语句 语法形式： Global var_name[,var_name…]As var_type [,var_name…As var_type…] 其中： Var_name:定义的全局变量名 Var_type:变量类型 例如：Global gi_var As Integer;（二）表达式;运算符的优先级; 在MapBasic中，提供了丰富的分支和循环流成控制语句。主要有以下三种类型的流程控制结构语句： 分支语句（如：if…then、GoTo、DoCase） 循环语句（如：For…Next、Do…loop、Do…While） 流控制的其它语句（如：EndProgram）;1、分支结构语句(1) 条件控制If…Then语句;例： Dim today As Date Dim today_mon,today_day As Integer ;(2) 条件分支Do Case…End Case语句;例： Dim cur_month As Integer, msg As String;(3) 强制无条件转移到标号标注位置GoTo语句;2、循环结构语句（1）For…Next语句;例：;（2） Do…Loop语句;例：;强制退出Do循环Exit For语句;（3） While…Wend语句;3、流程控制的其他语句 （1）End Program 语句;过程说明Declare Sub语句 语法形式：Declare Sub sub_proc 其中：sub_proc是sub 过程名 主过程说明语句：Declare Sub Main 子过程说明语句：Declare Sub 子过程名;定义一个子程序（过程）Sub …End Sub语句 语法形式：Sub proc_name[([By Val]parameter As var_type[,…])] statement_list End Sub 其中：proc_name:子过程名 Parameter:子过程参数 Var_type：标准的MapBasic变量类型（如：整数）或设置变量类型。 Statement_list:子过程语句组。;过程的调用Call语句 语法形式：Call subproc[([parameter][,…])] 其中：Subproc为子过程名 Parameter:传到子过程的参数表达式 可定义无参数子程序，如果特别的子程序无参数，然后按下列形式调用子程序： Call Subroutine Call Subroutine();例：主过程和子过程;例：;（四） MapBasic的文件类型;格式：;（六） 创建一个简单MapBasic例子;三、 MapBasic程序的调试与运行;（一）调试和错误捕获;语句;2、错误捕获;运行 MapBasic程序或MapInfo工作区Run Application语句 语法形式：Run Application file 其中：file是应用程序文件或工作区文件名。 注意：MapI