一曲轻扬

摘要： 一.在窗体的设计模式下,选择ActiveX控件,然后找到 Microsoft TreeView Control 6.0(SP6) ,确定 二.数据表的设计.重点在处理NodeID与ParentNodeID这两个字段的关系上. 三.TreeView数据的加载.下图是TreeView控件的所有事件.可以 阅读全文

摘要： 一.创建一个DLL项目 二.把验证过没有问题的函数写到DLL项目中 三.生成DLL 拿到了DLL 四.调用DLL 通常DLL调用的声明语句都会写在 implementation之上或者之下,区别是作用域不同.唯一的要求是:声明语句必须要在调用语句之前!!! unit Unit1; interface 阅读全文

摘要： declare @time1 datetime=getdate() --代码 declare @time2 datetime=getdate() SELECT DATEDIFF(year, @TIME1,@TIME2); SELECT DATEDIFF(quarter, @TIME1,@TIME2) 阅读全文

摘要： 第六章 SQL函数的使用 按函数种类可以分为聚合函数,数学函数,字符串函数,日期和时间函数,转换函数和元数据函数6种. >.聚合函数. 聚合函数对一组值执行计算,并返回单个值.除count外,聚合函数都会忽略空值. 通常与SELECT语句的GROUP BY 子句一起使用,为每一个分组返回一个单一值. 阅读全文

摘要： 第五章 SQL基础 P63. SQL概述 >.SQL的组成 >.数据定义语言(data definition language,DDL):用于在数据库系统中,对数据库,表,视图,索引等数据库对象进行创建和管理 >.数据控制语言(data control language,DCL):实现对数据库中数据 阅读全文

摘要： 以下是源码: Private Sub Command0_Click() ' 打开文件选择对话框 With Application.FileDialog(msoFileDialogFilePicker) .AllowMultiSelect = False .Filters.Clear .Filters 阅读全文

摘要： TDictionary 是一个开放哈希表，支持泛型，并提供了以下常用属性和方法： 属性： Count：返回字典中元素的数量。Keys：返回字典中所有键所组成的动态数组。Values：返回字典中所有值所组成的动态数组。 方法： Add：向字典中添加一个键和其对应的值。Clear：清空字典中的所有元素。 阅读全文

摘要： 我经常让GPT写一些简单的代码,它确实也能给出相对满意的结果,但是这单元的名称总是和我的不一样 我们在delphi中新建新项目名称一般都是Unit1,所以我们首先要先把Unit1修改成与GPT一样的名称才可以. 首先是保存我们的新项目,然后关闭.当然里面是空白的,什么代码和控件都没加.保存后这是新项 阅读全文

摘要： 有个客户表: 现在需要创建一个可以修改客户数据的窗体,我们一般的做法是: 1.选中数据表: 客户列表 2.在菜单中选择 "创建" --> "窗体". 3.调整一下格式,和添加一下按钮,就变成了这样,初始状态下,它会自动绑定字段值.此时如果用户对某个值做了修改,会直接修改数据表中的值,这不是我们想要的 阅读全文

摘要： 第一章 数据库基础 P3. 数据库的体系结构(纯理论,不重要) 三种模式：数据库系统的三级模式结构是指模式，外模式和内模式。 两种映射：外模式/模式映射，模式到内模式的映射 P5.数据模型 常见的数据模型有层次模型，网状模型和关系模型 P7.关系数据库的规范化，三条范式： 第一范式(1NF):在一个 阅读全文

摘要： ACCESS报表真是一言难尽啊.看预览还挺正经的. 结果,放大之后 ,它裂开了,我也裂开了....打印出来,谁看谁尴尬... 调整了很久,还是解决不了,于是愤而改EXCEL.效果如下: Private Sub Command647_Click() '打印.点击后禁用此按钮,待操作完成后再恢复,如果你 阅读全文

摘要： 感谢我宅猫大哥的热心指导. 启动时等待验证码. 输入验证码后,等待处理数据 处理完成后,显示数据 实现原理:利用已有的账号和密码登录后产生的cookie,向服务器请求数据.返回的数据是JSON格式,后期需要自己整理. 注意,请在程序中使用同一个TnetHttpClient控件来完成.因为里面保存了c 阅读全文

摘要： 首先说明一下,这是我平生第一次接到 接口文档,认知有限,写得不对的地方,请大佬们多多指点. 下面是一个智能刀具柜关于库存查询的接口文档: 上面的参数中,appid 和 sign中的appsecret和macno是设备的常量值,要问设备服务商给. 上面的接口要分别设置header头和请求参数.而POS 阅读全文

摘要： 转载自:WIn7 下使用 NetHttpClient 请求HTPPS 网站 - EEEEEEEEEEEEEEEEEEE - 博客园 (cnblogs.com) WIn7 下使用 NetHttpClient 请求HTPPS 网站 在WIN7 下使用 HttpClient 会报以下两种错 ;1 Serv 阅读全文

摘要： 文本框一个,在属性面板中设置 "格式"为合适的日期格式 然后设置它的键按下事件 Private Sub d交货日期_KeyDown(KeyCode As Integer, Shift As Integer) KeyCode = 0 End Sub 这样做的目的是防止用户输入不合法或者错误的日期,比如 阅读全文

摘要： 如果是放在 窗体模块 中: Private Declare Function GetKeyState Lib "user32" (ByVal nVirtKey As Long) As Integer 如果是放在 模块 中: Public Declare Function GetKeyState Li 阅读全文

摘要： 请在[布局视图]下设置,效果如下 Option Compare Database Dim s As Integer Private Sub Form_Load() '初始化变量 Me.TimerInterval = 10 Command4.Width = 0End Sub Private Sub F 阅读全文

摘要： 一.ColumnHidden 隐藏字段 For Each TEMP In Me.FM刀具项夹表.Form.Controls If Not TypeOf TEMP Is Label Then If TEMP.Name <> "RecordID" And TEMP.Name <> "项目" And TE 阅读全文

摘要： 2024-08-25更新 ' 引用 Microsoft XML, v6.0 库 ' 在 VBA 编辑器中，选择 工具 -> 引用 -> 勾选 Microsoft XML, v6.0 ' 加密函数：将密码明文编码为 Base64 格式 Function EncodeBase64(plainText A 阅读全文

摘要： Private Const BITS_TO_A_BYTE = 8 Private Const BYTES_TO_A_WORD = 4 Private Const BITS_TO_A_WORD = 32 Private m_lOnBits(30) Private m_l2Power(30) Priva 阅读全文