[問答題] 完成下列問題:在名稱為Form1的窗體上畫一個名稱為Shape1的形狀控件,位置在窗體的頂部,在屬性窗口中將其設(shè)置為圓形。畫一個名稱為Timer1的
[問答題] 完成下列問題:
在名稱為Form1的窗體上畫一個名稱為Shape1的形狀控件,位置在窗體的頂部,在屬性窗口中將其設(shè)置為圓形。畫一個名稱為Timer1的計時器,在屬性窗口中將其設(shè)置為不可用,時間間隔為0.5s,窗體如圖2所示。請編寫窗體的Load事件過程和計時器的事件過程,使得程序一開始運(yùn)行.計時器即變?yōu)榭捎?,且每?.5s形狀控件向下移動100。
注意:要求程序中不得使用變量,每個事件過程中只能寫一條語句。存盤時必須存放在考生文件夾下,工程文件名為sjt2.vbp,窗體文件名為sjt2.frm。
正確答案:[操作步驟] 第1步:新建一個標(biāo)準(zhǔn)的EXE工程,保持現(xiàn)有窗體默認(rèn)屬性值不變。 第2步:在窗體上畫一個形狀控件,保持其名稱Shape1不變,修改其Top屬性值為0,修改其Shape屬性值為3-Circle。 第3步:在窗體上畫一個計時器控件,修改其Enabled屬性值為False,修改其Interval屬性值為500。 第4步:編寫代碼。在代碼編寫窗口中,分別編寫窗體的Load事件過程和計時器的Timer事件過程。 Private Sub Form_Load() Timer1.Enabled=T
參考解析:形狀控件的位置由其Left和Top屬性控制,將其Top屬性設(shè)置為0可使形狀控件緊貼窗體的上邊界;形狀控件的形狀由Shape屬性控制,要顯示為圓形,則需要將Shape屬性設(shè)置為3-Circle。計時器控件的是否可用由Enabled屬性控制,在計時器控件的Timer事件過程中改變形狀控件的Top屬性可以使得形狀控件在豎直方向連續(xù)移動。
詞條內(nèi)容僅供參考,如果您需要解決具體問題
(尤其在法律、醫(yī)學(xué)等領(lǐng)域),建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。