![](https://img-blog.csdnimg.cn/20201014180756925.png?x-oss-process=image/resize,m_fixed,h_64,w_64)
vb
hzvcan
不写简介就说我懒,这回你不说了吧。
展开
-
vb 中recordset提示对象关闭时不允许操作
vb中执行查询后,一般要判断是否为空,原创 2014-08-25 10:22:33 · 4251 阅读 · 0 评论 -
'调用K3组件反审核单据
x转载 2015-12-04 10:09:06 · 3677 阅读 · 0 评论 -
'调用K3组件删除库存单据
x转载 2015-12-04 10:05:57 · 1899 阅读 · 0 评论 -
K3无界面登录新增职员
Private Declare Function GetCurrentProcessId Lib "kernel32" () As Long '编码:钱坤'日期:20160215'功能:新增职员'参数'1 strAcctNumber:账套编码 eg:02.uitest5'2 strNumber: 工号,当职员编码'3 strName:原创 2016-02-16 14:51:04 · 2378 阅读 · 0 评论 -
ebcgl新增上级组
Dim ui As New KDLogin.ClsLoginDim m_oLogin As New KDLogin.NoUILoginDim strtemp As StringDim rs As ADODB.Recordset'Dim oLogin As New K3Login.ClsLoginDim oItemClassSet原创 2016-02-16 16:02:39 · 1077 阅读 · 0 评论 -
vb调用Excel时指定打印机
If strPrinter For Each p In Printers If strPrinter = p.DeviceName Then strPrinter = strPrinter & " 在 " & p.Port Exit For原创 2016-04-20 10:32:07 · 4360 阅读 · 0 评论 -
批量核销
Public Function MainFunction(ByVal sKey As String, oList As Object, ByRef bCancel As Boolean) Dim frmX As New frmVerification Dim vec As New KFO.Vector Dim RsYear As ADODB.Recordset '当前年份原创 2016-04-22 10:57:15 · 1537 阅读 · 1 评论