摘要:
设置视图: 运行效果: unit HideWindown; interface uses Windows, Messages, SysUtils, Classes, Forms, StdCtrls, ActiveX, ComObj, ShellAPI, Tlhelp32, Vcl.Controls, 阅读全文
摘要:
我在ACCESS中添加了TreeView插件,结果电脑A上打开没问题,电脑B打开时就报MSCOMCT2.OCX和MSCOMCTL.OCX有错. B电脑之前是可以正常使用的,但是加了TreeView插件之后报错,说明是插件引用的问题. 在网上下载了这两个文件,复制到C:\WINDOWS\SYSTEM3 阅读全文
摘要:
用过Round和INT函数都没办法解决. 查询结果: 原因: 参与计算的字段使用了单精度或者双精度数据类型,改成小数类型即可解决. 阅读全文
摘要:
为了更详细地解释 Base64 编码的过程,我们可以从头开始逐步分解这个过程。假设我们有一段简单的 ASCII 文本 "Hello",我们将详细展示如何将其转换为 Base64 编码。 1. 获取文本的 ASCII 码 首先,将 "Hello" 转换为其 ASCII 码值。每个字符的 ASCII 码 阅读全文
摘要:
验证规则分为字段级别与表级别 在字段级别的验证规则中,你只能使用本字段的数据,如果表达式涉及其他字段的数据,则会提示你: 表级别的验证规则,可使用的表内的所有数据,以适应更复杂的逻辑表达式,上图的错误,我们只需要把表达式写到表级别里面即可. 另外,表级别的验证规则,只能写一个,请合理使用. 解决的方 阅读全文
摘要:
Forms!控制面板!NavigationSubform.SourceObject = "目标窗体" 注: 在导航窗体的属性面板中不会显示SourceObject属性,但它是真实存在的. 阅读全文
摘要:
一.插入选项组控件后,它的默认名称是Frame+编号 如果你要遍历所有选项组控件,可能会被它的名字Frame所迷惑.以为就是要找Frame类型的对象,但其实是不对的,正确的遍历方式应该是 For Each tempF In Me.Controls If TypeName(tempF) = "Opti 阅读全文
摘要:
有这样一个窗体,它的布局如下图,我需要刷新 数据表E(数据表类型的窗体)的数据,路径怎么写? 这里提供一个思路,就是在数据表E里面写一个全局过程,比如 Public sub ReQueryData() me.form.ReQuery end sub 然后在需要调用的地方这么调用即可: From_数据 阅读全文
摘要:
今早被自己蠢到.在输入密码的时候,不小心按下了大小写转换键,结果却能正常登陆,当场整个人都不好了.... 然后测试: 简直了..... 分析原因是,把其他语言的特性,理所当然原搬过来用了... 解决方案: 使用StrComp函数进行比较,与NZ类似,此函数为ACCESS特有,可直接在SQL和VBA中 阅读全文
摘要:
Private Sub 权重_KeyDown(KeyCode As Integer, Shift As Integer) If KeyCode <> vbKeyReturn And KeyCode <> vbKeyUp And KeyCode <> vbKeyDown And vbKeyTab Th 阅读全文
摘要:
这是我实际工作中遇到的问题.两个窗体同时设置了"模式"属性为"是",预想中的结果是左边最后弹出的数据表窗体为最上层窗体.结果左右两个窗体同级了,能点左,也能点右.当然主窗体不能点是正确的. 解决思路: 这明显就是"模式"冲突了.所以我们设置成只同时存在一个模式属性为"是"的窗体即可.也就是当需要打开 阅读全文
摘要:
Dim ID As Long ID = Me.FMTempMessage.Form.UserID Me.FMTempMessage.Form.Requery Dim rs As Recordset Set rs = Me.FMTempMessage.Form.Recordset rs.MoveFir 阅读全文
摘要:
INSERT INTO MessageUserAssociation (MessageID, UserID) select * from ( SELECT '13970640000011186000' as MessageID , 2 as UserID from UserInfo UNION AL 阅读全文
摘要:
说明: 以自动编号类型为主键的数据表,在有些场景使用起来会比较麻烦,比如,我们在使用 INSERT INTO 往数据表里面插入数据时,不能精准得获取刚刚插入的记录的ID值,也就无法对这条记录进行更多的操作,比如把这个ID值外链给其他数据表等. 也有人会说用MAX不就可以取到这个ID值了吗?嗯 ,一个 阅读全文
摘要:
Private Sub Command225_Click() '设置文本 Dim str As String With Me.FMBomChrListTemp.Form str = str & .物料代码 & "/" str = str & .物料名称 str = str & .规格型号 & "/" 阅读全文
摘要:
需求: 我有个按钮,设置了lock图标,想在点击它的时候,图标在lock与unlock之前切换 实现代码: Private Sub Command297_Click() If Command297.Tag = -1 Then ' change to unlock Command297.Picture 阅读全文
摘要:
一.在报表页脚做一个文本框.控件来源设置为 : =COUNT(*) ,注意这里的*号不带引号,假设文本框取名为Rows 二.在需要引用的地方调用 [Rows] 即可 三.如果你不希望明示页脚,则可以把报表页脚设置为不可见即可. 阅读全文
摘要:
第十二章 游标的使用 >.游标的概述 游标是一种数据库对象,用于在SQL中处理(SELECT的)查询结果集。它允许逐行地访问查询结果集的数据,以进行一系列操作,如更新、删除或插入数据。游标通常用于存储过程或触发器中,用于对数据进行逐行处理。通过游标,可以实现对结果集的逐行处理,可以方便地进行数据处理 阅读全文
摘要:
第11章 触发器 >.概述 触发器是一种特殊类型的存储过程.当指定表中的数据发生变化时触发器自动生效.它与表紧密相连,可以看作表定义的一部分.触发器不能通过名称被直接调用,更不允许设置参数. 在SQL SERVER 中,一张表可以有多个触发器.用户可以使用INSERT,UPDATE或者DELETE语 阅读全文
摘要:
在窗体中插入TApplicationEvents控件,然后设置它的onMessage事件即可 procedure TForm1.ApplicationEventsMessage(var Msg: tagMSG; var Handled: Boolean); var AktywnaForma: TFo 阅读全文