未知乐园
百度空间 | 百度首页 
               
 
文章列表
 
2009-06-25 18:41
很经典的一段代码,在某种情况下很好用的代码:
For i = 1 To ActiveWorkbook.VBProject.VBComponents.Count    '确定工程组件数量
    ActiveWorkbook.VBProject.VBComponents(i).CodeModule.DeleteLines 1, ActiveWorkbook.VBProject.VBComponents(i).CodeModule.CountOfLines     '从第一行循环到最后一行的删除动作
Next
 
2009-06-06 10:44

执行一个脚本即可,脚本内容如下:
set lin 200
set pagesize 10000
set heading off
select 'drop ' ||object_type||' '||object_name||';'from user_objects;
执行该脚本后,将输出的内容再次执行即可

简单的举一个例子,比如仅仅想删除所有的table
SQL> set lin 200
SQL> set pagesize 10000
SQL> set heading off
SQL> select 'drop table '||table_name||';' from user_tables;

drop table BONUS;
drop table DEPT;

 
2009-04-24 08:50
  • 尽可能少使用“.”,使用对象变量
    在前面已经介绍过的对长对象引用使用对象变量以及使用With…End With等都是简化”.”的方法。因为在代码中的每个句点都表示至少一个(而且可能是多个)过程调用,而这些过程调用必须在后台执行。真正好的做法是在局部进行缓存对象引用,例如,应该把对象模型中较高层次的对象引用保存到局部对象变量中,然后用这些对象引用创建其他较低层次的对象引用。例如,引用某单元格数据时,可用如下代码:

  •  
    2009-04-24 08:49

    很多Excel VBA文章和图书都介绍过如何优化VBA代码,使代码运行得更快。下面搜集了一些使Excel VBA代码运行更快的技术和技巧,基本上都是实践经验的总结。如果您还有其它优化Excel VBA代码的方法,可以在本文后留言或给出链接,与大家分享。
    对于应用程序属性,在代码运行时关闭除必需属性以外的其它所有属性
    在代码运行时关闭不需要的Excel功能。其原因是,如果通过VBA更新不同的单元格区域,或者从不同的单元格区域复制/粘贴来创建汇总表,则不希望Excel浪费时间

     
    2009-04-21 18:35

    那天给兰州石化矿区服务事业部的领导处理Excel表格!发现在35400行数据中提取重复值时,竟然耗时3小时,当时使用的是普通算法进行查找的!严重的时间消耗让我不得不修改提取重复值的程序了!之后第二天,我详细的研究了一下。突然,想起在大学时,主修计算机科学与技术时的数据结构算法-哈希算法!然后,重新开始复习功课......不久,我搞出了这个算法,真感叹这优秀的算法的效率!在P4CPU+1GB的内存的硬件支持下,查找并提取75420条数据中的重复值,耗时才3秒!各位请注意了,是3秒呀!哈哈!速度是超级超级的快!眨眼间,将所有

     
    2009-04-12 20:02

    NSIS 确实是一个不错的安装程序制作软件。新版本 2.0a7 真正实现了中文支持和支持 WinXP 的安装对话框。不过要用它实现漂亮的安装界面和完美的安装功能就必须好好的写脚本。而 NSIS 的脚本指令是在是太多了,有时候觉得好像又回到了学习 C 语言的年代。他丰富而起强大的功能甚至可以编译出一些小而使用的软件(例如查找窗口句柄,然后...)好了,不多说。我在这里着重介绍关于 NSIS 的一些使用问题以及新界面安装程序的制作过程,中间会附上一个示例脚本。

    这里只说单语言的简体中文

    1. NSIS的运行问题
    2.0a7

     
    2009-04-04 16:56

    Excel中可以实现搜索文本的功能,内嵌的优秀搜索算法可以快速的查找并定位一个特定的文本单元格,今天我使用VBA写了几行代码,实现了一个自动搜索并定位行功能的小程序!发现了Excel的这个优秀的属性,速度简直超级快!于是很快,我就有了一个新想法,升级重复值校验程序的版本到V4.0!就使用Excel的这个属性来实现!于是乎说到不如做到!开始......,下面就公布这段代码,与各位网友共同研究:

    '*************************************************************************
    '      

     
    2009-03-28 10:08

    CIPAsressCtr初始化代码只能写在OnInitDialog()中

    #include <afxsock.h>

    //把CString表示的IP地址写到IP Address里面
    CString strIP="192.168.0.17";
    DWORD dwIP=ntohl(inet_addr(strIP));
    m_IP.SetAddress(dwIP);

    //读取IP Address的内容.
    DWORD dwIP;
    IN_ADDR ia;
    CString strIP;
    m_IP.GetAddress(dwIP);
    ia.S_un.S_addr=htonl(dwIP);
    strIP=inet_ntoa(ia);

     
    2009-03-25 23:48

    通用快捷键

    F1 显示帮助,如果光标停在代码的某个字符上,显示MSDN中相应的帮助内容
    F2 书签功能: Ctrl+F2 --在某行设置一个书签(再按一次次是取消)
    F2 --跳到下一个书签位置
    Shift+F2 --跳到上一个书签位置
    Ctrl+Shift+F2 --删除所有书签
    F3 查找: Ctrl+F3 --在文件中查找,如果当前光标在一个字符串上,
    那么自动查找此字符串.相似的有Ctrl+F
    F3 --查找文件中下一个串
    Shift+F3 --查找文件中上一个串
    F4(不是流行花园那个) 如果是编译后或者Find in Files后,可以逐条定位.
    Ctrl+F4

     
    2009-03-21 18:23

    系统是WIN XP同时安装了excel 2003与2007,双击打开excel文件时总是启动2007来打开!而我工作时需要的是更加成熟的2003来工作!那怎么改变默认方式来打开呢?

    方法一、
    开始-运行-输入excel2003的安装路径,例如(含开始的引号):
    "C:\Program Files\Microsoft Office\Office11\excel.exe" /regserver
    其它的如法炮制,OK!这样,双击任意一个Office文档则默认用Office 2003打开,同时 Office 2007也可从开始->程序中打开使用,两全其美。

    方法二、
    默认情况下,两个版本生成文件

     
         
     
     
    个人档案
     
    core22
    男, 26岁
    甘肃 兰州 
    上次登录:
    9天前
    加为好友
     
       
     
    最近访客
     
     

    jakekiss119

    新奥王子

    o龄o笔息

    眸於彻

    yueshide

    wgzwing

    leeWolfe

    netbartp
         


    ©2009 Baidu