spread问题（在线等）

Question

如何让一个网格的不可能编辑，当一个网格列被设为combox后，能否像VB其他的数据控件一样直接绑定

Answer 1

//如何让一个网格的不可能编辑
    Spread.Row = 1
    Spread.Col = 1
    Spread.Lock = True第一個單元格不能編輯。//当一个网格列被设为combox后，能否像VB其他的数据控件一样直接绑定
可以，但它的值只能0或1，意思是說那個字段的值也只能為0或1，或者是true or false

Answer 2

//当一个网格列被设为combox后，能否像VB其他的数据控件一样直接绑定
可以，但它的值只能0或1，意思是說那個字段的值也只能為0或1，或者是true or false
====================================================
什么意思？不是checkbox，是combox。

Answer 3

什么意思？不是checkbox，是combox。

Answer 4

Public Rs As New ADODB.Recordset
Public Conn As New ADODB.ConnectionPrivate Sub Command1_Click()
'设置第一列不允许编辑
   With Me.fpSpread1
    .LockBackColor = RGB(192, 192, 192)
     .Col = 1
     .Row = 1
     .Col2 = 1
     .Row2 = .MaxRows
     .BlockMode = True
     .Lock = True
     .BlockMode = False
     .Protect = True
   End With
End SubPrivate Sub Form_Load()
  Dim strConn As String
  strConn = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=Pubs;Data Source=LocalHost"
  Conn.CursorLocation = adUseClient
  Conn.Open strConn
  
  If Rs.State <> adStateClosed Then Rs.Close
  Rs.Open "Select * from Jobs", Conn, adOpenStatic, adLockOptimistic
   With Me.fpSpread1
     .Col = 2
     .Row = 3
     .CellType = CellTypeComboBox
    '设置绑定
     Do While Not Rs.EOF
       .TypeComboBoxString = Rs(1)
        Rs.MoveNext
     Loop
   End With
End Sub

Answer 5

当一个网格列被设为combox后为什么“它的值只能0或1，意思是說那個字段的值也只能為0或1，或者是true or false”？下面的代码是我以前写的给combobox所在的网格赋值的语句。            var = test1.situation     '给变量赋值的语句，该值为数据库取出的值
            .Col = 6
            .Row = i
            .TypeComboBoxList = "operator" + Chr$(9) + "manager"  '为combobox加载选项
            .text = CStr(var)                'combobox所在的网格赋值
 

Answer 6

晕，提交后发现已经有答案了，你说的“像VB其他的数据控件一样直接绑定”是这个意思吗？
     Do While Not Rs.EOF
       .TypeComboBoxString = Rs(1)
        Rs.MoveNext
     Loop