【说明】
以下代码实现了当用户退出界面时，判断TextEdit中的文字是否发生改变，弹出对话框判断，让用户选择是否保存文件或取消退出界面操作。阅读下面的代码，将其补充完整。
【代码7-1】
Begin VB.Form Forml
//...窗体描述(略)
Begin VB.TextBox TextEdit
Height = 1830
Left = 180
Tablndex = 0
Text = "TextEdit"
Top = 360
Width = 3885
End
//...窗体描述(略)
End
【代码7-2】
Dim txtchange As Boolean
Dim myval As String
Private Sub Form Load （ ）
TextEdit.Text: "CIU, 中国软考联盟!"
txtchange = False
End Sub
【代码7-3】
Private Sub TextEdit_Change （ ）
Static notchange As Boolean
(1)
notchange = Tree
End Sub
Private Sub Form_Unload ( Cancel As Integer )
Dim myval As String
If (2) Then
myval = MsgBox ( "保存文件的更改吗", vbYesNoCancel, "提示信息" )
If (3) Then
MsgBox "保存成功"
End
End If
If (4) Then End
If (5) Then Cancel = 1
End If
End Sub
完成了状态初始化。(2)文字发生了改动，txtchange=True，向用户发出提示信息，弹出对话框。 (3)、(4)、(5)根据对话框的返回值做出相应的反应。 (1) txtchange = notchange
窗体设计中，决定了按【Tab】键时焦点在各个控件之间移动顺序的属性是______。
A:Index B:TabStop C:Tablndex D:SetFoCUS
在窗体上有若干控件，其中有一个名称为Text1的文本框。影响Text1的Tab顺序的属性是( )。
A:TabStop B:Enabled C:Visible D:Tablndex
在窗体上有若干控件，其中有一个名称为Text1文本框。影响Text1的Tab顺序的属性是 ______ 。
A:TabStop B:Enabled C:Visible D:Tablndex
在列表框中，当前被选中的列表项的序号由下列( )属性表示。
A:List B:Index C:Listlndex D:Tablndex
控件______ 属性的设置，可使该控件不能通过Tab键得到焦点。
A:TabStop B:Tablndex C:GotFocus D:SetFocus
在列表框中，当前被选中的列表项的序号由下列( )属性表示。
A:List B:Index C:Listlndex D:Tablndex
在窗体上有若干控件，其中有一个名称为Text1的文本框。影响Text1的Tab顺序的属性是( )。
A:TabStop B:Enabled C:Visible D:Tablndex
单项选择
