2011年計(jì)算機(jī)等級(jí)考試二級(jí)VB綜合練習(xí)題(4)

　　四、讀程序題

　　1、對(duì)窗體編寫如下代碼：

　　Option Base 1

　　Private Sub Form_KeyPress(KeyAscii As Integer)

　　a = Array(237,126,87,48,498)

　　m1 = a(1)

　　m2 = 1

　　If KeyAscii = 13 Then

　　For i =2 To 5

　　If a(i)>ml Then

　　m1 =a(j)

　　m2 =i

　　End If

　　Next i

　　End If

　　Print m1

　　Print m2

　　End Sub

　　程序運(yùn)行后，按回車鍵，輸出結(jié)果是什么?

　　2、閱讀下面的程序，寫出執(zhí)行結(jié)果。

　　Private Sub Form_load()

　　Form1.show

　　d = 0

　　For a = 1 To 2

　　For b = 1 To a

　　For c = b To 5

　　d = d + 1

　　Next c

　　Next b

　　Next a

　　Print d

　　End Sub

　　五、編程題

　　1、在窗體上有一個(gè)文本框控件，名稱為TxtTime;一個(gè)計(jì)時(shí)器控件，名稱為Timer1，要求每一秒在文本框中顯示一次當(dāng)前的時(shí)間，請(qǐng)編程實(shí)現(xiàn)。

　　2、在Text1中輸入任一英文字母，在Text2中顯示該英文字母及其ASCII碼值。要求在文本框Text2中顯示出所有輸入的英文字母及其ASCII碼值，如下圖所示。

　　3、編寫一個(gè)程序，能夠?qū)崿F(xiàn)任意個(gè)整數(shù)的排序。

　　4、編程實(shí)現(xiàn)以下功能：用戶首先分別在兩個(gè)文本框中輸入兩個(gè)數(shù)，然后在具有“加、減、乘、除”等四個(gè)菜單項(xiàng)的“計(jì)算”菜單中單擊某一項(xiàng)，即可在標(biāo)簽中顯示出相應(yīng)的結(jié)果或者錯(cuò)誤提示。

　　5、編程實(shí)現(xiàn)任意兩個(gè)數(shù)的“加、減、乘、除”。

　　6、編寫一個(gè)程序，能夠求任意個(gè)正整數(shù)的最大值和最小值。

　　7、編程求任意兩個(gè)正整數(shù)的最大公約數(shù)。

　　　　　　　2011年計(jì)算機(jī)等級(jí)考試二級(jí)VB基礎(chǔ)教程匯總

　　　　　　　2011計(jì)算機(jī)等級(jí)考試二級(jí)VB綜合練習(xí)題匯總