1.結(jié)構(gòu)化程序設計的三種基本邏輯結(jié)構(gòu)為順序、選擇和【1】。

　　2.冒泡排序算法在最好的情況下的元素交換次數(shù)為【2】。

　　3.軟件結(jié)構(gòu)是以【3】為基礎而組成的一種控制層次結(jié)構(gòu)。

　　4.在面向?qū)ο蟮脑O計中，用來請求對象執(zhí)行某一處理或回答某些信息的要求稱為【4】。

　　5.關系數(shù)據(jù)庫的關系演算語言是以【5】為基礎的DML語言。

　　6.要使工具欄控件的某按鈕呈按鈕菜單的樣式，可以在其屬性頁中設置其【6】選項為5-tbrDropDown。

　　7.在窗體上畫兩個文本框和一個命令按鈕，然后在代碼窗口中編寫如下事件過程：

　　Private Sub Command1_Click()

　　Text1.Text="VB Programming"

　　Text2.Text=Text1.Text

　　Text1.Text="ABCD"

　　End Sub

　　8.下面的程序代碼實現(xiàn)將一個一維數(shù)組中元素向右循環(huán)移動，移動次數(shù)由文本框Textl輸入。例如數(shù)組各元素的值依次為0，1，2，3，4，5，6，7，8，9，10;移動三次后，各元素的值依次為8，9，10，0，1，2，3，4，5，6，7。

　　Private Sub MoveRight(x()As Integer)

　　Dim i As Integer

　　Dim j As Integer

　　Dim k As Integer

　　i=UBound(x)

　　j=x(i)

　　For k=i To【9】Step-1

　　【10】

　　Next k

　　x(LBound(x))=j

　　End Sub

　　Private Sub Command1_Click()

　　Dim a(10) As Integer

　　Dim i As Integer

　　Dim j As Integer

　　Dim k As Integer

　　For i=0 To 10

　　a(i)=i

　　Next i

　　j=Val(Text1.Text)

　　k=0

　　Do

　　k=k+1

　　Call MoveRight(a)

　　Loop Until k=j

　　For i=0 To 10

　　Print a(i);

　　Next i

　　End Sub

　　9.下面程序是用來打印九九乘法表的，請?zhí)羁铡?/P>

　　Private Sub Form_Click()

　　Dim flag As Integer,i As Integer,j As Integer,Str1 $

　　Str1=“”

　　For i=1 To 9

　　【11】

　　For j=1 To 9

　　If 【12】Then

　　str1=str1+Str$(j)+“*”+Str$(i)+“=”+Str$(Val(i*j))

　　Else

　　str1=str1 & Chr(13)

　　Exit For

　　End If

　　Next j

　　Next i

　　Print str1

　　End Sub

　　10.把一個磁盤文件的內(nèi)容讀到內(nèi)存并在文本框中顯示出來，然后把該文本框中的內(nèi)容存入另一個磁盤文件，請?zhí)羁胀瓿沙绦�。在窗體上建立一個文本框，在屬性窗口中把該文本框的MultiLine屬性設置為True，Examda提示：然后編寫如下的事件過程：

　　Private Sub Form_Click()

　　Open癉：\ test1.txt”For Input As # 1

　　Text1.FontSize=14

　　Text1.FontName=“幼圓”

　　Do While Not EOF(1)

　　【13】

　　whole$=whole$+aspect$+Chr$(13)+Chr$(10)

　　Loop

　　Text1.Text=【14】

　　Close

　　Open“D：\ test2.txt”For Output As # 1

　　Print # 1,【15】

　　Close

　　End Sub

　　參考答案

　　1.【1】重復(或循環(huán))

　　2.【2】0

　　3.【3】模塊

　　4.【4】消息

　　5.【5】謂詞演算

　　6.【6】樣式

　　7.【7】ABCD 【8】VB Programming

　　8.【9】LBound(x)+1 【10】x(k)=x(k-1)

　　9.【11】Flag=i 【12】j

　　10.【13】Line Input # 1,aspect$ 【14】Whole$ 【15】Text1.text