DataGrid 控件

Question

各位老兄：
    Datagrid 控件能控制一些列可以编辑，一些列不可以吗？
如果不行，该怎么办，谢谢大虾！

Answer 1

好像不行吧，单独再弄一个输入的控件，比如text控件，然后通过text输入修改

Answer 2

本身不支持..只能通过程序来控制了.在Rowcolchange事件中.

Answer 3

最好不用datagrid。换spread将某些行锁掉比较好

Answer 4

我想把问题扩展一下，就是如何把一个变量如 X 的值赋给 DataGrrid 的某一个单元格？

Answer 5

借csdn上一位朋友的方法给你，名字忘了，不好意思，不会追查我的版权吧，呵呵
Option Explicit
Dim meX As Long
Dim meY As LongPrivate Sub Form_Load()
Dim i As Integer
For i = 1 To 9
    List1.AddItem i
Next iText1.Height = 270
List1.Font.Size = 12
Text1.Visible = False
End SubPrivate Sub List1_DblClick()
Text1.Left = List1.Left
Text1.Width = List1.Width
Text1.Top = meY + List1.Top - 120
Text1.Visible = True
Text1.ZOrder 0
Text1.Text = List1.List(List1.ListIndex)
Text1.SetFocus
Text1.SelStart = 0
Text1.SelLength = Len(Text1.Text)
End SubPrivate Sub List1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
meX = X: meY = Y
End SubPrivate Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
List1.List(List1.ListIndex) = Text1.Text
Text1.SetFocus
End SubPrivate Sub Text1_LostFocus()
Text1.Visible = False
End Sub

Answer 6

DataGrid1.Splits(0).Columns(6).Locked = True