|
Refresh
强制全部重绘一个窗体或控件。
语法：object.Refresh
说明：
在下列情况下使用 Refresh 方法：
在另一个窗体被加载时显示一个窗体的全部。
更新诸如 FileListBox 控件之类的文件系统列表框的内容。
更新 Data 控件的数据结构。
Refresh 方法不能用于 MDI 窗体，但能用于 MDI 子窗体。不能在 Menu 或 Timer 控件上使用
Refresh 方法。
通常，如果没有事件发生，窗体或控件的绘制是自动处理的。但是，有些情况下希望窗体或控件立即更新。例如，如果使用文件列表框、目录列表框或者驱动器列表框显示当前的目录结构状态，当目录结构发生变化时可以使用
Refresh 更新列表。
可以在 Data 控件上使用 Refresh 方法来打开或重新打开数据库（如果 DatabaseName, ReadOnly,
Exclusive 或 Connect 属性的设置值发生改变），并能重建控件的 Recordset 属性内的 dynaset。
例：本例在创建测试文件时使用 Refresh 方法更新 FileListBox 控件。要试用此例，将以下代码粘贴至带有名为
File1 的 FileListBox 控件的窗体的声明部分，然后执行此例并单击窗体。
Private Sub Form_Click ()
' 声明变量。
Dim FilName, Msg as String, I as Integer
File1.Pattern = "TestFile.*" ' 设置文件模式。
For I = 1 To 8 ' 执行八次。
FilName = "TESTFILE." & I
' 建立空文件。
Open FilName For Output As FreeFile
File1.Refresh ' 刷新文件列表框。
Close ' 关闭文件。
Next I
Msg = "Choose OK to remove the created test files."
MsgBox Msg ' 显示消息。
Kill "TESTFILE.*" ' 删除测试文件。
File1.Refresh ' 更新文件列表框。
End Sub
RemoveItem
用以从 ListBox 或 ComboBox 控件中删除一项，或从 MS Flex Grid 控件中删除一行。不支持命名参数。
语法：object.RemoveItem index
index 必需的。一个整数，它表示要删除的项或行在对象中的位置。对于 ListBox 或 ComboBox 中的首项或 MS
Flex Grid 控件中的首行，index = 0。
说明：
被绑定到 Data 控件的 ListBox 或 ComboBox 不支持 RemoveItem 方法。
例：本示例使用 Removeltem 方法将一个列表框中的输入项删除。要检验此示例，可将本例代码粘贴到一个带有名为 List1
的一个 ListBox 控件的窗体的声明部分，然后按 F5 键并单击该窗体。
Private Sub Form_Click ()
Dim Entry, I, Msg ' 声明变量。
Msg = "Choose OK to add 100 items to your list box."
MsgBox Msg ' 显示信息。
For I = 1 To 100 ' 计数值从 1 到 100。
Entry = "Entry " & I ' 创建输入项。
List1.AddItem Entry ' 添加该输入项。
Next I
Msg = "Choose OK to remove every other entry."
MsgBox Msg ' 显示信息。
For I = 1 To 50 ' 确定如何
List1.RemoveItem I ' 每隔一项
Next I ' 删除。
Msg = "Choose OK to remove all items from the list box."
MsgBox Msg ' 显示信息。
List1.Clear ' 清除列表框。
End Sub
|
