易截截图软件、单文件、免安装、纯绿色、仅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中有无TApplication对应类型

我用Delphi写了一个DLL, DLL里有MDI的子窗体,DLL初始化时 传递调用者的TApplication给DLL, 在Delphi7中调用已经通过,但是不知道在VB中有无TApplication对应类型, 是否能在VB中调用?
你好,用instance不是就可以了&# ......

vb打包安装时提示输入序列号

我有自动生成序列号的程序,但是怎么跟打包后的安装程序结合在一起,在安装时提示用户输入序列号,正确后再继续安装???
方法1:你可以在运行程序后输入序列号注册,很多软件都是这样的。

方法2:使用Setu ......

求教下VB如何给D3D游戏写屏 - VB / API

想在warcraft3里进行写屏操作【如对战平台中的胜负提示信息】,效果就像游戏平台中一样,我试过在一窗口中写入文字,然后一直让窗口强制最前,虽然能实现文字显示,但是文字会不断闪烁,而且有不确定BUG,通过论坛搜 ......

VB 查询语句出错

VB code:
'sqlstr = "INSERT INTO useinfo " & "(usename ,password)" & " values (' " & usename & " ' " & ",'" & password & ......

vb使用picturebox控件

我想使用picturebox控件画图
我的sql数据库中数据表名字是udata,其中有两列,一列是sdatetime,另一列是data。我想用其中的sdatetime列的数值(时间)作为横坐标,data列的数值(数据)作为纵坐标。
在一个新 ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号