女人久久久www免费人成看片,国内自拍偷拍网,国产一区二区三区免费在线观看,欧美精品三区四区,91久久国产综合久久91,欧美成人精品第一区二区三区 ,美女成人在线观看

軟題庫 移動(dòng)APP 掃碼下載APP 隨時(shí)隨地移動(dòng)學(xué)習(xí) 培訓(xùn)課程
試卷名稱 2006年下半年程序員考試下午真題試題(案例分析)
考試中心《2006年下半年程序員考試下午真題試題(案例分析)》在線考試
試卷年份2006年下半年
試題題型【分析簡答題】
試題內(nèi)容

閱讀以下應(yīng)用說明以及用Visual Basic編寫的程序代碼,將應(yīng)填入(n)處的字句寫在答題紙的對應(yīng)欄內(nèi)。
【應(yīng)用說明】
某應(yīng)用程序用于監(jiān)測某種設(shè)備的工作溫度(20~200度),其運(yùn)行窗口中,包括一個(gè)溫度計(jì)(矩形形狀shpMeter)以及其中指示當(dāng)前設(shè)備溫度的水銀柱(矩形形狀shpT),文字標(biāo)簽標(biāo)記了溫度刻度;另有一個(gè)圖片框picCurve,用于動(dòng)態(tài)描述檢測到的溫度曲線(用戶見到的曲線與水銀柱等高變化);命令按鈕“開始檢測”(cmdStart)用于啟動(dòng)溫度檢測,命令按鈕“暫停檢測”(cmdStop)用于暫停檢測。
    矩形形狀shpT(水銀柱)屬性visible初始設(shè)置為不可見,屬性Filltype設(shè)置為solid(實(shí)心),F(xiàn)illColor設(shè)置為紅色;圖片框picCurve的屬性AutoRedraw設(shè)置為True;再創(chuàng)建一個(gè)定時(shí)器TimT,屬性Enabled初始設(shè)置為False(不起作用),屬性Interval(定時(shí)間隔)設(shè)置為500毫秒。
    為模擬設(shè)備溫度的檢測,程序中利用了(0,1)之間均勻分布的偽隨機(jī)數(shù)獲得[20,200]之間的隨機(jī)溫度T。為了便于在圖片框picCurve中繪制曲線,程序中對該圖片框建立了坐標(biāo)系統(tǒng),左上角為原點(diǎn)(0, 0),水平向右方向?yàn)閄軸,垂直向下方向?yàn)閅軸,右下角坐標(biāo)為(50, 180)。為了便于觀察記錄的溫度值,圖片框中從上到下創(chuàng)建了5條水平線Ls(i),i=0,1, …4,并在程序中按等間隔排列進(jìn)行位置設(shè)置。程序中每隔半秒算出曲線點(diǎn)(x, y),其中x=0, 1, 2,…,再用直線段連接各相鄰曲線點(diǎn)形成溫度曲線。

【Visual Basic程序代碼】
Dim  (1)  As Integer    ‘聲明全局變量
Private Sub CmdStart Click()
  TimT. Enabled = True
  ShpT. Visible = True
End Sub
Private Sub CmdStop__Click()
    TimT. Enabled=False
End Sub
Private Sub Form_Load()
    Dim i,H As Integer
    PicCurve.Scale (0,0)一(50,180) ‘設(shè)置圖片框坐標(biāo)系:左上角一右下角
    H = 30    ‘H等于圖片框高度的六分之一
    For i = 0 To 4 ‘設(shè)置5條水平線Ls(i)的位置
  Ls(i).Xl=0    ‘Ls(i)起點(diǎn)橫坐標(biāo)
  Ls(i).Y1=H* (2)  ‘Ls(i)起點(diǎn)縱坐標(biāo)
  Ls(i).X2=50  ‘Ls(i)終點(diǎn)橫坐標(biāo)
  Ls(i).Y2=Ls(i).Y1    ‘Ls(i)終點(diǎn)縱坐標(biāo)
  Ls(i).BorderColor=&HC0C0C0  ‘設(shè)置水平線顏色
    Next i
    x=0  ‘設(shè)置曲線坐標(biāo)初值
End Sub
Private Sub timT Timer()
  Dim T, H As Integer    ‘T為即時(shí)溫度,H為圖片框中溫度點(diǎn)顯示高度
    T=Int(Rnd*181)+20   ‘模擬隨機(jī)產(chǎn)生設(shè)備溫度(20-200度)
按當(dāng)前溫度顯示水銀柱
  H=ShpMeter.Height*  (3)    ‘算出水銀柱的高度
  ShpT. Top=  (4)   - H   ‘設(shè)置水銀柱頂部位置
  ShpT. Height=H    ‘設(shè)置水銀柱的高度
繪制溫度曲線
  y=   (5)      ‘算出曲線上當(dāng)前點(diǎn)的縱坐標(biāo)
    If x=51 Then  ‘當(dāng)超出圖片框時(shí)
  PicCurve. Cls   ‘清除圖片框內(nèi)以前畫的曲線
  x = 0    ‘設(shè)置重畫曲線的初值
    ElseIf x > 0 Then    ‘除左邊點(diǎn)外
  PicCurve. Line(x-1, Lasty)-(x, y),vbRed 由前1點(diǎn)到當(dāng)前點(diǎn)畫紅色線段
    End If
    x = x + 1    ‘準(zhǔn)備下一點(diǎn)坐標(biāo)
  Lasty = y    ‘保存當(dāng)前坐標(biāo)供下次使用
End Sub


相關(guān)試題

推薦文章
合作網(wǎng)站內(nèi)容