时鹏亮的Blog

以下代码直接放到列表内容模板(list.var) (*)内保存，即可查看到效果。

if($no%2==1){
    $classname="1";
}else{    $classname="2";}$listtemp='<div class=[......]

以下宏涉及遍历，数组，删除指定行等内容。

Sub DELCO()
Dim arrString
Dim TemparrString = Array("要删除的关键字", "要删除的关键字2", "要删除的关键字3")Dim i As[......]

XP：我的电脑-》右击属性-》远程-》远程协助-》选择远程用户-》把无关的用户给删掉。
win7：计算机-》右击属性-》远程-》选择用户-》把无关的用户给删掉[……]

VBA-宏定义字符串数组常量不能按以往的经验来定义，需要按既定规则，声明一个变量，不指定任何格式，直接用array来声明其常量。

Dim arrString
arrString = Array("宰", "鸭", "欢迎", &q[......]

单元格转换为全角：B2=WIDECHAR(A2)
单元格转换为半角：C2=ASC(B2)简繁体转换：选中列或者行，点击审阅-点击对应的简繁体转换按钮即可单元格取长度：B2=LENB(B1) 是否是数字：ISNUMBER(B1)，如果需要强制转换下，可以这样写ISNUMBER([……]

查找-输入关键词-点击“查找全部”，就可以查到所有的数据，在对话框点中第一条，再按住Shift键点最后一条就选中了所有查找出的单元格了，最后在Excel已选中的表格上右击，删除整行，即可。
有人说看不懂，所以加个动图和流程介绍：1.Ctrl+F打开查找窗口2.输入查找的字符后[……]

点击单元格，在公式里写入=ROW()，然后复制到每一行即可。复制办法可以查看相关文章[……]

删除data文件夹里的install.lock文件，上传install文件夹里的index.php文件，访问站点地址/install/即可重装[……]

第1步，关闭你的FF浏览器，然后进入之前说的这个文件夹

%USERPROFILE%\AppData\Roaming\Mozilla\Firefox\Profiles\随机字符串.default\

第2步，新建一个user.js，用记事本打开
写入以下内容：

user_pref(&quot[......]

%HOMEDRIVE% =

C:\

当前启动的系统的所在分区 %SystemRoot% =

C:\WINDOWS

当前启动的系统的所在目录 %windir% = %SystemRoot% =

 C:\WINDOWS

当前启动的系统的所在目录 %USERPROFILE% =

C:\Do[......]

代码-工作经验-成长积累