⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 frmstatisticneighbour.frm

📁 超图网络分析扩展的VB开发程序的应用,对地理信息系统开发有益
💻 FRM
📖 第 1 页 / 共 2 页
字号:
VERSION 5.00
Begin VB.Form frmStatisticNeighbour 
   BorderStyle     =   3  'Fixed Dialog
   Caption         =   "邻域分析"
   ClientHeight    =   4320
   ClientLeft      =   45
   ClientTop       =   330
   ClientWidth     =   5370
   ControlBox      =   0   'False
   LinkTopic       =   "Form1"
   MaxButton       =   0   'False
   MinButton       =   0   'False
   ScaleHeight     =   4320
   ScaleWidth      =   5370
   ShowInTaskbar   =   0   'False
   StartUpPosition =   1  'CenterOwner
   Begin VB.Frame frameSet 
      Height          =   4230
      Left            =   705
      TabIndex        =   15
      Top             =   750
      Visible         =   0   'False
      Width           =   3390
      Begin VB.Frame Frame5 
         Caption         =   "邻域范围参数"
         Height          =   2385
         Left            =   45
         TabIndex        =   18
         Top             =   1050
         Width           =   3300
         Begin VB.OptionButton optDl 
            Caption         =   "地理单位"
            Height          =   195
            Left            =   1080
            TabIndex        =   23
            Top             =   300
            Width           =   1020
         End
         Begin VB.OptionButton optRst 
            Caption         =   "栅格单位"
            Height          =   195
            Left            =   2115
            TabIndex        =   22
            Top             =   315
            Value           =   -1  'True
            Width           =   1035
         End
         Begin VB.TextBox txtDistance 
            BackColor       =   &H80000004&
            Enabled         =   0   'False
            Height          =   285
            Left            =   1095
            TabIndex        =   21
            Text            =   "30"
            Top             =   780
            Width           =   2025
         End
         Begin VB.TextBox txtLength 
            Height          =   285
            Left            =   1095
            TabIndex        =   20
            Text            =   "30"
            Top             =   1290
            Width           =   2025
         End
         Begin VB.TextBox txtWidth 
            Height          =   285
            Left            =   1095
            TabIndex        =   19
            Text            =   "30"
            Top             =   1800
            Width           =   2025
         End
         Begin VB.Label Label1 
            AutoSize        =   -1  'True
            Caption         =   "单位:"
            Height          =   195
            Index           =   8
            Left            =   345
            TabIndex        =   27
            Top             =   285
            Width           =   540
         End
         Begin VB.Label Label1 
            AutoSize        =   -1  'True
            Caption         =   "半径:"
            Height          =   195
            Index           =   5
            Left            =   345
            TabIndex        =   26
            Top             =   810
            Width           =   540
         End
         Begin VB.Label Label1 
            AutoSize        =   -1  'True
            Caption         =   "长度:"
            Height          =   195
            Index           =   4
            Left            =   345
            TabIndex        =   25
            Top             =   1335
            Width           =   540
         End
         Begin VB.Label Label1 
            AutoSize        =   -1  'True
            Caption         =   "宽度:"
            Height          =   195
            Index           =   3
            Left            =   345
            TabIndex        =   24
            Top             =   1860
            Width           =   540
         End
      End
      Begin VB.CommandButton cmdSetOk 
         Caption         =   "确定"
         Height          =   435
         Left            =   600
         TabIndex        =   17
         Top             =   3645
         Width           =   945
      End
      Begin VB.CommandButton cmdSetCancel 
         Caption         =   "取消"
         Height          =   435
         Left            =   2025
         TabIndex        =   16
         Top             =   3645
         Width           =   945
      End
      Begin VB.Frame Frame6 
         Caption         =   "邻域形状"
         Height          =   900
         Left            =   45
         TabIndex        =   28
         Top             =   120
         Width           =   3300
         Begin VB.OptionButton optRect 
            Caption         =   "矩形"
            Height          =   255
            Left            =   240
            TabIndex        =   32
            Top             =   390
            Value           =   -1  'True
            Width           =   705
         End
         Begin VB.OptionButton optCircle 
            Caption         =   "圆形"
            Height          =   255
            Left            =   945
            TabIndex        =   31
            Top             =   390
            Width           =   705
         End
         Begin VB.OptionButton optRound 
            Caption         =   "环形"
            Height          =   255
            Left            =   1680
            TabIndex        =   30
            Top             =   390
            Width           =   705
         End
         Begin VB.OptionButton optPie 
            Caption         =   "扇形"
            Height          =   255
            Left            =   2385
            TabIndex        =   29
            Top             =   390
            Width           =   705
         End
      End
   End
   Begin VB.Frame Frame2 
      Caption         =   "邻域分析设置区"
      Height          =   1125
      Left            =   1950
      TabIndex        =   10
      Top             =   2280
      Width           =   3390
      Begin VB.CommandButton cmdMod 
         Caption         =   "邻域模式"
         Height          =   435
         Left            =   2025
         TabIndex        =   14
         Top             =   615
         Width           =   1155
      End
      Begin VB.ComboBox cmbPro 
         Height          =   315
         ItemData        =   "frmStatisticNeighbour.frx":0000
         Left            =   1680
         List            =   "frmStatisticNeighbour.frx":0016
         Style           =   2  'Dropdown List
         TabIndex        =   13
         Top             =   240
         Width           =   1515
      End
      Begin VB.CheckBox ckNone 
         Alignment       =   1  'Right Justify
         Caption         =   "忽略无值数据:"
         Height          =   270
         Left            =   315
         TabIndex        =   12
         Top             =   705
         Width           =   1560
      End
      Begin VB.Label Label1 
         AutoSize        =   -1  'True
         Caption         =   "分析功能选择:"
         Height          =   195
         Index           =   2
         Left            =   345
         TabIndex        =   11
         Top             =   300
         Width           =   1260
      End
   End
   Begin VB.Frame Frame4 
      Caption         =   "结果数据集保存"
      Height          =   1140
      Left            =   1950
      TabIndex        =   5
      Top             =   1140
      Width           =   3390
      Begin VB.TextBox txtDataset 
         Height          =   315
         Left            =   1095
         TabIndex        =   7
         Text            =   "Raster"
         Top             =   660
         Width           =   2070
      End
      Begin VB.ComboBox cmbDsListResult 
         Height          =   315
         Left            =   1095
         Style           =   2  'Dropdown List
         TabIndex        =   6
         Top             =   285
         Width           =   2070
      End
      Begin VB.Label Label1 
         AutoSize        =   -1  'True
         Caption         =   "数据集:"
         Height          =   195
         Index           =   7
         Left            =   340
         TabIndex        =   9
         Top             =   705
         Width           =   720
      End
      Begin VB.Label Label1 
         AutoSize        =   -1  'True
         Caption         =   "数据源:"
         Height          =   195
         Index           =   6
         Left            =   340
         TabIndex        =   8
         Top             =   330
         Width           =   720
      End
   End
   Begin VB.Frame Frame1 
      Caption         =   "参加分析的数据"
      Height          =   1065
      Left            =   1950
      TabIndex        =   0
      Top             =   45
      Width           =   3390
      Begin VB.ComboBox cmbDtList 
         Height          =   315

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -