?? form1.vb
字號:
Me._panelHelp = New System.Windows.Forms.Panel()
Me._WebBrowser2 = New AxSHDocVw.AxWebBrowser()
CType(Me.Map, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.statusBarPanel1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.statusBarPanel2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.statusBarPanel3, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.statusBarPanel4, System.ComponentModel.ISupportInitialize).BeginInit()
Me._panelIndex.SuspendLayout()
Me._panelQuery.SuspendLayout()
Me._panelDist.SuspendLayout()
Me._panelBus.SuspendLayout()
Me._panelOutput.SuspendLayout()
CType(Me._WebBrowser, System.ComponentModel.ISupportInitialize).BeginInit()
Me._panelHelp.SuspendLayout()
CType(Me._WebBrowser2, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'MapControlToolBar
'
Me.MapControlToolBar.DropDownArrows = True
Me.MapControlToolBar.Name = "MapControlToolBar"
Me.MapControlToolBar.ShowToolTips = True
Me.MapControlToolBar.Size = New System.Drawing.Size(632, 39)
Me.MapControlToolBar.TabIndex = 0
'
'Map
'
Me.Map.Dock = System.Windows.Forms.DockStyle.Fill
Me.Map.Location = New System.Drawing.Point(0, 39)
Me.Map.Name = "Map"
Me.Map.OcxState = CType(resources.GetObject("Map.OcxState"), System.Windows.Forms.AxHost.State)
Me.Map.Size = New System.Drawing.Size(632, 358)
Me.Map.TabIndex = 2
'
'_statusBar
'
Me._statusBar.Location = New System.Drawing.Point(0, 373)
Me._statusBar.Name = "_statusBar"
Me._statusBar.Panels.AddRange(New System.Windows.Forms.StatusBarPanel() {Me.statusBarPanel1, Me.statusBarPanel2, Me.statusBarPanel3, Me.statusBarPanel4})
Me._statusBar.ShowPanels = True
Me._statusBar.Size = New System.Drawing.Size(632, 24)
Me._statusBar.TabIndex = 5
Me._statusBar.Text = "中國地名指南"
'
'statusBarPanel1
'
Me.statusBarPanel1.Text = "北京市地理信息公眾查詢系統"
Me.statusBarPanel1.Width = 300
'
'statusBarPanel2
'
Me.statusBarPanel2.Text = "北緯=0000.00 東經=0000.00"
Me.statusBarPanel2.Width = 200
'
'statusBarPanel4
'
Me.statusBarPanel4.Alignment = System.Windows.Forms.HorizontalAlignment.Center
Me.statusBarPanel4.Width = 500
'
'FeatureControlToolBar
'
Me.FeatureControlToolBar.Dock = System.Windows.Forms.DockStyle.Left
Me.FeatureControlToolBar.DropDownArrows = True
Me.FeatureControlToolBar.Location = New System.Drawing.Point(0, 39)
Me.FeatureControlToolBar.Name = "FeatureControlToolBar"
Me.FeatureControlToolBar.ShowToolTips = True
Me.FeatureControlToolBar.Size = New System.Drawing.Size(39, 334)
Me.FeatureControlToolBar.TabIndex = 6
'
'_panelIndex
'
Me._panelIndex.Controls.AddRange(New System.Windows.Forms.Control() {Me._index_comboBoxFilter2, Me._index_listBox, Me._index_comboBoxFilter, Me._index_txtName, Me._index_label2, Me._index_label1})
Me._panelIndex.Location = New System.Drawing.Point(208, 34)
Me._panelIndex.Name = "_panelIndex"
Me._panelIndex.Size = New System.Drawing.Size(216, 328)
Me._panelIndex.TabIndex = 12
Me._panelIndex.Visible = False
'
'_index_comboBoxFilter2
'
Me._index_comboBoxFilter2.Anchor = ((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right)
Me._index_comboBoxFilter2.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me._index_comboBoxFilter2.Location = New System.Drawing.Point(8, 104)
Me._index_comboBoxFilter2.Name = "_index_comboBoxFilter2"
Me._index_comboBoxFilter2.Size = New System.Drawing.Size(200, 20)
Me._index_comboBoxFilter2.TabIndex = 13
'
'_index_listBox
'
Me._index_listBox.Anchor = (((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right)
Me._index_listBox.ItemHeight = 12
Me._index_listBox.Location = New System.Drawing.Point(8, 136)
Me._index_listBox.Name = "_index_listBox"
Me._index_listBox.Size = New System.Drawing.Size(200, 184)
Me._index_listBox.TabIndex = 12
'
'_index_comboBoxFilter
'
Me._index_comboBoxFilter.Anchor = ((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right)
Me._index_comboBoxFilter.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me._index_comboBoxFilter.Location = New System.Drawing.Point(8, 72)
Me._index_comboBoxFilter.Name = "_index_comboBoxFilter"
Me._index_comboBoxFilter.Size = New System.Drawing.Size(200, 20)
Me._index_comboBoxFilter.TabIndex = 11
'
'_index_txtName
'
Me._index_txtName.Anchor = ((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right)
Me._index_txtName.Location = New System.Drawing.Point(8, 24)
Me._index_txtName.Name = "_index_txtName"
Me._index_txtName.Size = New System.Drawing.Size(200, 21)
Me._index_txtName.TabIndex = 10
Me._index_txtName.Text = ""
'
'_index_label2
'
Me._index_label2.Location = New System.Drawing.Point(8, 56)
Me._index_label2.Name = "_index_label2"
Me._index_label2.Size = New System.Drawing.Size(72, 16)
Me._index_label2.TabIndex = 9
Me._index_label2.Text = "地名分類:"
'
'_index_label1
'
Me._index_label1.Location = New System.Drawing.Point(8, 8)
Me._index_label1.Name = "_index_label1"
Me._index_label1.Size = New System.Drawing.Size(72, 16)
Me._index_label1.TabIndex = 8
Me._index_label1.Text = "地名名稱:"
'
'_panelQuery
'
Me._panelQuery.Controls.AddRange(New System.Windows.Forms.Control() {Me._query_comboBoxFilter2, Me._query_button, Me._query_checkBox3, Me._query_checkBox2, Me._query_checkBox1, Me._query_comboBoxFilter, Me._query_txtTel, Me._query_txtName, Me._query_label3, Me._query_label2, Me._query_label1})
Me._panelQuery.Location = New System.Drawing.Point(280, 16)
Me._panelQuery.Name = "_panelQuery"
Me._panelQuery.Size = New System.Drawing.Size(216, 304)
Me._panelQuery.TabIndex = 14
Me._panelQuery.Visible = False
'
'_query_comboBoxFilter2
'
Me._query_comboBoxFilter2.Anchor = ((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right)
Me._query_comboBoxFilter2.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me._query_comboBoxFilter2.Location = New System.Drawing.Point(8, 152)
Me._query_comboBoxFilter2.Name = "_query_comboBoxFilter2"
Me._query_comboBoxFilter2.Size = New System.Drawing.Size(200, 20)
Me._query_comboBoxFilter2.TabIndex = 22
'
'_query_button
'
Me._query_button.Location = New System.Drawing.Point(8, 184)
Me._query_button.Name = "_query_button"
Me._query_button.Size = New System.Drawing.Size(72, 24)
Me._query_button.TabIndex = 21
Me._query_button.Text = "搜索"
'
'_query_checkBox3
'
Me._query_checkBox3.Location = New System.Drawing.Point(8, 264)
Me._query_checkBox3.Name = "_query_checkBox3"
Me._query_checkBox3.Size = New System.Drawing.Size(176, 24)
Me._query_checkBox3.TabIndex = 20
Me._query_checkBox3.Text = "電話為模糊查詢"
'
'_query_checkBox2
'
Me._query_checkBox2.Location = New System.Drawing.Point(8, 240)
Me._query_checkBox2.Name = "_query_checkBox2"
Me._query_checkBox2.Size = New System.Drawing.Size(176, 24)
Me._query_checkBox2.TabIndex = 19
Me._query_checkBox2.Text = "地名為模糊查詢"
'
'_query_checkBox1
'
Me._query_checkBox1.Location = New System.Drawing.Point(8, 216)
Me._query_checkBox1.Name = "_query_checkBox1"
Me._query_checkBox1.Size = New System.Drawing.Size(176, 24)
Me._query_checkBox1.TabIndex = 18
Me._query_checkBox1.Text = "地名和電話的組合關系為與"
'
'_query_comboBoxFilter
'
Me._query_comboBoxFilter.Anchor = ((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right)
Me._query_comboBoxFilter.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me._query_comboBoxFilter.Location = New System.Drawing.Point(8, 120)
Me._query_comboBoxFilter.Name = "_query_comboBoxFilter"
Me._query_comboBoxFilter.Size = New System.Drawing.Size(200, 20)
Me._query_comboBoxFilter.TabIndex = 17
'
'_query_txtTel
'
Me._query_txtTel.Anchor = ((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right)
Me._query_txtTel.Location = New System.Drawing.Point(8, 72)
Me._query_txtTel.Name = "_query_txtTel"
Me._query_txtTel.Size = New System.Drawing.Size(200, 21)
Me._query_txtTel.TabIndex = 16
Me._query_txtTel.Text = ""
'
'_query_txtName
'
Me._query_txtName.Anchor = ((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right)
Me._query_txtName.Location = New System.Drawing.Point(8, 24)
Me._query_txtName.Name = "_query_txtName"
Me._query_txtName.Size = New System.Drawing.Size(200, 21)
Me._query_txtName.TabIndex = 15
Me._query_txtName.Text = ""
'
'_query_label3
'
Me._query_label3.Location = New System.Drawing.Point(8, 104)
Me._query_label3.Name = "_query_label3"
Me._query_label3.Size = New System.Drawing.Size(72, 16)
Me._query_label3.TabIndex = 14
Me._query_label3.Text = "被過濾:"
'
'_query_label2
'
Me._query_label2.Location = New System.Drawing.Point(8, 56)
Me._query_label2.Name = "_query_label2"
Me._query_label2.Size = New System.Drawing.Size(72, 16)
Me._query_label2.TabIndex = 13
Me._query_label2.Text = "電話:"
'
'_query_label1
'
Me._query_label1.Location = New System.Drawing.Point(8, 8)
Me._query_label1.Name = "_query_label1"
Me._query_label1.Size = New System.Drawing.Size(72, 16)
Me._query_label1.TabIndex = 12
Me._query_label1.Text = "地名:"
'
'_panelDist
'
Me._panelDist.Controls.AddRange(New System.Windows.Forms.Control() {Me._dis_label_Note, Me._dist_comboBoxFilter2, Me._dist_comboBoxFilter, Me._dist_button, Me._dist_radioButton2, Me._dist_radioButton1, Me._dist_comboBoxPos, Me._dist_label1, Me._dist_txtName})
Me._panelDist.Location = New System.Drawing.Point(80, 48)
Me._panelDist.Name = "_panelDist"
Me._panelDist.Size = New System.Drawing.Size(208, 312)
Me._panelDist.TabIndex = 15
Me._panelDist.Visible = False
'
'_dis_label_Note
'
Me._dis_label_Note.Font = New System.Drawing.Font("宋體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
Me._dis_label_Note.Location = New System.Drawing.Point(8, 224)
Me._dis_label_Note.Name = "_dis_label_Note"
Me._dis_label_Note.Size = New System.Drawing.Size(192, 80)
Me._dis_label_Note.TabIndex = 22
Me._dis_label_Note.Text = " 按位置查找時,選擇了距離和過濾類型后,先按""搜索""按鈕,然后將鼠標移動到地圖上選擇你所要查詢的位置。"
'
'_dist_comboBoxFilter2
'
Me._dist_comboBoxFilter2.Anchor = ((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right)
Me._dist_comboBoxFilter2.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me._dist_comboBoxFilter2.Location = New System.Drawing.Point(8, 152)
Me._dist_comboBoxFilter2.Name = "_dist_comboBoxFilter2"
Me._dist_comboBoxFilter2.Size = New System.Drawing.Size(192, 20)
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -