- 相關(guān)推薦
2016年vb計(jì)算機(jī)基礎(chǔ)題庫(kù)及答案
一、程序改錯(cuò)題
1. 編程求1-99的平方根的和并輸出結(jié)果。(保留兩位小數(shù))
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
二、程序改錯(cuò)題
1.程序功能：求當(dāng)N=10時(shí)，S=1+2+3+……+N的值。程序中有一行有錯(cuò)誤。改正錯(cuò)誤，使它能輸出正確的結(jié)果。
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個(gè)標(biāo)簽，名稱分別為L(zhǎng)1，L2，L3。標(biāo)題分別為“操作數(shù)1”，“操作數(shù)2”和“結(jié)果”;再在窗體上畫3個(gè)命令鈕，名稱分別為cmd1,cmd2,cmd3。標(biāo)題分別為“加法”，“減法”和“乘法”。最后在窗體上畫3個(gè)文本框，名稱為Text1,Text2,Text3,內(nèi)容為空。編寫適當(dāng)?shù)某绦�，程序的功能是�?shí)現(xiàn)簡(jiǎn)單的加法、減法和乘法的運(yùn)算。程序的運(yùn)行結(jié)果如圖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()
Text3.Text = Text1.Text - Text2.Text End Sub
乘法：
Private Sub cmd3_Click()
Text3.Text = Text1.Text * Text2.Text End Sub
2.在窗體上有一個(gè)命令按鈕：Command1,4個(gè)文本框控件：Text11~Text4功能是找出三個(gè)數(shù)中的最大數(shù)，界面如下圖所示：
Private Sub Command1_Click()
End Sub
答案：
Dim a!,b!,c!,max!
a = Text1.Text
b = Text2.Text
c = Text3.Text
max = a
If b > max Then max = b
If c > max Then max = c
Text4.Text = max
【vb計(jì)算機(jī)基礎(chǔ)題庫(kù)及答案】相關(guān)文章：
2016年計(jì)算機(jī)基礎(chǔ)題庫(kù)與答案08-03
計(jì)算機(jī)二級(jí)《VB》上機(jī)題題庫(kù)(含答案)05-22
2016計(jì)算機(jī)二級(jí)《VB》基礎(chǔ)習(xí)題及答案07-19
計(jì)算機(jī)二級(jí)考試《VB》基礎(chǔ)習(xí)題及答案07-22
計(jì)算機(jī)二級(jí)《VB》選擇題題庫(kù)及答案201704-08
9月全國(guó)計(jì)算機(jī)二級(jí)vb題庫(kù)及答案05-14
體育基礎(chǔ)知識(shí)題庫(kù)及答案07-03