manualshive.com logo in svg

Hioki BT4560, Инструкция по эксплуатации, Страница: 50 / 62

Поделиться
Скачать
Hioki BT4560 Скачать руководство пользователя страница 50

47

 

 

 

 

 

 

Measure by PC Key 

Measures and imports by key input on the PC, and saves measurements in a text file.

 

 

Private Sub MeasureReadSubRS() 

Dim recvstr As String   

'Receiving character string 

Dim i As Integer 
 
MSComm1.CommPort = 1 

'COM1 (Check a communication port) 

MSComm1.Settings = "9600,n,8,1" 

'Set a communication port (not required with USB) 

MSComm1.PortOpen = True   

'Open a port 

Open App.Path & "¥data.csv" For Output As #1   

'Open a text file for saving 

 
MSComm1.Output = ":FUNC RV" & vbCrLf   

'Select (R,X,V,T) measurement function 

MSComm1.Output = ":MEAS:VAL 1" & vbCrLf   

‘Output only the measurement value 

MSComm1.Output = ":TRIG:SOUR IMM" & vbCrLf    'Select internal triggering 
MSComm1.Output = ":INIT:CONT OFF" & vbCrLf   

'Continuous measurement OFF 

For i = 1 To 10 

'Wait for PC key input 
'Create a key input check routine to set InputKey() = True when a key is pressed 
Do While 1 

If InputKey() = True Then Exit Do 
DoEvents 

Loop 
'After confirming key input, measure once, and read the measured value 
MSComm1.Output = ":READ?" & vbCrLf   

'Send “:READ?” to measure and import the measurement

 

recvstr = ""   

'From here on, continue receiving until an LF code occurs

 

While Right(recvstr, 1) <> Chr(10) 

recvstr = r MSComm1.Input 
DoEvents 

Wend 
recvstr = Left(recvstr, Len(recvstr) - 2)   

'Delete the terminator (CR+LF) 

Print #1, Str(i) & "," & recvstr   

'Write to the file 

Next 

 

Close #1 
MSComm1.PortOpen = False 

End Sub 

 

 

Содержание BT4560

Страница 1: ...re has been taken in the production of this manual should you find any points which are unclear or in error please contact your local distributor or the HIOKI International Sales Department at os com...

Страница 2: ...tatus and Event Control Commands 18 CLS 18 ESE 19 ESR 19 SRE 20 STB 20 TRG 21 Device Specific Commands 21 1 Instrument Model Name 21 QPID 21 2 Event Status Register 21 ESE0 21 ESR0 22 ESE1 22 ESR1 22...

Страница 3: ...Key Beeper 34 SYSTem BEEPer 34 19 Key Lock 35 SYSTem KLOCk 35 20 Communications Settings 35 SYSTem LOCal 35 21 Header 35 SYSTem HEADer 35 22 Serial Number 35 SYSTem SERial 35 23 LCD Settings 36 SYSTe...

Страница 4: ...gram Messages Query Messages Messages Response Message When issuing commands that contain data make sure that the data is provided in the specified format Message Format Program Messages Program messa...

Страница 5: ...commands are not case sensitive in actual usage CALIBRATION OK long form CAL OK short form CALIB Error CA Error Response messages generated by the instrument are in long form and in upper case letters...

Страница 6: ...h semicolons FREQUENCY 1000 IDN When messages are combined in this way and if one command contains an error all subsequent messages up to the next terminator will be ignored 2 Header Separator In a me...

Страница 7: ...TEM HEADER OFF 2 Decimal Numeric Data Three formats are used for numeric data identified as NR1 NR2 and NR3 Numeric values may be signed or unsigned Unsigned numeric values are handled as positive val...

Страница 8: ...h and can be omitted from the messages immediately following The current path is cleared when the power is turned on when reset by key input by a colon at the start of a command and when a message ter...

