51Testing软件测试论坛

标题: 同一个sheet里面可以同时操作不同列 [打印本页]

作者: lijinshui    时间: 2009-4-30 11:05
标题: 同一个sheet里面可以同时操作不同列
1 可以在datatable里面动态追加一列
2 同一个sheet里面可以同时操作不同列的元素
3 希望可以和新人共同进步

Dim tempa,tempb
Dim gj,gc
gc = 0

DataTable.GetSheet("Action1").AddParameter("new",NewCol).Value= gc '新桁を新規する
'`データを追加する
For i = 1 to 3
        DataTable("AA", dtLocalSheet) = "A" & i
        DataTable("BB", dtLocalSheet) = "B" & i
        Datatable.SetNextRow
Next

For i=1 to 3      
        DataTable.SetCurrentRow(i)
     tempa =  DataTable("AA", dtLocalSheet)
         
    For j=1 to 3
                DataTable.SetCurrentRow(j)
                tempb =  DataTable("BB", dtLocalSheet)
                gc = gc+1
                DataTable.SetCurrentRow(gc)
                DataTable("new", dtLocalSheet) =  "Tempa ->" & tempa & "Tempb ->" & tempb
        DataTable.GetSheet("Action1").SetNextRow
        gj = j
        datatable.LocalSheet.setnextrow
   Next
   If gj = 3 Then
         datatable.LocalSheet.setnextrow
   End If
Next
作者: wugecat    时间: 2009-4-30 11:34
顶,如果有注释看起来就会省很多时间
作者: lijinshui    时间: 2009-4-30 12:05
好的,以后我会注意的,谢谢提醒




欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/) Powered by Discuz! X3.2