AngelHis
Access软件网QQ交流学习群(群号码198465573),欢迎您的加入！
我的文集

11
自定义纸张
发表时间：2018/3/30 2:22:55　评论：1
浏览(5966)
Private Sub Command1_Click()
    Dim FormName As String, RetValue As Integer
    '自定义打印纸张
    FormName = "广东省发票"
    RetValue = SelectForm(FormName, Me.hwnd)
    'If RetValue = 0 Then GoTo errPrint
'    PrintTest
End Sub
12
自动换行的信息框
发表时间：2018/3/20 3:49:53　评论：1
浏览(6647)
调用方法：
Private Sub errinfo_DblClick(Cancel As Integer)
    DoCmd.RunCommand acCmdSelectRecord
    Short_info Me.Errinfo
End Sub
13
VBA中Ping主机是否连接的2种方法
发表时间：2017/11/30 20:09:26　评论：1
浏览(8356)
调用方法
MsgBox Pings("192.168.0.1")
或
MsgBox sPing("192.168.0.1")
14
一句代码做的滚动字幕
发表时间：2017/6/25 14:00:25　评论：5
浏览(8928)
一句代码做的滚动字幕
15
拆分字符串，string函数与format函数的应用
发表时间：2017/5/29 17:05:32　评论：0
浏览(6342)
闲来无事，复习基础知识。拆分字符串到列表，函数string，format的混合使用。
16
非接触式ic卡读卡器的操作
发表时间：2016/4/18 20:01:40　评论：0
浏览(8499)
从vb代码转化的测试程序，用vba也可以操作读卡器。
17
修改本机与服务器时间一致的函数
发表时间：2016/3/25 22:15:20　评论：0
浏览(5732)
移植于vb的代码，修改本地系统时间，与服务器时间一致。
18
注册OCX控件的函数
发表时间：2016/3/15 22:32:26　评论：1
浏览(5613)
我们做工程经常会遇到使用第三方控件的情况，ocx控件必须先注册才能使用，可以在系统加载时利用下面的函数“自动”注册控件，方便我们发布使用控件。
19
时间差的精确表达
发表时间：2015/10/12 11:31:08　评论：3
浏览(7111)
完善datediff函数的显示效果，函数中假设每年为365天。
20
获取Oracle服务器时间（ADO）
发表时间：2014/12/5 1:33:40　评论：1
浏览(6371)
使用ADO的方式获取Oracle服务器时间
页次：2/4 9 7 1 2 3 4 8 :
文章搜索
关于作者
AngelHis
文章分类
文章存档
友情链接