If e.IsFocusCell Then '如果是焦点所在单元格
If e.Col.Name = "客户单位联系人" Then '如果正在编辑的是县市列
e.Col.Combolist = DataTables("客户员工").GetComboListString("a", "[kehuid] = '" & e.Row("客户id") & "'")
End If
End If
请问我编辑本单元格的时候想改变在选中行其他单元格的属性该如何做
自己回答自己
If e.Col.Name = "选择景点" Then
Dim ss1 As String =e.Text
Dim aa1s() As String
Dim ii1 As Integer
Dim sa1 As Integer
aa1s=ss1.split(",")
For Each sa1 In aa1s
ii1=ii1+cint(sa1)*e.Row("人数_大")
Next
e.Row("总景费") =ii1
End If