[問答題] 完成下列問題:在考生文件夾下有工程文件sjt3.vbp。程序運(yùn)行時(shí)的窗體如圖3所示。輸入商品名稱后,選中一種付款方式,則“成交”按鈕變?yōu)榭捎?,選擇一
[問答題] 完成下列問題:
在考生文件夾下有工程文件sjt3.vbp。程序運(yùn)行時(shí)的窗體如圖3所示。輸入商品名稱后,選中一種付款方式,則“成交”按鈕變?yōu)榭捎?,選擇一種或多種“服務(wù)”后,單擊“成交”按鈕,則把相應(yīng)信息顯示在下面的圖片框中,如圖4所示。若不選任何“服務(wù)”,則顯示如圖5所示。單擊“放棄”按鈕,則恢復(fù)到圖3狀態(tài)。
程序已經(jīng)給出但不完整,請(qǐng)?jiān)跈M線處填寫正確的內(nèi)容,以實(shí)現(xiàn)上述功能。
要求:考生不得修改窗體文件中已經(jīng)存在的控件和程序,最后把修改后的文件按原文件名存盤。
[題目提供的源程序]
Private Sub Command1_Click()
Dim flag As Boolean
flag=False
Picture1.Print Label1.Caption, Text1.Text
Picture1.Print Frame1.Caption; ":",
For k=0 To 3
If Optionl(k).Value=True Then
Picture1.Print Optionl(k).Caption
End If
Next k
For k=0 To 2
If Check1(k).Value= (1) Then
If Not flag Then&l
正確答案:[操作步驟] 第1步:打開工程文件sjt3.vbp。 第2步:分析并修改源程序。 第3步:調(diào)試、運(yùn)行并保存程序。 [1]1 [2]Text1.Text [3]Command1.Enabled=True
參考解析:本題需完成3個(gè)事件過程的修改:一是單擊單選按鈕時(shí)執(zhí)行Option1_Click過程,修改“成交”按鈕為可用,即Command1.Enabled=True;二是單擊“成交”按鈕執(zhí)行Command1_Click過程,此過程在圖片框中輸出Text1中的內(nèi)容,再根據(jù)單選按鈕和復(fù)選框的選中狀態(tài)輸出其他信息,其中,當(dāng)復(fù)選框的值為1時(shí),表示該復(fù)選框被選中,[1]處應(yīng)填1;三是單擊“放棄”按鈕時(shí),程序回到初始狀態(tài),需要清空文本框的內(nèi)容,即Text1.Text="",并將所有單選按鈕和復(fù)選框修改為未選中狀態(tài)。
詞條內(nèi)容僅供參考,如果您需要解決具體問題
(尤其在法律、醫(yī)學(xué)等領(lǐng)域),建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。