HScroll与VScroll在两个pic中的设置问题，高手帮解决一下！

我在画图是PIC.line时，很大，想用HScroll与VScroll在两个pic（，pic1为容器，）中的设置，可以实现滚动，我的代码如下，但是总是提示：编译错误：未找到方法或数据成员。错误的地方提示是.Max = 高手相助，若有更好的方法请给个例子！
Private Sub Form_Load()
      Call AdjHV
      Pic.Left = 0
      Pic.Top = 0
  End Sub
    
  Private Sub HScroll1_Change()
      Pic.Left = -(HScroll1.Value) * 10
  End Sub
  Private Sub VScroll1_Change()
      Pic.Top = -(VScroll1.Value * 10)
  End Sub
  Private Sub AdjHV()
  With frm_pic
            Htmp = (.Pic.Width - .Pic1.Width + 250) / 10
            Vtmp = (.Pic.Height - .Pic1.Height + 250) / 10
            If Htmp > 0 Then .HScroll1[u].Max = : .HScroll1.Enabled = True Else .Pic.Top = 0: .HScroll1.Enabled = False
            If Vtmp > 0 Then .VScroll1.Max = Vtmp: .VScroll1.Enabled = True Else .Pic.Left = 0: .VScroll1.Enabled = False
        .HScroll1.Value = 0
        .VScroll1.Value = 0
  End With
  End Sub