2 jiking001 jiking001 于 2016.03.20 19:55 提问

请问各大神,如何将datagrid表格中的第一列数据逐行计算后,再将得出的结果依次放入第二列?

Private Sub transform_Click()
Dim Ni As Double
Adodc1.Refresh
Adodc1.Recordset.Update
Ni = Adodc1.Recordset.RecordCount
Adodc1.Recordset.MoveFirst

For i = 1 To Ni
B = latRT.Text
L = longRT.Text

Call GSzs
DataGrid1.Columns(3) = X
DataGrid1.Columns(4) = Y
Adodc1.Recordset.MoveNext

Next
DataGrid1.Refresh
'Adodc1.Recordset.Update
End Sub

Private Sub PMGN()

If Left(PMGNstr, 8) = "$PMGNWPL" Then
For i = 1 To 8
dotPosition = InStr(PMGNstr, ",")
Str1(i) = Left(PMGNstr, dotPosition - 1)
PMGNstr = Mid(PMGNstr, dotPosition + 1)
Next i
Adodc1.Recordset.AddNew
latRT.Text = Format$(Left(Str1(2), 2) + Mid(Str1(2), 3) / 60, "###.00000000") '纬度
longRT.Text = Format$(Left(Str1(4), 3) + Mid(Str1(4), 4) / 60, "###.00000000") '经度
Adodc1.Recordset.Update
Adodc1.Refresh
DataGrid1.Refresh
End If

End Sub

2个回答

caozhy
caozhy   Ds   Rxr 2016.03.20 21:55

你具体什么不会,是不知道怎么从datagrid取数据,还是不会计算,还是不会给第二列赋值?

jiking001
jiking001 不知道怎么从datagrid取数据,取完数据计算后,想给计算后的值放到第二列
2 年多之前 回复
jiking001
jiking001   2016.03.23 09:50

不知道怎么从datagrid取数据,取完数据计算后,想给计算后的值放到第二列

Csdn user default icon
上传中...
上传图片
插入图片
准确详细的回答,更有利于被提问者采纳,从而获得C币。复制、灌水、广告等回答会被删除,是时候展现真正的技术了!
其他相关推荐
Excel中两列数据对比, 找出第一列差第二列的数据(A-B)
test
java第一列相同的行的第二列合并
合并有重复列的行 现在两列数据如下: 1000    10001 2000    20001 2000    20002 3000    30001 3000    30002 3000    30003 这样的格式,第一列有重复, 想要把第一列相同的行的第二列合并起来。 如下所示的格式: 1000 : 10001 2000 : 20001,20002 300
如何解决“Excel中某一列是运算以后得出的,删除原来列以后,数据没有了”的问题
把运算得出的一列数据,使用“复制”,“选择性粘贴”(数值)的操作。这样删除原来运算的列,就不会影响到得出的数据了。
easyUI在可编辑的datagrid中计算两列的值
@author YHC 在这个教程中你将学习如何包含一个运算的列在可编辑的datagrid中,一个运算列通常包含一些运算值从一个或多个其他列. 查看Demo 首先,创建一个可编辑的datagrid,这就是我们创建的一些可编辑列,'listprice','amount' 和'unitcost' 列定义为numberbox 编辑类型,运算列是 'unitcost'字段, 将是
awk 二列相等求第三列的和,和平均值,及for循环根据第二列求第三列最大值
举个例子有下面一个文件 1.txtaaaa,哈哈,9 bbb,啦啦,5 ccc,嗯嗯,6 aaaa,哈哈,6 bbb,啦啦,7 ccc,嗯嗯,4 aaaa,哈哈,3 asd,啦啦,3###求和cat 1.txt |awk -F"," '{sum[$2]+=$3}END{for(c in sum){print c,sum[c]}}'###求平均值cat 1.txt |awk -F"," '{sum[...
怎么用js获取table第1行第2列的值
如何用js获取table第1行第2列的值   演示获取Table的值     function GetTable23()   {   var txt=document .getElementById ("txtReceiver");        //第一种:用标记id的td元素,获取值方法   txt .value=document .getElementById
有两列数,Matlab让第二列数随着第一列的升序排列(sortrows)
问题a中有两列数,是一一对应的,我现在需要将第一列升序排列,然后第二列数,随着对应的第一列数,排列,如:1 7 5 9 8 1 3 2当第一列升序排序时,第二列数是原来的与之对应的元素:1 7 3 2 5 9 8 1代码可以通过sortrows实现。代码如下:a = [1 7; 5 9; 8 1; 3 2]; b = sortrows(a)程
如何在 dataGrid 上的第一列加上 CheckBox,当选中某行的 CheckBox 后,那一行的 datagrid 变为绿色。
全选/反选:全选/反选注SelectAll參數說明:   DataGrid1:為DataGrid的ID   0:為checkbox在Datagrid中的列位置:從0開始,不顯示出來的列不算        function SelectAll(cur,obj,item){var boolSel = false;if(cur.checked) boolSel=true;var objTBChildre
matlab指定mat类型的数据,第一列为x,第二列为y,并画出该图形
load figureinfo.mat; %# assume this contains a matrix called figureinfo X = []; Y = []; for ctr = 1:length(figureinfo) X = [X figureinfo(ctr,1)]; Y = [Y figureinfo(ctr,2)]; endplot(x,y)
easyUI的table表格怎么实现将每一行中某几列数据相加放入另一列
首先是页面中求和的代码 ,放在function onLoadSuccess() 中 type="text/javascript">   function onLoadSuccess(data) {   var rows = $('#dg').datagrid('getRows');//获取当前的数据行,dg是表格的id