1.보급형 모델 검사 시 모든 계측기 사용 ->필요한 계측기 분리 changeMode()

2. 2.1.0 버전 업데이트
This commit is contained in:
hyelinjung 2026-01-13 17:25:13 +09:00
parent bd7b98805d
commit 6f68fa71c0

View File

@ -9,7 +9,7 @@ Imports uPLibrary.Networking.M2Mqtt
Public Class Main_Form
Public Program_Name As String = "DUALSONIC_Multi_Function_Tester Ver."
Public Program_Version As String = "2.0.9"
Public Program_Version As String = "2.1.0"
''데이터 베이스 테이블 목록
@ -8756,11 +8756,11 @@ WR_File_Error:
btnEnd.Enabled = False
Select Case formType
Case formTypeList.full, formTypeList.iqcHFRFEP
Case formTypeList.full, formTypeList.iqcHFRFEP, formTypeList.iqcHFEP
EquipSetting()
Case formTypeList.prdHF, formTypeList.iqcDsHF, formTypeList.prdDsHF, formTypeList.iqcHF
Case formTypeList.prdHF, formTypeList.iqcDsHF, formTypeList.prdDsHF, formTypeList.iqcHF, formTypeList.prdLowHF
If SpecSet() Then
txbWindow.AppendText("Spectrum Setting Fail!!" & vbCrLf)
ErrorSwitch = True
@ -8772,7 +8772,7 @@ WR_File_Error:
StartSwitch = True
End If
Case formTypeList.prdRFMCEP, formTypeList.iqcRFEP, formTypeList.prdRFEP, formTypeList.company
Case formTypeList.prdRFMCEP, formTypeList.iqcRFEP, formTypeList.prdRFEP, formTypeList.company, formTypeList.iqcEP, formTypeList.iqcRFEPMC, formTypeList.prdHFLDMEP, formTypeList.prdEP, formTypeList.prdRFMC
If EquipSet() Then
txbWindow.AppendText("Scope Setting Fail!!" & vbCrLf)
ErrorSwitch = True