Страница 9: ...bit7 bit6 bit5 bit4 bit3 bit2 bit1 bit0 Unused 0 ESB Unused Unused Unused ESB1 ESB0 Service Request Enable Register SRER Overview of Service Request Occurrence The Status Byte Register contains inform...

Страница 10: ...e Status Byte Register Bit 5 ESB Standard Event Status logical sum bit This is logical sum of the Standard Event Status Register Bit 4 MAV Unused Bit 3 Unused Bit 2 Unused Bit 1 ESB1 Event Status logi...

Страница 11: ...ameters Invalid parameter format Received a command not supported by the instrument Bit 4 EXE Execution Error This bit is set to 1 when a received command cannot be executed for some reason The specif...

Страница 12: ...tandard Event Status Enable Register SESER Device Specific Event Status Registers ESR0 and ESR1 This instrument provides two Event Status Registers for controlling events Each event register is an 8 b...

Страница 13: ...r 0 ESR0 bit7 bit6 bit5 bit4 bit3 bit2 bit1 bit0 Unused Unused ERR V Hi V IN V Lo INDEX EOM Logical sum bit7 bit6 bit5 bit4 bit3 bit2 bit1 bit0 Unused Unused ERR V Hi V IN V Lo INDEX EOM Event Status...

Страница 14: ...and CLS Command Factory Default RS 232C setting baud rate 9600 Device specific functions range etc 1 Output Queue Input buffer Status Byte Register Event registers 2 Enable register Current path Heade...

Страница 15: ...er time T 1 character sec Baud rate N bps 10 bits If a measurement value is 11 characters a 1 data transfer time will be 11 T Example For 9600 bps 11 9600 10 Approx 11 ms Command Execution time except...

Страница 16: ...Event Status Enable Register 1 ESE1 0 to 255 Queries the Event Status Enable Register 1 ESR1 0 to 255 Queries the Event Status Register 1 I O IO MODE NPN PNP Queries the NPN PNP switch status Measurem...

Страница 17: ...ust SLOPe 1 0 ON OFF Sets the slope correction for AC signal response Adjust SLOPe ON OFF Queries the slope correction for AC signal response Self Calibration CALibration Executes self calibration CAL...

Страница 18: ...er LCD Settings SYSTem DISPlay CONTrast Contrast 1 to 100 Sets the contrast SYSTem DISPlay CONTrast Contrast Queries the contrast SYSTem DISPlay BACKlight Brightness 10 to 100 Sets the backlight brigh...

Страница 19: ...d data or response message Describes the message Shows an example of an actual command application Normally described with HEADER OFF except the HEADER command itself Read Write the Standard Event Sta...

Страница 20: ...o 1 NR1 0 No error 1 ROM error Description Perform the instrument self test and return the result as NR1 value 0 or 1 Returns zero when no error occurs Example TST 1 A ROM error occurred Initialize In...

Страница 21: ...t waits until all prior commands finish before executing any subsequent commands Example TRIG SOUR EXT INIT CONT ON TRG WAI FETC Reads the measurement value after waiting for the measurement triggered...

Страница 22: ...32 16 8 4 2 1 bit 7 bit 6 bit 5 bit 4 bit 3 bit 2 bit 1 bit 0 PON Unused CME EXE Unused Unused Unused OPC Example ESE 32 Sets bit 5 of SESER Query and Clear Standard Event Status Register SESR Syntax...

Страница 23: ...E command are returned as an NR1 value 0 to 255 Bit 6 and unused bits 2 3 and 7 always return as zero 128 64 32 16 8 4 2 1 bit 7 bit 6 bit 5 bit 4 bit 3 bit 2 bit 1 bit 0 Unused 0 ESB Unused Unused Un...

Страница 24: ...l to perform the measurement Device Specific Commands 1 Instrument Model Name Query Instrument Model Name Identification Code Syntax Query QPID Response BT4560 Example QPID BT4560 The instrument model...

