固定DataGrid的行宽？

Question

请问要怎样才能固定DataGrid的行宽，使得行宽无法调整呢？

Answer 1

不知LZ要的具体效果是什么'设置行高，列宽
DataGrid1.DefColWidth = 500
DataGrid1.RowHeight = 200'不允许调整
DataGrid1.Enabled = False

Answer 2

Private Sub Form_Load ()
   '不允许调整列
   Dim i As Long
   For i = 0 To DataGrid1.VisibleCols - 1
      DataGrid1.Columns(i).AllowSizing = False
   Next i   '不允许调整行
   DataGrid1.AllowRowSizing = False
End Sub

Answer 3

Private Sub Form_Load ()
   '不允许调整列
   Dim i As Long
   For i = 0 To DataGrid1.VisibleCols - 1
      DataGrid1.Columns(i).AllowSizing = False
   Next i   '不允许调整行
   DataGrid1.AllowRowSizing = False
End Sub

Answer 4

Private Sub Form_Load ()
   '不允许调整列
   Dim i As Long
   For i = 0 To DataGrid1.VisibleCols - 1
      DataGrid1.Columns(i).AllowSizing = False
   Next i   '不允许调整行
   DataGrid1.AllowRowSizing = False
End Sub