2016年vb計算機基礎題庫及答案

相關推薦

2016年vb計算機基礎題庫及答案

　　一、程序改錯題

　　1. 編程求1-99的平方根的和并輸出結果。(保留兩位小數)

　　Private Sub cmdSqrt_Click()

　　Dim i As Integer, s As Single

　　s = _________

　　For i = 1 To 99

　　________________

　　Next i

　　s = Round(s, 2)

　　FontSize = 12

　　FontBold = True

　　Print s

　　End Sub

　　答案：s = s + Sqr(i)

　　a(j)+1

　　二、程序改錯題

　　1.程序功能：求當N=10時，S=1+2+3+……+N的值。程序中有一行有錯誤。改正錯誤，使它能輸出正確的結果。

　　Private Sub Command1_Click()

　　s = 0

　　n = 1

　　Do While n <= 10

　　n = n + 1

　　S = S + 1

　　Loop

　　Print “S=”;S

　　答案：第三行n = 1改成n = 0

　　三、編程題

　　1.在窗體上畫3個標簽，名稱分別為L1，L2，L3。標題分別為“操作數1”，“操作數2”和“結果”;再在窗體上畫3個命令鈕，名稱分別為cmd1,cmd2,cmd3。標題分別為“加法”，“減法”和“乘法”。最后在窗體上畫3個文本框，名稱為Text1,Text2,Text3,內容為空。編寫適當的程序，程序的功能是實現簡單的加法、減法和乘法的運算。程序的運行結果如圖1所示：

　　Private Sub cmd1_Click()

　　End Sub

　　Private Sub cmd2_Click()

　　End Sub

　　Private Sub cmd3_Click()

　　End Sub

　　答案：

　　1.加法：

　　Private Sub cmd1_Click()

　　Text3.Text = Val(Text1.Text) + Val(Text2.Text) End Sub

　　減法：

　　Private Sub cmd2_Click()