如何禁止MDI窗体自动显示滚动条？

[mxmkeep]

你好！
在MDI窗体中，当子窗体拖到边界，隐藏起一部分时
主窗体就自动显示出滚动条，请问如何禁止他自动显示滚动条
（MDI窗体的AutoScroll已经设为false，但是没用）

[yangmt204]

datagridview1.autoscroll=false

[DavidNoWay]

mark

[mxmkeep]

请问1楼和2楼各是什么意思，本人是新手，能解释明白些么？
我没有用到datagridview啊...
mark又是什么意思？

[floadcloud]

Imports System.Runtime.InteropServices

Public Class Form1

    Dim mdiClient As MdiClient = Nothing
    Dim SB_BOTH As Integer = 3

    <DllImport("user32.dll")> _
    Private Shared Function ShowScrollBar(ByVal hWnd As IntPtr, ByVal wBar As Integer, ByVal bShow As Integer) As Integer
    End Function

    Protected Overrides Sub WndProc(ByRef m As Message)
        If mdiClient IsNot Nothing Then
            ShowScrollBar(mdiClient.Handle, SB_BOTH, 0)
        End If

        MyBase.WndProc(m)
    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        For Each c As Control In Me.Controls
            If TypeOf c Is MdiClient Then
                mdiClient = c
            End If
        Next

        Dim fm As Form = New Form2
        fm.MdiParent = Me
        fm.Show()

    End Sub
End Class

[mxmkeep]

谢谢floadcloud的回答
滚动条是隐藏了，但是在拖动过程中滚动条还是会一闪一闪的出现

还有，我刚学vb.net
能给我解释下 下面代码的意思么？
<DllImport("user32.dll")> _
Private Shared Function ShowScrollBar(ByVal hWnd As IntPtr, ByVal wBar As Integer, ByVal bShow As Integer) As Integer
End Function

Protected Overrides Sub WndProc(ByRef m As Message)
If mdiClient IsNot Nothing Then
ShowScrollBar(mdiClient.Handle, SB_BOTH, 0)
End If

MyBase.WndProc(m)

[mxmkeep]

谢谢floadcloud的回答
滚动条是隐藏了，但是在拖动过程中滚动条还是会一闪一闪的出现

还有，我刚学vb.net
能给我解释下 下面代码的意思么？
<DllImport("user32.dll")> _
Private Shared Function ShowScrollBar(ByVal hWnd As IntPtr, ByVal wBar As Integer, ByVal bShow As Integer) As Integer
End Function

Protected Overrides Sub WndProc(ByRef m As Message)
If mdiClient IsNot Nothing Then
ShowScrollBar(mdiClient.Handle, SB_BOTH, 0)
End If

MyBase.WndProc(m)