VB6.0 中datagrid控件如何将行、列的数据进行计算汇总在同一个datagrid控件中的最后一行。

VB6.0 中datagrid控件如何将行、列的数据进行计算汇总在同一个datagrid控件中的最后一行。添加行数据后，自动计算并往后移。

举报该问题

第1个回答 2013-05-16

datagrid不行，因为datagrid绑定数据库，因此不能添加一个附加行。即使在SQL命令中通过union方式进行统计后显示，但又会导致datagrid不能新增。解决办法有2个：1、用MSFlexGrid；2、自己写一个用户控件，大概意思就是里面有2个datagrid，一个大的，专门显示记录，一个小的，不要标题行，专门显示合计数；在里面增加写代码使它们水平同步滚动。

相似回答

...在text1.text中。需要完成的代码,谢谢。我用的是VB6.0.答：比如，datagrid所绑定的数据控件是ADODC1,那么第二个为ADODC2，ADODC1的语句为select A,B,C,D from TAB1 where ...那么ADODC2的语句设置为select sum(A) as X from TAB1 where ...，在form_load过程和单击command的过程代码中，设置相同的条件，也就是让where子句的内容一致。最后，把text1....

VB6.0 DataGrid控件列宽随数据最大的长度自适应列宽答：可以给你提供个思路，希望列宽自动调整，即你需要在获取列名时，判断列名长度，根据列名长度，设置列的宽度。

在VB6.0中如何获取DataGrid中一个单元格的行值和列值,使得该单元格等于...答：假设你的鼠标或键盘的焦点在DG控件的一个单元格上那么DataGrid.Col就可以返回这个单元格的列值 DataGrid.Row就可以返回这个单元格的行值

vb6.0中查询的数据放入datagrid控件中,求高手解惑谢谢答：1、你程序中的控件 cobcourseid 是什么控件，是ComboBox吗？如果是 ComboBox 控件，在后面的 Do 循环中简化如下 Do While Not rs.EOF cobcourseid.AddItem rs!id rs.MoveNext Loop 这样就可以将字段"id" 值添加到 ComboBox 中了。2、如果想利用DataGrid 显示数据结果，需要在界面放置 Adodc 数据...

VB6.0中如何用按钮对DataGrid中的记录进行操作答：cnStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Documents and Settings\k01\桌面\耿会\数据源信息汇总.mdb;Persist Security Info=False"con.Open cnStr rs.Open sql, con, adOpenDynamic, adLockOptimistic '3, 2 If rs.EOF Then MsgBox "没有此用户！"Text1.SetFocus Else rs....

如何对VB 6.0中的DataGrid控件中的某行某列的数值进行判断答：给你一个获得第1行所有单元的数据的例子：（注意：0 表示第1行）Private Sub Command1_Click()Dim L As Integer DataGrid1.Row = 0 '第1行，如果要获得第2行，设置为1 For L = 0 To DataGrid1.Columns.Count - 1 DataGrid1.Col = L MsgBox DataGrid1.Text Next L End Sub ...

vb6.0 Adodc 和 DataGrid 控件怎么编写查询语句,让查询结果显示在DataG...答：给你做了一个简单的例子，后面有源代码 Option Explicit Private Sub Command1_Click()Dim s1 As String Dim s_id As String Dim s_nam As String If Text1.Text = "" Then s_id = "%"Else s_id = Text1.Text End If If Text2.Text = "" Then s_nam = "%"Else s_nam = ...

VB6.0+SQL分类求和及赋值问题答：Select语句一般跟数据库文件，这种用法我也没试过。你可以从结果上试一试。一般来说，已经得到了查询，并且显示在了DataGrid1控件中时只对该控件的属性操作即可。Dim i As Integer Dim b As Integer b=0 For i = 0 To DataGrid1.ApproxCount - 1 DataGrid1.Row = i If DataGrid1.Columns.Item...

vb 6.0中 datagrid 如何引用第i行第j列的内容?答：text1.text = datagrid1.rows(i).cells(j).value

大家正在搜

VB中datagrid如何添加 vb中datagrid控件 datagridview控件控件datagridview设置 vb datagrid控件详解 datagridview控件用法 wpf datagrid数据绑定 vb datagrid控件 datagridview添加数据

如何对VB 6.0中的DataGrid控件中的某行某列的数值...

vb6.0中datagrid控件显示很多行数据，如何让鼠标点...

VB中DataGrid控件如何根据字段内容自动调整列宽度

VB6.0中DATAGRID控件怎么设置几行几列？

vb中如何改变datagrid控件展示的列的顺序

vb6.0 给datagrid控件单元格赋值。

vb6.0中查询的数据放入datagrid控件中，求高手解惑...

VB6.0中DATAGRID控件设置各个列的列宽代码