影音先锋AⅤ天堂资源站,13小箩利洗澡无码视频APP,午夜理论片日本中文在线,最近新免费韩国日本电影

萬能百科  > 計(jì)算機(jī)?  > 

[問答題] 完成下列問題:在考生文件夾下有工程文件sjt3.vbp。程序運(yùn)行時(shí)的窗體如圖3所示。輸入商品名稱后,選中一種付款方式,則“成交”按鈕變?yōu)榭捎?,選擇一

2021-07-20   

[問答題] 完成下列問題:

在考生文件夾下有工程文件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è)人士。

標(biāo)簽

<蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <文本链> <文本链> <文本链> <文本链> <文本链> <文本链>