以下是引用yiyaozjk在2011-8-26 11:44:17的发言：

我的代码如下: 希望能实现:第一次加载窗体时,也能显示出第2条记录的图片内容:...
只有点击了Adodc1中那四个移动记录的按钮,才会显示出对应的图片(说明绑定正确对吧),但为什么加载窗体时不能显示图片内容呢???    不解  ,求高手指点::

Private Sub Form_Load()
    Dim s(2) As Integer
    With Adodc1
        n = .Recordset.RecordCount
        For i = 0 To n - 1
            For j = 0 To 2
             ''   s(j) = s(j) + .Recordset.Fields(3 + j)
            Next j
        .Recordset.MoveNext
        Next i
    End With
    For i = 0 To 2
        lblAve(i).Caption = i         ' Format(s(i) / n, "###.#")     '用了数组标签，直接返回一个数值
    Next i
    lblCount.Caption = n            
    Set Text1.DataSource = Adodc1     '这里不加set 会报对象或方法错误
    Text1.DataField = "ygname"   (文本字段)           
    Picture1.DataField = "ygpicuter"  (图片字段)   '我在加了这句, 但是图片在第一次加载窗体无法显示图片内容,只有点击了Adodc1中那四个移动记录的按钮,才会显示出对应的图片(说明绑定正确对吧)

    Adodc1.Recordset.MoveFirst    '为了防止窗体加载时文本框内容为空,就让指针,指向第一条记录,
    Adodc1.Recordset.MoveNext          ''文本框内就会自动加载该记录该第2条记录该字段的内容
    'Picture1.Picture = Adodc1.Recordset.Fields(2) 'End Sub