基于VB的一種壓力試驗(yàn)機(jī)可視化測試軟件

楊勇

摘要：壓力試驗(yàn)是常見的試驗(yàn)環(huán)節(jié)，本文介紹了在Windows環(huán)境下利用VB6.0，采用“自上而下地總體規(guī)劃，自下而上地應(yīng)用開發(fā)”的策略開發(fā)一個(gè)壓力試驗(yàn)機(jī)穩(wěn)定性測試系統(tǒng)的過程。通過系統(tǒng)功能分析和模塊設(shè)計(jì)完善，對算法進(jìn)行對比，選擇最優(yōu)的數(shù)據(jù)處理方式，實(shí)現(xiàn)了數(shù)據(jù)實(shí)時(shí)采集和繪圖處理，并通過數(shù)據(jù)模擬測試了軟件的性能。

關(guān)鍵詞：穩(wěn)定性測試系統(tǒng) 壓力試驗(yàn) VB6.0

中圖分類號：TP39 文獻(xiàn)標(biāo)識碼：A 文章編號：1007-9416（2016）12-0060-01

壓力實(shí)驗(yàn)是生產(chǎn)中常用的實(shí)驗(yàn)環(huán)節(jié)，作為保證產(chǎn)品質(zhì)量的有力措施，企業(yè)對實(shí)驗(yàn)的可靠性和有效性非常重視。依靠提高實(shí)驗(yàn)的次數(shù)和嚴(yán)格的實(shí)驗(yàn)條件，從單方面苛求完美，到了一定的階段必然會(huì)無法繼續(xù)發(fā)展。另一行之有效的方法是從提高壓力實(shí)驗(yàn)機(jī)穩(wěn)定性和精度出發(fā)，開發(fā)出專門評估壓力試驗(yàn)機(jī)穩(wěn)定性的評估系統(tǒng)，從實(shí)驗(yàn)的源頭保證實(shí)驗(yàn)的有效性，保證產(chǎn)品的質(zhì)量。

隨著計(jì)算機(jī)技術(shù)的發(fā)展，將軟件技術(shù)應(yīng)用于系統(tǒng)評估領(lǐng)域，成熟的系統(tǒng)評估理論與計(jì)算機(jī)技術(shù)相結(jié)合，可以開發(fā)出具有Windows界面風(fēng)格的可視化軟件評估系統(tǒng)。該系統(tǒng)能在線檢測壓力試驗(yàn)機(jī)的加載過程，實(shí)時(shí)的記錄并保存數(shù)據(jù)，有效的解決了實(shí)驗(yàn)的再現(xiàn)問題。系統(tǒng)穩(wěn)定性高，使用方便，便于移植，其產(chǎn)生的報(bào)表打印后可以做成隨件單，跟隨壓力試驗(yàn)機(jī)。

1 算法的分析與選擇

算法（Algorithm）是解題的步驟，可以把算法定義成解一確定類問題的任意一種特殊的方法。在計(jì)算機(jī)科學(xué)中，算法要用計(jì)算機(jī)算法語言描述，算法代表用計(jì)算機(jī)解一類問題的精確、有效的方法。

要分析壓力實(shí)驗(yàn)系統(tǒng)的穩(wěn)定性，有三種算法可以選擇：①通過比較加載速率，對超出上下限的值計(jì)數(shù)，然后用該數(shù)值除以總數(shù)，得到超過范圍的值所占的百分比。②對壓力值作圖分析，看它的變化是不是一條斜率相等的直線。③計(jì)算前后兩次壓力值的差，用它來除以時(shí)間間隔，得到壓力加載的速率，并繪制曲線，其期望值是一條直線。

上述三種算法中，第一種精確，可以給出期望的超差率直接對比得出結(jié)論，相對簡單，容易實(shí)現(xiàn)，不存在作圖，只通過簡單的計(jì)數(shù)和除法計(jì)算就可以實(shí)現(xiàn)，但不夠直觀。第二種和第三種直觀，但相對第一種不夠精確，不能肯定的給出一個(gè)結(jié)果，判斷壓力試驗(yàn)機(jī)的測試是否通過。尤其是第三種特別適合壓力實(shí)驗(yàn)系統(tǒng)。在VB6.0顯示和繪圖都很方便，可以結(jié)合使用三種方法。