Страница 25: ...Register 1 ESER1 for the Event Status Register Query Queries the mask pattern in Event Status Enable Register 1 ESER1 for the Event Status Register 128 64 32 16 8 4 2 1 bit 7 bit 6 bit 5 bit 4 bit 3...

Страница 26: ...eactance temperature Z Z T function impedance phase angle temperature V V T function voltage temperature Example FUNC RV Set the function to R X V T FUNC RV The function has been set to R X V T 5 Meas...

Страница 27: ...the currently set measurement range as the following format Measurement range 3 0000E 3 10 0000E 3 100 000E 3 Example RANG 100 00E 03 Set the measurement range to 100m RANG 100 000E 3 The measurement...

Страница 28: ...nd Query Sample Delay with the frequency of the alternating current signal Syntax Command SAMPle DELay WAVE Wavenumber Query SAMPle DELay WAVE Response Wavenumber Wavenumber wave 0 0 to 9 0 NR2 Exampl...

Страница 29: ...Query LIMiter Response ON OFF Example LIM ON LIM OFF Set and Query Voltage Limit Function Syntax Command LIMiter VOLTage Voltage limit value Query LIMiter VOLTage Response Voltage limit value Voltage...

Страница 30: ...L Response 0 1 Description SPOT ALL 0 1 Executes zero adjustment for the frequency and voltage measurement in the currently set range Executes zero adjustment for the currently set all frequency and v...

Страница 31: ...alue at 330Hz Resistance adjusted value at 660Hz Reactance adjusted value at 660Hz Resistance adjusted value at 1kHz Reactance adjusted value at 1kHz Example ADJ DATA ALL V 1 10000E 03 The voltage adj...

Страница 32: ...or ADJust DATA ALL RV Voltage adjusted value Resistance adjusted value Reactance adjusted value Example ADJ DATA SPOT V 1 10000E 03 The voltage adjusted value has been set to 1 1mV ADJ DATA SPOT R 2 5...

Страница 33: ...set to be executed manually Self calibration is executed with the CALibration command or external CAL signal Example CAL AUTO OFF CAL AUTO OFF 15 Comparator Execute and Query Comparator Syntax Command...

Страница 34: ...0000E 01 NR3 or OFF Lower limit 3 00000E 03 to 1 20000E 01 NR3 or OFF If the upper limit is set to a value out of above range the upper limit becomes OFF If the lower limit is set to a value out of ab...

Страница 35: ...Note If the upper limit is set to a value smaller than the lower limit the upper limit becomes the same value as the lower Set and Query Impedance Component Comparator Upper Lower limit Syntax Comman...

Страница 36: ...If the upper limit is set to a value smaller than the lower limit the upper limit becomes the same value as the lower Set and Query Voltage Component Comparator Upper Lower limit Syntax Command CALCu...

Страница 37: ...Conditions Syntax Command SAVE CLEar Save No Save No 1 to 126 NR1 Example SAVE CLE 10 Note If SAVE CLEar is executed specifying a Save No that does not have previously saved measurement conditions an...

Страница 38: ...d Example SYST LOC 21 Header Set and Query Header Presence Syntax Command SYSTem HEADer 1 0 ON OFF Query SYSTem HEADer Response ON OFF Description Sets whether the header is to be included in response...

Страница 39: ...ISP CONT 50 Set the display contrast to 50 DISP CONT 50 The display contrast has been set to 50 Set and Query Backlight Syntax Command SYSTem DISPlay BACKlight Brightness Query SYSTem DISPlay BACKligh...

Страница 40: ...asured Value Output Idle State INITIATE or READ TRIGGER SOURCE EXT Triggered by TRIG signal or TRG command After measurement enters the trigger wait state Sample Delay Measurement Calculation Measured...

Страница 41: ...ger Wait State Triggering is ignored in the Idle State Executing INITiate enables the Trigger Wait State Continuous measurement is enabled upon exiting from the Remote State Example INIT CONT OFF Set...

