/** * For modern browsers * 1. The space content is one way to avoid an Opera bug when the * contenteditable attribute is included anywhere else in...
分类：
Web程序 时间：
2015-09-17 17:09:37
阅读次数：
147
QQ：971751392 （欢迎交流）1安装SVN官网下载：http://subversion.apache.org/packages.htmlSVN客户端：TortoiseSVN，官网下载：http://tortoisesvn.net/downloads.html# yum install sub...
分类：
系统相关 时间：
2015-09-16 14:17:15
阅读次数：
208
range对象代表某一单元格，某一行，某一列，某一选定区域Sub rng()Range("a2").Select '单元格Range("a:a").Select '列Range("1:3").Select '行Range("a1:b10").Select '相邻区域Range("a1", "b10"...
分类：
其他好文 时间：
2015-09-16 12:23:07
阅读次数：
177
Sub 新建工作表()Sheets.Add , , 2 自动命名Sheets.Add.Name = "hello" 直接命名End SubSub 删除工作表()Sheet1.DeleteSheets("hello").Deleteon error resume nextapplication.dis...
分类：
其他好文 时间：
2015-09-16 12:09:29
阅读次数：
229
一、编译安装nginxcd/usr/local/srcwgethttp://nginx.org/download/nginx-1.6.3.tar.gztar-zxvfnginx-1.6.3.tar.gzcdnginx-1.6.3./configure--prefix=/usr/local/nginx--with-file-aio--with-http_ssl_module--with-http_p_w_picpath_filter_module--with-http_sub_module--wit..
分类：
Web程序 时间：
2015-09-15 20:16:49
阅读次数：
292
Sub fornext循环()Dim i!, j!For i = 1 To 100 step 1(1可以默认不写)j = j + iNextMsgBox jEnd Sub
分类：
其他好文 时间：
2015-09-15 17:55:42
阅读次数：
108
Sub while实例()Dim rs%rs = 2Do While Cells(rs, 2) ""If Cells(rs, 2) >= 90 Then Cells(rs, 3) = "good"rs = rs + 1LoopEnd Sub
分类：
其他好文 时间：
2015-09-15 16:31:11
阅读次数：
124
Sub 判断()Dim a%, b%a = 1b = 2If (a > b) ThenMsgBox ("a比b大")ElseMsgBox ("a比b小")End IfEnd Sub还有一种IFF的用法：Sub iff判断()Dim a%, b%, c$a = 1b = 2c = IIf((a > b...
分类：
其他好文 时间：
2015-09-15 16:22:31
阅读次数：
118
循环语句，直到满足某个条件Sub 事例()Dim a%Doa = a + 1If a > 10 ThenMsgBox a & "大于10"Exit DoEnd IfLoopEnd Sub
分类：
其他好文 时间：
2015-09-15 16:22:06
阅读次数：
97
根据表达式的值来决定执行几组语句中的其中之一Sub select多条件判断()Dim s$s = "a"Select Case sCase "a" MsgBox "我是a"Case "b" MsgBox "我是b"Case Else MsgBox "我是未知"End SelectEnd Sub
分类：
其他好文 时间：
2015-09-15 16:15:47
阅读次数：
96
