一、選擇題
1、任何控件都有的屬性是( )。
A.BackColor
B.Caption
C.Name
D.BorderStyle
2、設(shè)計數(shù)據(jù)庫的存儲結(jié)構(gòu)屬于( )
A.需求分析
B.概念設(shè)計
C.邏輯設(shè)計
D.物理設(shè)計
3、某人創(chuàng)建了1個工程,其中的窗體名稱為Form1;之后又添加了1個名為Form2的窗體,并希望程序執(zhí)行時先顯示Form2窗體,那么,他需要做的工作是( )。
A.在工程屬性對話框中把"啟動對象"設(shè)置為Form2
B.在Forml 的Load 事件過程中加入語句Load Form2
C.在Form2的Load 事件過程中加入語句Form2.Show
D.把Form2的TabIndex 屬性設(shè)置為l ,把Form1的TabIndex 屬性設(shè)置為2
4、設(shè)有如下通用過程:
Public Function Fun(xStr As Stri ng)As Stri ng
Di mt Str As Stri ng ,strLAs Integer
tStF=""
strL=Len(xStr)
i =1 Do While i <=strL/2
tStr =Tstr &Mid(xStr ,i ,1)&Mid(xStr ,strL-i+1,1)
i =i +l
Loop
Fun =tStr
End Function
在窗體上畫一個名稱為Co mmand1的命令按鈕。然后編寫如下的事件過程:
Private Sub Co mmandI_Click()
Di mS1As Stri ng
S1="abedef"
Pri m UCase(Fun(S1))
End Sub
程序運行后,單擊命令按鈕,輸出結(jié)果是( )。
A.ABCDEF
B.abcdef
C.AFBECD
D.DEFABC
5、下列關(guān)于棧的描述正確的是( )。
A.在棧中只能插入元素而不能刪除元素
B.在棧中只能刪除元素而不能插入元素
C.棧是特殊的線性表,只能在一端插入或刪除元素
D.棧是特殊的線性表,只能在一端插入元素,而在另一端刪除元素
6、下列程序段的運行結(jié)果是( )。
Sub sele( )
Di mn As Integer
i =21:n =3
Do While i >n
i =i -n
Loop
Print i
End Sub
A.2
B.4
C.5
D.3
7、復(fù)選框的Value 屬性為0時,表示該復(fù)選框( )。
A.未被選中
B.被選中
C.框內(nèi)有灰色的勾
D.操作有誤
8、在窗體上有一個名稱為Check1的復(fù)選框數(shù)組(含4個復(fù)選框),還有一個名稱為Text1的文本框,初始內(nèi)容為空。程序運行時,單擊任何復(fù)選框,則把所有選中的復(fù)選框后面的方字羅列在文本框中(見圖)。下面能實現(xiàn)此功能的事件過程是( )。
A.Private Sub Check1_Click(Index As Integer)
Text1.Text =""
For k =0To 3
If Check1(k).value =1Then
Text1.Text =Text1.Text &Check1(k).Caption &""雙引號中是空格 End If Next k
End Sub
B.Private Sub Check1_Click(Index As Integer)
For k =0To 3
If Check1(k).Value =1Then
Text1.Text =Text1.Text &Check1(k).Caption &""雙引號中是空格
End If
Next k
End Sub
C.Private Sub Check1_Click(Index As Integer)
Text1.Text ="" For k =0To 3 If Check1(k).Value =1Then
Text1.Text =Text1.Text &Check1(Index).Caption &""雙引號中是空格
End If
Next k
End Sub
D.Private Sub Check1_Click(Index As Integer)
Text1.Text ="" For k =0To 3
If Check1(k).Value =1Then
Text1.Text =Text1.Text &Check1(k).Caption &""雙引號中是空格
Exit For
End If
Next k
End Sub
9、在窗體上添加一個命令按鈕,名為Co mmand1,其單擊事件中有下列程序段,則事件過程執(zhí)行后,文本框中輸出
( )。
For i =1To 4
For j=1To 3
x=3
For k =1To 2
x=x+3
Next k
Next j
Next i
Textl .Text =Str(x)
A.3
B.6
C.9
D.12
10、下列關(guān)于Sub 過程的敘述正確的是( )。
A.一個Sub 過程必須有一個Exit Sub 語句
B.一個Sub 過程必須有一個End Sub 語句
C.在Sub 過程中可以定義一個Function 過程
D.可以用Goto 語句退出Sub 過程
北京 | 天津 | 上海 | 江蘇 | 山東 |
安徽 | 浙江 | 江西 | 福建 | 深圳 |
廣東 | 河北 | 湖南 | 廣西 | 河南 |
海南 | 湖北 | 四川 | 重慶 | 云南 |
貴州 | 西藏 | 新疆 | 陜西 | 山西 |
寧夏 | 甘肅 | 青海 | 遼寧 | 吉林 |
黑龍江 | 內(nèi)蒙古 |