易截截图软件、单文件、免安装、纯绿色、仅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打包安装时提示输入序列号

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

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

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打印

要用vb打印一条线,长度是100毫米怎么写?
关注

VB code:
Printer.ScaleMode = vbMillimeters
Printer.Line (10, 10)-(110, 10)

    Printer.ScaleMode = vbMillimeters
    Print ......

VB注册问题

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