基于VB 語言編制的力傳感器校準數據處理程序

張利，鄧麗，郭和新

(內蒙古北方重工業集團有限公司計量檢測技術研究院，內蒙古 包頭014033)

0 引言

力傳感器的檢定與校準依據JJG391 －2009 《力傳感器檢定規程》，使用的標準設備為標準測力機。從檢定或校準中獲得的原始數據較多，規程要求計算的指標較多，包括靈敏度、直線度、重復性、滯后、長期穩定性、零點漂移等數項指標，各指標的計算大多比較復雜容易出錯，為此我們使用VB 語言按照力傳感器檢定規程將力傳感器原始數據的處理編制成計算機程序。用此程序，檢定人員或校準人員只要按照程序提示輸入原始數據即可獲得各指標值，這樣大大減輕了檢定或校準人員的勞動強度并且提高了結果的準確度。

1 力傳感器的數據處理程序及界面

原始數據輸入，編輯及數據處理最終結果顯示界面如圖1 所示。

啟動程序后先顯示提示信息，要求先輸入檢定點數(5 ～10 點，包括零點在內)，之后選擇有無回程，默認為有回程。之后才可輸入數據。實現此功能的代碼如下:

圖1 結果顯示界面

Private Sub Form_ Load ()

zlOption1. Value = True

Frame1. Enabled = False

zln = 1

zlLabel11 = zln

zlCommand4. Enabled = False

zlCommand3. Enabled = False

End Sub

Private Sub form_ resize ()

Frame2. Visible = False

MsgBox“本程序依據JJG391 －2009 力傳感器檢定規程而編制，先輸入檢定點數，選擇有無回程，再輸入數據”

End Sub

輸入完檢定點數及有無回程后，在輸入數據文本框中依次輸入原始數據，注意在輸入過程中編輯鍵是不能使用的，只有數據全部輸完后才可使用編輯鍵對原始數據進行修改和編輯。實現這些功能的代碼為:

Private Sub zlCommand1_ Click ()

zlq = Val (zlText13. Text)

If zlq ＜5 Or zlq ＞10 Then

MsgBox " 數據輸入錯誤或無數據或沒有輸入檢定點數，請重輸!!!"

Exit Sub

End If

zlText13. Locked = True

zljc (zln，1)= Val (zlText1. Text)

zljc (zln，2)= Val (zlText2. Text)

zljc (zln，3)= Val (zlText3. Text)

zlhc (zln，1)= Val (zlText4. Text)

zlhc (zln，2)= Val (zlText5. Text)

zlhc (zln，3)= Val (zlText6. Text)

zlzh (zln)= Val (zlText8. Text)

jldy1 = Val (zlText7. Text)

jldy2 = Val (zlText9. Text)

ldmax = Val (zlText10. Text)

ldmin = Val (zlText11. Text)

sc = Val (zlText12. Text)

If zln = zlq Then

zlCommand1. Enabled = False

Frame1. Enabled = True

zlCommand4. Enabled = True

zlCommand3. Enabled = True

Exit Sub

End If

zlText1. Text = ""

zlText2. Text = ""

zlText3. Text = ""

zlText4. Text = ""

zlText5. Text = ""

zlText6. Text = ""

zlText8. Text = ""

zln = zln + 1

zlLabel11 = zln

End Sub

輸入全部數據后，可使用編輯鍵對所輸入的原始數據進行編輯和修改。按“上一點”返回上一組數據，對這一組數據進行修改，修改完后按“存入”即可。按“下一點”進入下一組數據，對下一組數據可進行修改，修改完后，按“存入”即可保存數據(程序略)。

輸入所有原始數據并對原始數據進行修改編輯，確保所有數據正確無誤后，按動“計算”按鈕后，軟件會自動計算并在“計算結果”框中顯示各指標值(程序略)。

處理完一組數據后，如要計算下一組數據，可按“繼續”按鈕，這時各文本框均要清屏，方便輸入數據(程序略)。

全部處理工作結束后，按“退出”即可退出該程序。

2 結束語

程序全部編制完成后經編譯成為可執行文件，選取五組原始數據，分別用人工方法和該程序進行計算，計算結果非常吻合。