模块_函数_VBA_API

529   2018-01-09

Access判断查询是否存在

有时候,我们需要动态删除某个查询。但是删除之前需要先判断查询是否存在 在前面的学习中,我们知道如何判断一个已知的表对象是否存在,参见《Access判断数据表是否存在》 判断查询是否存在的自定义函数: Function ExistQue...
在Access表设计中,我们都会对每个字段做一些属性修改。比如修改文本大小节省内容,修改标题方法显示字段信息等等。 前面我们讲过《Access获取表中字段的标题属性》。那么其他属性也可以通过此方法去获取。 下面的函数可以获取表字段的字...
在Access中,我们在窗体代码或者在模块中都可以Public和Private的身影 但是在一些sub过程中,会发现直接用Sub的,也有Private Sub的。那这两者之前有什么区别呢? 1、若Sub前面没有东西,实际是省略了Publ...
由于Office的版本不同,语言不同,往往会导致乱码出现。 使用 Application.LanguageSettings.LanguageID(MsoAppLanguageID )对象可以或者Office的相关语言信息。 其中 Mso...
608   2017-12-30

Access vba查看所有引用

在VBE窗口中,我们可以通过工具-引用,引用相关的库类文件。只有引用了才能调用。 在引用一些库类时,往往是本地计算机有,在其他未必有。所以我们需要判断有成功引用对象。 在VBA中, 通过一个自定义的函数来查看所有引用。 Functi...
425   2017-12-29

Access获取文件大小

我们前面讲过添加图片的技巧,用的是复制图片到指定的文件夹。这样就不会导致数据库膨胀影响速度了。 但是如果需要直接上传图片到数据库呢?我们要先先筛选出文件大小合适的。 第一步就是先判断文件大小,那么如何获取文件的大小呢? MsgBox Fi...
有时我们在其他软件中导出得到一串秒数。希望把改秒数转化为时分秒00:00:00的格式 这里需要自定义一个函数去转换 Function SecToTime(dblSecond As Double) As String SecToTim...
在vba中,我们用If...Then...else...End If结构来判断条件是符合哪一种情况 这里介绍一个Not语法的技巧。在逻辑结构中,只有TRUE和FALSE的情况,直接使用not 来切换条件。 如图,在窗体中添加一个按钮。设...
有网友问到如何在ACCESS窗体上执行命令,在指定文件夹生成一个ACCESS数据文件。 利用代码动态创建一个Access数据库文件在运用中确实会经常用。因为有时需要把数据导入到一个新的Access数据库中。 示例,在C盘中创建一个名...
488   2017-12-15

Access设计九九乘法表

小时候,相信大家都背过九九乘法口诀。据说这个在春秋战国已经存在,源远流长。 顺序语句,条件语句和循环语句在任何编程语言中都离不开。所以很多入门示例都是要求做一个这样的口诀表。因为需要用循环语句。 在Access vba中,也可以非常方便...
 网友“网速很慢”希望从一张Excel总表中,按其中一列进行拆分表。同时同一样的记录追加到该表中 “我的这个表有好多行。 比如姓名行 刘德华原表10行 拆出刘德华这个表,里面有刘德华10条数据” 如有表“表1...
有网友好奇想知道100天后的日期是什么年月日。因为这个日子对她来说是比较重要的。 可以用参数指定某个日期的年,月,日 其中每个年参数的取值范围为:从 100 到 9999 间的整数 只需要在今天的日期,日参数加上100即可获取100...
有时候,我们需要往不同的表中动态添加数据。第一步就是先判断表中是否存在对应的字段。如果存在即添加,否则不添加。 如存在“职务”表,字段“职务” 判断表中是否存在该字段。参数stblname为表名,sfldName为字段名 Func...
792   2017-12-05

Access隐藏某个窗体

Access应用程序中,有时我们希望隐藏部分窗体或者报表等不让用户轻松查看 前面我们讨论过如何《Access彻底隐藏表显示表》 ,今天讲一下某个窗体的隐藏技巧 方法一: 在设计视图中,右键=》视图属性,弹出窗体属性对话框,“隐藏”选卡勾...
很多网友问到,如果通过选中表中的某个值,自动获取表中对应的值。 比如通过选择学生的学号,自动填写学生的姓名。 如这个示例,有如下一个表,表名表1,字段ID,类型。 通过选择id,自动获取类型 详细源码: Private ...
2/9