기상데이터 변경 완료(66)

This commit is contained in:
raytrace
2020-08-17 00:35:35 +09:00
parent 28c410b8b9
commit 997997fbfa
7 changed files with 214 additions and 125 deletions

View File

@@ -26,43 +26,22 @@ Partial Class fSelectWeatherGroup
Dim ListViewItem1 As System.Windows.Forms.ListViewItem = New System.Windows.Forms.ListViewItem("1561564")
Dim ListViewItem2 As System.Windows.Forms.ListViewItem = New System.Windows.Forms.ListViewItem("dfsdfsdf")
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(fSelectWeatherGroup))
Me.Label1 = New System.Windows.Forms.Label()
Me.btOK = New System.Windows.Forms.Button()
Me.bsArea2 = New System.Windows.Forms.BindingSource(Me.components)
Me.DS = New Eco2Ar.DS()
Me.bsArea1 = New System.Windows.Forms.BindingSource(Me.components)
Me.lv1 = New System.Windows.Forms.ListView()
Me.lv2 = New System.Windows.Forms.ListView()
Me.Panel1 = New System.Windows.Forms.Panel()
Me.Panel2 = New System.Windows.Forms.Panel()
Me.ColumnHeader1 = CType(New System.Windows.Forms.ColumnHeader(), System.Windows.Forms.ColumnHeader)
Me.Panel2 = New System.Windows.Forms.Panel()
Me.lv2 = New System.Windows.Forms.ListView()
Me.ColumnHeader2 = CType(New System.Windows.Forms.ColumnHeader(), System.Windows.Forms.ColumnHeader)
Me.btOK = New System.Windows.Forms.Button()
Me.Label1 = New System.Windows.Forms.Label()
Me.Label2 = New System.Windows.Forms.Label()
CType(Me.bsArea2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.DS, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.bsArea1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'Label1
'
Me.Label1.Dock = System.Windows.Forms.DockStyle.Top
Me.Label1.Font = New System.Drawing.Font("맑은 고딕", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
Me.Label1.Location = New System.Drawing.Point(10, 10)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(632, 41)
Me.Label1.TabIndex = 0
Me.Label1.Text = "지역을 선택하세요" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10)
'
'btOK
'
Me.btOK.Dock = System.Windows.Forms.DockStyle.Bottom
Me.btOK.Font = New System.Drawing.Font("맑은 고딕", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
Me.btOK.Location = New System.Drawing.Point(10, 492)
Me.btOK.Name = "btOK"
Me.btOK.Size = New System.Drawing.Size(632, 50)
Me.btOK.TabIndex = 2
Me.btOK.Text = "확 인"
Me.btOK.UseVisualStyleBackColor = True
'
'bsArea2
'
Me.bsArea2.DataMember = "weather_group"
@@ -81,71 +60,86 @@ Partial Class fSelectWeatherGroup
'lv1
'
Me.lv1.Columns.AddRange(New System.Windows.Forms.ColumnHeader() {Me.ColumnHeader1})
Me.lv1.Dock = System.Windows.Forms.DockStyle.Fill
Me.lv1.Font = New System.Drawing.Font("맑은 고딕", 20.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
Me.lv1.Font = New System.Drawing.Font("맑은 고딕", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
Me.lv1.FullRowSelect = True
Me.lv1.GridLines = True
Me.lv1.HeaderStyle = System.Windows.Forms.ColumnHeaderStyle.None
Me.lv1.HideSelection = False
Me.lv1.Items.AddRange(New System.Windows.Forms.ListViewItem() {ListViewItem1})
Me.lv1.Location = New System.Drawing.Point(10, 51)
Me.lv1.Location = New System.Drawing.Point(13, 37)
Me.lv1.Name = "lv1"
Me.lv1.Size = New System.Drawing.Size(311, 431)
Me.lv1.Size = New System.Drawing.Size(161, 382)
Me.lv1.TabIndex = 5
Me.lv1.UseCompatibleStateImageBehavior = False
Me.lv1.View = System.Windows.Forms.View.Details
'
'ColumnHeader1
'
Me.ColumnHeader1.Width = 156
'
'Panel2
'
Me.Panel2.Location = New System.Drawing.Point(180, 37)
Me.Panel2.Name = "Panel2"
Me.Panel2.Size = New System.Drawing.Size(10, 382)
Me.Panel2.TabIndex = 7
'
'lv2
'
Me.lv2.Columns.AddRange(New System.Windows.Forms.ColumnHeader() {Me.ColumnHeader2})
Me.lv2.Dock = System.Windows.Forms.DockStyle.Right
Me.lv2.Font = New System.Drawing.Font("맑은 고딕", 20.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
Me.lv2.Font = New System.Drawing.Font("맑은 고딕", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
Me.lv2.FullRowSelect = True
Me.lv2.GridLines = True
Me.lv2.HeaderStyle = System.Windows.Forms.ColumnHeaderStyle.None
Me.lv2.HideSelection = False
Me.lv2.Items.AddRange(New System.Windows.Forms.ListViewItem() {ListViewItem2})
Me.lv2.Location = New System.Drawing.Point(331, 51)
Me.lv2.Location = New System.Drawing.Point(196, 37)
Me.lv2.Name = "lv2"
Me.lv2.Size = New System.Drawing.Size(311, 431)
Me.lv2.Size = New System.Drawing.Size(161, 382)
Me.lv2.TabIndex = 5
Me.lv2.UseCompatibleStateImageBehavior = False
Me.lv2.View = System.Windows.Forms.View.Details
'
'Panel1
'
Me.Panel1.Dock = System.Windows.Forms.DockStyle.Bottom
Me.Panel1.Location = New System.Drawing.Point(10, 482)
Me.Panel1.Name = "Panel1"
Me.Panel1.Size = New System.Drawing.Size(632, 10)
Me.Panel1.TabIndex = 6
'
'Panel2
'
Me.Panel2.Dock = System.Windows.Forms.DockStyle.Right
Me.Panel2.Location = New System.Drawing.Point(321, 51)
Me.Panel2.Name = "Panel2"
Me.Panel2.Size = New System.Drawing.Size(10, 431)
Me.Panel2.TabIndex = 7
'
'ColumnHeader1
'
Me.ColumnHeader1.Width = 300
'
'ColumnHeader2
'
Me.ColumnHeader2.Width = 300
Me.ColumnHeader2.Width = 130
'
'btOK
'
Me.btOK.Font = New System.Drawing.Font("맑은 고딕", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
Me.btOK.Location = New System.Drawing.Point(129, 425)
Me.btOK.Name = "btOK"
Me.btOK.Size = New System.Drawing.Size(119, 33)
Me.btOK.TabIndex = 2
Me.btOK.Text = "확 인"
Me.btOK.UseVisualStyleBackColor = True
'
'Label1
'
Me.Label1.Font = New System.Drawing.Font("맑은 고딕", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
Me.Label1.Location = New System.Drawing.Point(10, 10)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(153, 24)
Me.Label1.TabIndex = 0
Me.Label1.Text = "대분류"
'
'Label2
'
Me.Label2.Font = New System.Drawing.Font("맑은 고딕", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
Me.Label2.Location = New System.Drawing.Point(192, 10)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(153, 24)
Me.Label2.TabIndex = 0
Me.Label2.Text = "중분류"
'
'fSelectWeatherGroup
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 15.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(652, 552)
Me.ClientSize = New System.Drawing.Size(370, 462)
Me.Controls.Add(Me.lv1)
Me.Controls.Add(Me.Panel2)
Me.Controls.Add(Me.lv2)
Me.Controls.Add(Me.Panel1)
Me.Controls.Add(Me.btOK)
Me.Controls.Add(Me.Label2)
Me.Controls.Add(Me.Label1)
Me.Font = New System.Drawing.Font("맑은 고딕", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
@@ -169,8 +163,8 @@ Partial Class fSelectWeatherGroup
Public WithEvents DS As DS
Friend WithEvents lv1 As ListView
Friend WithEvents lv2 As ListView
Friend WithEvents Panel1 As Panel
Friend WithEvents Panel2 As Panel
Friend WithEvents ColumnHeader1 As ColumnHeader
Friend WithEvents ColumnHeader2 As ColumnHeader
Friend WithEvents Label2 As System.Windows.Forms.Label
End Class

View File

@@ -99,7 +99,7 @@
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles btOK.Click
If lv2.SelectedItems.Count < 1 Then
MessageBox.Show("2차 지역을 선택하세요", "확인")
MessageBox.Show("중분류를 선택하세요", "확인")
Return
End If