Страница 42: ...triggering Example TRIG SOUR EXT INIT Set the trigger source to external triggering Switch triggering to Trigger Waiting State Trigger a single measurement when an external triggering signal is recei...

Страница 43: ...Fault Display Measured Value Out of Z range OverRange 1 00000 E 08 Impedance measurement error by drift voltage DRIFT VOLTAGE 2 00000 E 08 Contact error between SOURCE L and SENSE L CONTACT ERROR L 3...

Страница 44: ...Set and Query Response Data Syntax Command MEASure VALid MR0 Query MEASure VALid Response MR0 MR0 0 to 7 NR1 MR Measurement register see below Description Command Query Uses bits in MR0 to specify th...

Страница 45: ...ue Judgment result X measurement comparator judgment result HI IN LO OFF Measurement value V measurement value Judgment result V measurement comparator judgment result HI IN LO OFF Example MEAS VAL 1...

Страница 46: ...easurement comparator judgment result HI IN LO OFF Example TRIG SOUR IMM MEAS VAL 1 READ 1 02500E 01 1 02800E 01 3 00000E 00 Set the trigger source to internal triggering Set to return the Measured va...

Страница 47: ...asurement Export by Controller PC PLC Triggering Default Setting INITiate CONTinuous OFF continuous measurement disable TRIGger SOURce IMMediate internal triggering Exporting READ A trigger occurs and...

Страница 48: ...rocessing Measured Value Update Command Processing Response Measuring Measuring Measuring Measuring Measuring Measurement value Measurement value Measurement value Measurement value Measurement value...

Страница 49: ...racter string Dim i As Integer MSComm1 CommPort 1 COM1 Check a communication port MSComm1 Settings 9600 n 8 1 Set a communication port not required with USB MSComm1 PortOpen True Open a port Open App...

Страница 50: ...measurement value MSComm1 Output TRIG SOUR IMM vbCrLf Select internal triggering MSComm1 Output INIT CONT OFF vbCrLf Continuous measurement OFF For i 1 To 10 Wait for PC key input Create a key input...

Страница 51: ...f Select R X V T measurement function MSComm1 Output MEAS VAL 1 vbCrLf Output only the measurement value MSComm1 Output TRIG SOUR EXT vbCrLf Select external triggering MSComm1 Output INIT CONT OFF vbC...

Страница 52: ...unication port not required with USB MSComm1 PortOpen True Open a port MSComm1 Output FUNC RV vbCrLf Select R X V T function MSComm1 Output FREQ 1000 Select 1000Hz measurement frequency MSComm1 Output...

Страница 53: ...ve measurement values to a file Visual Basic2013 is referred to as VB2013 hereafter Note The procedure may differ slightly from the one described here depending on the environment of the PC and VB2013...

Страница 54: ...51 2 Place a button 1 Click Button from Common Controls of Toolbox 2 Drag and drop the button onto the form layout screen 3 Change Text to Start Measurement from the Properties window Click Drag...

Страница 55: ...Start Measurement is placed on the form 3 Place a serial communication component 1 Click SerialPort from Components of Toolbox 2 Drag and drop the SerialPort component onto the form layout screen Cli...

Страница 56: ...ame to the port name to use for communication from the Properties window Check the port to use for communication beforehand 4 Describe the code 1 Double click the placed button to display the code edi...

Страница 57: ...54 2 Enter the sample program into the code editor 3 Select Save All from the File menu Click...

Страница 58: ...in the following manner Description of creation procedure Description in sample program Button created to begin measurement Button1 Button created to close application Button2 When the Begin Measureme...

Страница 59: ...SerialPort1 Close Close port Button1 Enabled True Button2 Enabled True End Sub Set measurement conditions Private Sub SendSetting ByVal sp As SerialPort Try sp WriteLine FUNC RV R X V T function sp Wr...

Страница 60: ...57...

Страница 61: ...58...

Страница 62: ...59...

Отзывы:

Нет отзывов