第九章

一、選擇題：
1—3:?ADD
二、填空題
1．下拉式?彈出式?2．PopupMenu?
3．Visible?Enabled?4．-
三、編程題(略)

第十章

?一、選擇題：
1—3:?DBD
二、填空題
1．Load?2．窗體模塊?標準模塊?類模塊?
3．DoEvents
三、編程題
1．(略)
2．Function?F(ByVal?x&,ByVal?Y&)?As?Integer
Dim?t&,r&
If?x<Y?Then?t="x:x=y:y=t?R=?x?Mod?y
Do?While?R<>0
X=y
Y=r
R=?x?Mod?y
Loop
F=y
End?Function

Private?Sub?Command1_Click()
Text3?=?Val(Text1)?/?F(Val(Text1),?Val(Text2))
Text4?=?Val(Text2)?/?F(Val(Text1),?Val(Text2))
End?Sub