如何在vb.net中以列方式而不是行方式填充数据集 [英] how to fill dataset, as column wise instead of row wise in vb.net

问题描述

我在这里填充数据集作为一个明智的行，但我想添加为coloumn明智的方法如何做到这一点？

dim balrow as datarow

"Here i am filling dataset as a row wise but i want to add as coloumn wise how to do it? "
dim balrow as datarow

balrow = obj.Tables("DB_COM").NewRow()"row wise adding instead of coloumn wise possible?"
                  balrow("ffri1") = Format(fdate, "dd/MM/yyyy")
                  balrow("fmonyear") = monthname + " " + tyear
                  balrow("fpname") = fname
                  balrow("fbankname") = gbankname
                  balrow("fbranchname") = gbranchname
                  balrow("fusername") = Guser
                  balrow("fworkstation") = worknode
                  balrow("fserverdt") = serverdt
                  balrow("fdate") = fdate
                  balrow("fpghead1") = fcsr
                  balrow("fpghead2") = fslr
                  '----------------------
                  Call rupee_con(BAL1)
                  balrow("bal1") = amtval
                  Call rupee_con(BAL2)
                  balrow("bal2") = amtval
                  Call rupee_con(BAL3)
                  balrow("bal3") = amtval
                  Call rupee_con(BAL4)
                  balrow("bal4") = amtval
                  Call rupee_con(BAL5)
                  balrow("bal5") = amtval
                  Call rupee_con(BAL6)
                  balrow("bal6") = amtval
                  Call rupee_con(BAL5)
                  BAL5 = CDbl(Val(amtval))
                  Call rupee_con(BAL6)
                  BAL6 = CDbl(Val(amtval))
                  BAL7 = BAL5 + BAL6
                  Call rupee_con(BAL7)
                  balrow("bal7") = amtval
                  Call rupee_con(BAL8)
                  balrow("bal8") = amtval
                  Call rupee_con(BAL9)
                  balrow("bal9") = amtval
                  Call rupee_con(BAL10)
                  balrow("bal10") = amtval
                  Call rupee_con(BAL11)
                  balrow("bal11") = amtval
                  Call rupee_con(BAL12)
                  balrow("bal12") = amtval
                  Call rupee_con(BAL13)
                  balrow("bal13") = amtval
                  Call rupee_con(BAL14)
                  balrow("bal14") = amtval
                  Call rupee_con(BAL15)
                  balrow("bal15") = amtval
                  Call rupee_con(BAL16)
                  balrow("bal16") = amtval
                  Call rupee_con(BAL17)
                  balrow("bal17") = amtval
                  Call rupee_con(BAL18)
                  balrow("bal18") = amtval
                  Call rupee_con(BAL19)
                  balrow("bal19") = amtval
                  Call rupee_con(BAL20)
                  balrow("bal20") = amtval
                  Call rupee_con(BAL21)
                  balrow("bal21") = amtval
                  Call rupee_con(BAL22)
                  balrow("bal22") = amtval
                  Call rupee_con(BAL23)
                  balrow("bal23") = amtval
                  Call rupee_con(BAL24)
                  balrow("bal24") = amtval
                  Call rupee_con(BAL25)
                  balrow("bal25") = amtval
                  Call rupee_con(BAL26)
                  balrow("bal26") = amtval
                  Call rupee_con(BAL27)
                  balrow("bal27") = amtval
                  Call rupee_con(BAL28)
                  balrow("bal28") = amtval
                  Call rupee_con(BAL29)
                  balrow("bal29") = amtval
                  Call rupee_con(BAL30)
                  balrow("bal30") = amtval
                  obj.Tables("DB_COM").Rows.Add(balrow)

推荐答案

希望以下链接对您有所帮助



数据表转置 [ ^ ]

hope fully the following link will help to you

Datatable transpose[^]

这篇关于如何在vb.net中以列方式而不是行方式填充数据集的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！