Sub AddPovitTable() 'Constance Const DATA_SHEET As String = "Advanced Filter" Const DATA_ADDRESS As String = "R7C1:R107C11" Const PIVOT_SHEET As Strin... ...
分类：
编程语言 时间：
2017-07-07 00:54:50
阅读次数：
178
Private Type GUID Data1 As Long Data2 As Integer Data3 As Integer Data4(0 To 7) As Byte End Type Private Type GdiplusStartupInput GdiplusVersion As Lo... ...
分类：
编程语言 时间：
2017-07-07 00:54:29
阅读次数：
314
Sub NextSeven_CodeFrame4() Application.ScreenUpdating = False Application.DisplayAlerts = False Application.Calculation = xlCalculationManual Applicat... ...
分类：
编程语言 时间：
2017-07-07 00:54:13
阅读次数：
251
Sub 跨表转置() Dim Wb As Workbook Dim Sht As Worksheet Dim oSht As Worksheet Dim Rng As Range Dim Index As Long Const HeadRow As Long = 12 Set Wb = Applic... ...
分类：
编程语言 时间：
2017-07-07 00:53:50
阅读次数：
215
Public Sub MakeUp() Dim Sht As Worksheet Set Sht = ThisWorkbook.Worksheets("设置") Dim Total As Double Dim iMin As Double, iMax As Double Dim RndNum As ... ...
分类：
编程语言 时间：
2017-07-07 00:53:32
阅读次数：
250
模拟数据库演示springboot小测试 1、编写一个实体类：user 2、编写一个dao：userDao 3、编写一个service：userService 4、编写一个controller：userController 5、main方法测试 Console： 浏览器：http://localho ...
分类：
编程语言 时间：
2017-07-07 00:53:14
阅读次数：
269
Public Sub SubtotalData() AppSettings 'On Error GoTo ErrHandler Dim StartTime, UsedTime As Variant StartTime = VBA.Timer 'Input code here Dim Wb As Wo... ...
分类：
编程语言 时间：
2017-07-07 00:51:46
阅读次数：
276
给定一个数组S，试找出3个数a, b, c，使得a+b+c=0。也即从集合中找出所有的和为0的3个数。 例如：集合S={-1，0， 1， 2， -1， 4}，则满足条件的3个数有2对：(-1, 0, 1)和(-1, 2, -1)。注意（-1，1，0）与（-1，0，1）算同一个解，所以不用重复考虑。 ...
分类：
编程语言 时间：
2017-07-07 00:51:30
阅读次数：
346
快速构建一个 Springboot 官网：http://projects.spring.io/spring-boot/ Spring Boot可以轻松创建可以“运行”的独立的，生产级的基于Spring的应用程序。我们对Spring平台和第三方图书馆有一个看法，所以你可以从最开始的时候开始吧。大多数S ...
分类：
编程语言 时间：
2017-07-07 00:50:26
阅读次数：
226
要求：使用re模块，通过正则表达式，实现计算器运算功能。 思路：1、匹配函数中最内层的括号，提取函数使用re.search，先计算乘除，后计算加减，注意针对正负号的处理，使用re.split，可以截取函数前后的部分，重新拼接结果。 2、加减、乘除及去括号单独写函数调用 具体代码： 运行结果： 因为l ...
分类：
编程语言 时间：
2017-07-07 00:49:41
阅读次数：
305
Sub mainProc() Application.ScreenUpdating = False Application.DisplayAlerts = wdAlertsNone 'Dim xlApp As Excel.Application 'Dim Wb As Excel.Workbook '... ...
分类：
编程语言 时间：
2017-07-07 00:49:20
阅读次数：
312
转载：http://www.cnblogs.com/liuling/p/2014-4-19-04.html 使用Java操作Redis需要jedis-2.1.0.jar，下载地址：http://files.cnblogs.com/liuling/jedis-2.1.0.jar.zip 如果需要使用R ...
分类：
编程语言 时间：
2017-07-07 00:48:56
阅读次数：
304
安装python和pip上述文章有介绍，在这里不在赘述。直接安装seleinum pip3 install selenium 安装完成以后， pip3 show selenium 显示 Name: seleniumVersion: 3.4.3Summary: Python bindings for ...
分类：
编程语言 时间：
2017-07-07 00:48:48
阅读次数：
288
8.3 STINGY SAT STINGY SAT is the following problem: given a set of clauses (each a disjunction of literals) and an integer k, find a satisfying assign ...
分类：
编程语言 时间：
2017-07-07 00:47:53
阅读次数：
380
Sub NextSeven_CodeFrame() Application.ScreenUpdating = False Application.DisplayAlerts = False Application.Calculation = xlCalculationManual Applicati... ...
分类：
编程语言 时间：
2017-07-07 00:47:37
阅读次数：
223
Public Sub GetContents() Dim Reg As Object Dim Matches As Object Dim OneMatch As Object Dim Index As Long Dim TimeStart As Variant TimeStart = VBA.Tim... ...
分类：
编程语言 时间：
2017-07-07 00:47:21
阅读次数：
270
Public Sub Basic_CodeFrame() AppSettings 'On Error GoTo ErrHandler Dim StartTime, UsedTime As Variant StartTime = VBA.Timer 'Input code here Dim Wb As... ...
分类：
编程语言 时间：
2017-07-07 00:46:38
阅读次数：
292
