VB教案(4-1) - 图文

(4) 数据控件常用方法

?

?

?

Refresh:激活控件；

Private Sub Form_Load()Dim mpath As String

mpath = App.Path ‘当前路径

If Right(mpath, 1) <> \= mpath + \

Data1.DatabaseName = mpath & \

Data1.RecordSource = \基本情况\Data1.RefreshEnd Sub

(4) 数据控件常用方法

??

UpdateControls:终止修改

Private Sub Data_Validate(Action As Integer, Save As Integer)

If Save = -1 And Len(Trim(Text3)) = 0 Then Data.UpdateControls

?

End Sub

(5)记录集常用属性

?AbsolutePosition:当前指针值；?Bof和Eof:首记录和末记录；?Bookmark:指针标签；?Nomarch:匹配记录；?

RecordCount:记录计数。

(6) 记录集常用方法

?

Move:MoveFirstMoveNextMove[n]

、MovePrevious、MoveLast、、?

Find: FindFirstFindNext、、FindLast、FindPrevious

格式：数据集合.Find 方法条件