编程论坛 » VB6论坛 » vb程序运行时间

gaosong008 发表于 2008-5-25 18:39

vb程序运行时间

我做了一个系统在VB中实现数据库的各种操作的计时
其中有段代码如下：
谁能告诉我怎么计算其执行的时间啊
Private Sub Command5_Click()
Dim i, j As Integer
Dim n As Long
n = Val(Text5.Text)‘设定的插入条数
For i = 1 To n
Adodc1.Recordset.AddNew
Adodc1.Recordset.Fields("s_name") = Text1.Text
Adodc1.Recordset.Fields("s_sex") = Text2.Text
Adodc1.Recordset.Fields("s_id") = Text3.Text
Adodc1.Recordset.Fields("s_class") = Text4.Text
Adodc1.Recordset.Update
Text3.Text = Val(Text3.Text) + 1
Next i
j = MsgBox("数据添加成功！")
End Sub
大家帮帮忙啊！！！！！！！

multiple1902 发表于 2008-5-25 18:52

[quote][bo][un]gaosong008[/un] 在 2008-5-25 18:39 的发言：[/bo]

我做了一个系统在VB中实现数据库的各种操作的计时
其中有段代码如下：
谁能告诉我怎么计算其执行的时间啊
Private Sub Command5_Click()
Dim i, j As Integer
Dim n As Long
n = Val(Text5.Text)‘设定的插入条 ... [/quote]

gaosong008 发表于 2008-5-26 09:30

太感谢版主了！！！！可以了，呵呵[em01] [tk01]

查看完整版本: vb程序运行时间