摘要： 1 Option Explicit 2 Dim i 3 Function sda(path) 4 Dim fso 5 Dim f 6 Dim s 7 Dim ff 8 Set fso = CreateObject("scripting.filesystemobject") 9 Set f = fso 阅读全文

摘要： 1 from openpyxl import load_workbook 2 import os 3 4 sr = os.path.join(os.path.expanduser('~'), 'desktop') 5 wb = load_workbook(os.path.join(sr, 'asd. 阅读全文

摘要： import os import uuid from openpyxl import Workbook from openpyxl.styles import colors #颜色模块 from openpyxl import load_workbook sr=uuid.uuid4() #生成一个不 阅读全文

摘要： Private Sub UserForm_Initialize()Dim iDim itm As ListItemDim liMe.ListView1.ColumnHeaders.Add 1, "Q", "QQ号", Me.ListView1.Width / 3 '添加第一列Me.ListView1 阅读全文

摘要： Private Sub ComboBox1_Change()If Me.ComboBox1.ListIndex <> -1 Then Me.TextBox1.Value = Me.ComboBox1.Value '(BoundColumn ) Me.TextBox2.Value = Me.Combo 阅读全文

摘要： Option Explicit'() '可以让括号内作为一个整体 Sub t29() Dim regx As New RegExp Dim sr sr = "A3A3QA3A37BDFEA387A8" With regx .Global = True .Pattern = "(A3){2}" '相当 阅读全文

摘要： Option Explicit'^符号：限制的字符在最前面,如^\d表示以数字开头 Sub T34() Dim regex As New RegExp Dim sr, mat, m sr = "d234我345d43" With regex .Global = True .Pattern = "^\ 阅读全文

摘要： '正则表达式的核心是设置对比的规则，也就是设置Pattern属性，而组成这些规则除了字符本身以外，是具有特定含义的符号。 '下面介绍的是正规表达式中常用符号的第一部分。 '\号 '1.放在不便书写的字符前面,如换行符(\r),回车符(\n),制表符(\t),\自身(\\) '2.放在有特殊意义字符的 阅读全文

摘要： '一 正则表达式 '正则表达式是处理字符串的外部工具，它可以根据设置的字符串对比规则，进行字符串的对比、替换等操作。 '正则表达式的作用： '1、完成复杂的字符串判断 '2、在字符串判断时，可以最大限度的避开循环，从而达到提高运行效率的目的。'二 使用方法 '1、引用法 '点击VBE编辑器菜单：工具 阅读全文

摘要： CommandButton 常用属性+方法记录： Me.CommandButton1.ControlTipText = "" '按钮的提示，就是鼠标移过去，会显示 提示 Me.CommandButton1.Picture '按钮的图片 Me.CommandButton1.PicturePositio 阅读全文