标题: 威力强大的SQL语言 [打印本页] 作者: AK48 时间: 2003-3-12 22:51 标题: 威力强大的SQL语言 今晚作了一个简单的测试，求一个字段的总和。我用的是VB，使用ADO控件，数据库用SQL，里面有6万多条记录。
Private Sub Command1_Click()
Select Case Text1.Text
Case "vb"
Dim i, y
Adodc1.Recordset.MoveLast
i = Adodc1.Recordset.RecordCount
Adodc1.Recordset.MoveFirst
Sum = 0
For y = 1 To i
Sum = Adodc1.Recordset("Feld") + Sum ' Feld为字段名称
Adodc1.Recordset.MoveNext
Next y
Case "sql"
Dim Asum
Adodc1.RecordSource = "SELECT SUM(Feld) FROM Table1"
Adodc1.Refresh
Asum = Adodc1.Recordset.Fields(0)
End Select
End Sub
计算结果是一个11位数的数字
当TEXT1=“VB”时，用了4分多钟才计算完毕，当TEXT1=“SQL”时，只用了不到1秒的时间，后来再用GRID显示看着VB运行第一个条件时一行一行地计算的过程，呵呵，真替VB辛苦。
作者: david 时间: 2003-3-13 11:29
聽老人言。。。。學VB無前途。。。。作者: 渣王 时间: 2003-3-13 17:49
那就宵Delphi吧！作者: 阿Q 时间: 2003-3-14 06:06
VC 最有前途。。。最好学标准C
作者: david 时间: 2003-3-14 18:21
講有前途當然系JAVA啦，我學緊JSP！作者: 渣王 时间: 2003-3-15 13:14
全部有前途！只要你学得精作者: Nev 时间: 2003-3-15 15:06
这也是VB
两种方法都是VB作者: 渣王 时间: 2003-3-15 21:09
VBScript也可以应用于网页，和JSP一样作者: 闪舞元素 时间: 2003-3-15 22:08
我只学两个字：
0,1作者: Nev 时间: 2003-3-15 23:30