2 繪圖區(qū)域作圖的實(shí)現(xiàn)

基準(zhǔn)值由用戶設(shè)定，根據(jù)用戶的設(shè)定可以在Picture1中畫出基準(zhǔn)線，程序如下：

Private Sub Text6_KeyPress（KeyAscii As Integer）

If KeyAscii = 13 Then

X = CSng（Val（Text6.Text））

Y = （7760 - 1000 / 0.48 * X）

Picture1.DrawStyle = 0

Picture1.Line （1300， Y）-（11040， Y）， RGB（0， 0， 300）

Text7.SetFocus

End If

End Sub

誤差上限由用戶設(shè)定，根據(jù)用戶的設(shè)定可以在Picture1中畫出直線，程序如下：

Private Sub Text7_KeyPress（KeyAscii As Integer）

If KeyAscii = 13 Then

X = CSng（Val（Text7.Text））

Y = （7760 - 1000 / 0.48 * X）

Picture1.DrawStyle = 2

Picture1.Line （1300， Y）-（11040， Y）， RGB（0， 0， 300）

Text8.SetFocus

End If

End Sub

誤差下限由用戶設(shè)定，根據(jù)用戶的設(shè)定可以在Picture1中畫出直線，程序如下：

Private Sub Text8_KeyPress（KeyAscii As Integer）

If KeyAscii = 13 Then

X = CSng（Val（Text8.Text））

Y = （7760 - 1000 / 0.48 * X）

Picture1.DrawStyle = 2

Picture1.Line （1300， Y）-（11040， Y）， RGB（0， 0， 300）

Text9.SetFocus

End If

End Sub

實(shí)驗(yàn)壓力曲線根據(jù)得到的壓力值繪制，程序如下：

Private Sub Text2_Change（）

z = CSng（Val（Text2.Text））

m = 8760 - 1000 / 30 * z

l = 1000 / 15 * Timer1.Interval / 1000 * i + 600

Picture1.DrawStyle = 0

Picture1.Line -（l， m）， RGB（200， 0， 0）

3 模擬實(shí)驗(yàn)

模擬實(shí)驗(yàn)只要是針對主界面的顯示和作圖功能設(shè)計(jì)的，用以調(diào)試軟件最基本的兩項(xiàng)功能。因?yàn)闆]有下位機(jī)，沒有數(shù)據(jù)來源，筆者通過算法產(chǎn)生數(shù)據(jù)，模擬壓力機(jī)的加載過程，實(shí)驗(yàn)步驟如下：

（1）設(shè)置檢測起始線、基準(zhǔn)值、誤差上限、誤差下限，其它信息可以不設(shè)置。

（2）點(diǎn)擊開始，觀察顯示和繪圖情況，分析系統(tǒng)的功能實(shí)現(xiàn)情況。

（3）點(diǎn)擊結(jié)束，停止模擬實(shí)驗(yàn)。

實(shí)驗(yàn)結(jié)果如圖1所示，圖中主窗口基本實(shí)現(xiàn)了顯示和作圖功能，符合設(shè)計(jì)要求。

4 結(jié)語

本文的研究工作初步設(shè)計(jì)了壓力實(shí)驗(yàn)機(jī)穩(wěn)定性評估的系統(tǒng)，勾畫出了系統(tǒng)的總體模型，對于具體功能的實(shí)現(xiàn)提出了方案并用VB6.0進(jìn)行了編程實(shí)現(xiàn)，最后通過模擬實(shí)驗(yàn)測試了系統(tǒng)性能。

參考文獻(xiàn)

[1]錢雪忠，周黎，錢瑛，周陽花.新編Visual Basic程序設(shè)計(jì)使用教程[M].北京：機(jī)械工業(yè)出版社，2004.

[2]羅斌.Visual Basic 2005管理系統(tǒng)開發(fā)經(jīng)典案例[M].北京：中國水利水電出版社. 2007.

[3]薩師煊，王珊.數(shù)據(jù)庫系統(tǒng)概論[M].北京：高等教育出版社.2000：65-83.

[4]黃清國.基于VB+Access絲綢企業(yè)管理系統(tǒng)的研究[D].蘇州：蘇州大學(xué)，2007.

[5]BONCHIS A，CORKE I，RYE D C.Variable structure methods in hydraulic servo systems control[J].Automatic，2001，37（4）：589-595.