以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  请问我编辑本单元格的时候想改变其他单元格的属性该如何做  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=15824)
--  作者：ajim
--  发布时间：2012/1/12 19:51:00
--  请问我编辑本单元格的时候想改变其他单元格的属性该如何做
If e.IsFocusCell Then \'如果是焦点所在单元格
    If e.Col.Name = "客户单位联系人" Then \'如果正在编辑的是县市列
       e.Col.Combolist = DataTables("客户员工").GetComboListString("a", "[kehuid] = \'" & e.Row("客户id") & "\'")
    End If
End If

请问我编辑本单元格的时候想改变在选中行其他单元格的属性该如何做
--  作者：ajim
--  发布时间：2012/1/12 20:26:00
--  
自己回答自己

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