07计算机地图制图实验报告.docVIP

计算机地图制图实验报告1 姓名 李良琦 学号 36 班级 07地信 实验内容及过程： 在Visual Basic下使用MapObjects 安装MapObjects之后，打开Visual Basic的程序开发环境，在左边的控件点击右键将弹出控件选择柜。选择ESRI MapObjects后，控件中将增加一个Map的控件。现在可以进行MapObjects编程了。 (1)增加控件 在Form上加一个按钮，并在按键上标注“全图”。如果在应用程序中加入地图，则在控件栏中选择Map控件，然后把光标移人Form中，拖放该图框，地图控件将成为一块空白色区域。 (2)增加图层 在Form上有一个Map控件后，我们必须在上面显示地图特征，如道路、河流和边界线等。在Form上增加一个标注“增加图层”的按钮，并增加Visual Basic的CommonDialog控件，以便确定Shape文件的路径和文件名。双击增加图层按钮就可以编程了，增加以下的VB语句。 Private Sub Commandl_Click() Dim dc As New DataConnection Dim gs As GeoDataset Dim name As String Dim layer As MapObjects.MapLayer CommonDialog1.Filter=”E