[問答題] 在考生文件夾下有工程文件djks044.vbp及窗體文件djks044.frm,該程序是不完整的,請在有的地方填入正確內(nèi)容,然后刪除及所有注釋符(&
[問答題] 在考生文件夾下有工程文件djks044.vbp及窗體文件djks044.frm,該程序是不完整的,請在有的地方填入正確內(nèi)容,然后刪除及所有注釋符(’),但不能修改其他部分。存盤時不得改變文件名和文件夾。本題描述如下:在Form1窗體上建立一個名稱為Op1的單選按鈕數(shù)組,含有三個單選按鈕,其標題分別為“10!”、“11!”、“12!”,Index屬性分別為0、1、2;再畫兩個命令按鈕,按鈕的名稱分別為Cmd1與Cmd2,標題分別為“計算”與“保存”;畫一個名稱為Tex1的文本框。程序的功能是在選定一個單選框并單擊“計算”按鈕后,可以計算出相應(yīng)的階乘值,在Text1中顯示該值。單擊“保存”,文本框中的數(shù)據(jù)可以保存到考生文件夾下的out044.txt文件夾中。注意窗體加載時,Cmd2按鈕不可用,單擊“計算”按鈕后,Cmd2變?yōu)榭捎谩3绦蜻\行時的窗體界面如下圖所示。試題源程序1 Private Sub Cmd1_Click( )2 Cmd2.Enabled=True3 Dim i As Integer4 Dim t As Integer5 For i=0 To 26 If Opl(i)=True Theni. t=Val(Left$(Op1(i).Caption,))ii. Text1.Text=(t)7 End If8 Next i9 End Sub10 Function Out(n As Integer)11 Dim i As Integer12 Dim t As Long13 t=114 For i=2 To n15 Print16 Next i17 Out=t18 End Funtion19 Private Sub Cmd2_Click( )20 Open App.Path &a
正確答案:1.單擊考試界面的“功能”選項,從彈出的菜單中選擇“啟動應(yīng)用程序”選項。Visual Basic啟動后,打開考生文件下的工程文件。2.分別單擊工具箱的按鈕控件及文本框控件,在窗體上畫出一個文本框和一個控制按鈕。文本框的Name屬性為Text1;控制按鈕的Name屬性為Cmd1,Caption屬性為“計算”。雙擊工具箱中的單選按鈕,在窗體上復(fù)制該按鈕,然后粘貼,在彈出的對話框中選擇“是”,建立一個包含三個單選按鈕
參考解析:本題程序代碼中包含一個函數(shù)過程Out,該過程用來計算以n為參數(shù)的階乘。第三個處填t=t*i,表示階乘,階乘值賦給t。第二個處填Out,表示對函數(shù)過程的引用。第一個處填2。Left$(Opl(i).Caption,2)表示返回字符串Opl(i).Caption從左開始的2個字符,即需要傳給Out過程的實參。
詞條內(nèi)容僅供參考,如果您需要解決具體問題
(尤其在法律、醫(yī)學(xué)等領(lǐng)域),建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。