CHeating.vb 1972번 줄 누적 문제 분석 완료

This commit is contained in:
ykh
2025-11-30 23:52:50 +09:00
parent 2a69feb29a
commit b47cf354b3
14 changed files with 100 additions and 106 deletions

View File

@@ -734,7 +734,7 @@ Public Class Frm_3_Mach
fxNanBang.Cols(colindex).DataType = GetType(String)
fxNanBang.Cols(colindex).DataMap = sl
Console.WriteLine("Make_난방기기신재생_List")
'Console.WriteLine("Make_난방기기신재생_List")
Else
b난방기기신재생업데이트완료 = True
@@ -742,14 +742,14 @@ Public Class Frm_3_Mach
End Sub
Dim b냉방기기신재생업데이트완료 As Boolean = False
Sub Make_냉방기기신재생_List(colindex As Integer)
If b냉방기기신재생업데이트완료 Then Return
Console.WriteLine("Make_냉방기기신재생_List")
'Console.WriteLine("Make_냉방기기신재생_List")
'Dim bs연결된신재생_난방 As New BindingSource(DSET1, "tbl_new") With {.Filter = filter, .Sort = "code"}
'Dim cmd연결된신재생_난방 As New ComboBox With {.DataSource = bs연결된신재생_난방, .DisplayMember = "설명", .ValueMember = "code"}
@@ -898,7 +898,7 @@ Public Class Frm_3_Mach
'fxKogjo.Cols("열교환기유형").Editor = cmd열교환기유형
'//조명기기종류 형광등;LED등;기타고효율등;일반등
' Console.WriteLine("yk2")
' 'Console.WriteLine("yk2")
Dim sl As New Dictionary(Of String, String) '//170514
sl.Add("형광등", "형광등")
sl.Add("LED등", "LED등")
@@ -916,7 +916,7 @@ Public Class Frm_3_Mach
fxNaengBang.Cols("증발식건식냉각기").DataMap = s2l
End Sub
@@ -1027,7 +1027,7 @@ Public Class Frm_3_Mach
fxNaengBang.Cols("냉수펌프동력").AllowEditing = True
End If
End If
@@ -1133,7 +1133,7 @@ Public Class Frm_3_Mach
fxDanMal.Select(cellrange, True)
End If
Console.WriteLine(String.Format("fxDanMal_SelChange : {0},{1}", hti.Row, hti.Column))
'Console.WriteLine(String.Format("fxDanMal_SelChange : {0},{1}", hti.Row, hti.Column))
End Sub
Private Sub 열너비자동조정ToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles 열너비자동조정ToolStripMenuItem.Click