易截截图软件、单文件、免安装、纯绿色、仅160KB

vb 随机函数

我是随机数据库中的值 以id的开始为头 id的结束为结尾  可是有时候删除一条记录的话 然后再随到这条记录时就会报错
怎么写随机就不会随机到已经删除的了  错误代码如下
            rc.MoveFirst
            two = rc("ID")
     
            rc.MoveLast
            no = rc("ID")
      Randomize
            thirdcode = Int(Rnd() * (Abs(no - two + 1)) + two)

请各位帮个忙 谢谢

构建符合条件的语句,不会出现楼主担心的问题
DELETE from TB WHERE FD_ID = ID

UP


相关问答:

请好心人帮我把VB源码转为VB.NET~

希望大家能够帮我下.感谢了..


源码传在大米盘 VB6 的源码 http://www.damipan.com/file/3wNoKLW.html

转为VB.NET源码.

小弟完全是新手 不懂的说.麻烦各位帮忙一下

我的EMAIL是:4452 ......

VB datagridview底部合计

如何在datagridview的最后一行做某列值的和或是乘积。要计算3、4、5列各列的和,
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
  &nbs ......

如何用VB操作Excel转换为XML格式(介绍资料也有分)

对于EXCEL文件的内容,希望按照一定格式转换为xml文件,EXCEL内容例如:

Voucher_Id Oper Entry_Id ZhaiYao Acc_Code JieFang DaiFang fName1 fNeiRong1 fName2 fNeiRong2
1 Admin 1 测试摘要 540401 1000 ......

vb修改DTPicker1日期问题

Private Sub Check1_Click()
If Check1.Value = 1 Then
DTP1.Enabled = True
Else
DTP1.Enabled = False
End If
End Sub       
Private Sub Check2_Click()
If Chec ......

VB注册问题

一个 用户控件  2个密码控件 一个 按钮控件  2个密码控件用来验证密码 而且用户控件需要验证是否有用户名存在 然后注册连接到MSSQL 2000的data数据库中的 user表的 user和 pass中去  谁能否教我一下 ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号