2024y .

ArinWarev1/Calculator/Calculator.vb

@@ -328,10 +328,12 @@
         '//계산을 시작  p_CalcUse : 는 소요량 계산도 할건지으 ㅣ플래그 나중에 분리해야겠따.
         'Dim ST As Date = Now
 
-        If Me.IsError Then
-            MsgBox("계산준비중 오류발생", MsgBoxStyle.Critical, "확인")
+        If Me.Pub.IsError Then
+
+            MsgBox("계산준비중 오류발생", MsgBoxStyle.Critical + MsgBoxStyle.Question, "확인")
             Return False
         End If
+
         logBuffer = New System.Text.StringBuilder("")
         Dim Cnt As Integer = FixData()
         'log.AppendLine(">>데이터보정(" & Cnt.ToString & ")개의 데이터가 보정되었습니다")
@@ -358,6 +360,10 @@
         DSETR2.월별1차에너지사용량.Merge(DSETR1.월별1차에너지사용량)
         DSETR2.월별1차에너지사용량.AcceptChanges()
 
+        '//clear exportdata
+        DSET1.tbl_exportdata.Clear()
+        DSET1.tbl_exportdata.AcceptChanges()
+
 
 
         Dim Retval As Boolean