[工學(xué)]實(shí)驗(yàn)四vb循環(huán)控制語句(參考版)
2024-08-28 01:18本頁面
【正文】 五、實(shí)驗(yàn)調(diào)試與結(jié)果分析六、總結(jié)。 sumPrint 循環(huán)變量的值為:。 sumPrint 循環(huán)變量的值為:。 sumPrint 循環(huán)變量的值為:。 sumPrint 循環(huán)變量的值為:。 sumPrint 循環(huán)變量的值為:。 sumPrint 循環(huán)變量的值為:。4. 利用ＶＢ創(chuàng)建一個(gè)標(biāo)準(zhǔn)exe程序，求解如下問題：１＋１/2+1/4+……+1/50的值．要求將結(jié)果打印在程序的窗體上．:\vb\4的目錄下（本題要求采用循環(huán)語句來完成）．操作步驟如下：(1)啟動(dòng)Visual Basic(2)窗體屬性設(shè)置如下：控件名稱屬性Form1Caption=“求解運(yùn)算”（3）雙擊窗體，打開代碼窗口，在Form_Click()事件中輸入如下代碼：Private Sub Form_Click()Dim sum As SingleDim i As Integersum = 1For i = 2 To 50 Step 2 sum = sum + 1 / CLng(i) Next i Print sumEnd Sub（4）單擊“文件”/“保存工程”菜單項(xiàng)，:\VB程序內(nèi)。 。 For k = 1 To j temp = j * k Print Tab(k * 6)。 Next i PrintFor j = 1 To 9 Print j。 九九乘法表Print: PrintPrint For i = 1 To 9 Print Tab(i * 6)。 sum = sum + number If (number max) Then max = number End If If (number min) Then min = number End If Next average = sum / 10 = max = min = average在mand2_click()事件中輸入End（5）單擊“文件”/“保存工程”菜單項(xiàng)，:\VB程序內(nèi)。實(shí) 驗(yàn) 報(bào) 告學(xué)院： 專業(yè)： 年級(jí)： 2006
范文總結(jié)相關(guān)推薦
鄂ICP備17016276號(hào)-1