上一题下一题
跳转到
 
 
  世界如此多姿,发展如此迅速,窥一斑未必还能知全豹。但正如万花筒一样,每一个管窥都色彩斑斓。  
 
 
  知识通道 | 学习首页 | 教师首页 | PK首页 | 知识创造首页 | 企业首页 | 登录
 
本文对应知识领域
创建新表时,快速拷贝字段
作者:未知 申领版权
2010年11月14日 共有 1115 次访问 【添加到收藏夹】 【我要附加题目
受欢迎度:

    创建新表时,快速拷贝字段
    
    
    在VB6中,无需离开开发环境就可以创建新的SQL Server和Oracle表。方法很简单:打开DataView窗口,用鼠标右键单击数据库的表文件夹,再选择新表格菜单命令。
    
    
    当处理相似表格时,就是说具有许多相同字段的表格,我们完全可以在很短的时间内容完成设定操作。具体步骤是:在设计模式下打开源表格,加亮选择要拷贝字段对应的行,按Ctrl-C拷贝信息到粘贴板;然后,在设计模式打开目标表格,将光标置于要粘贴字段所在的位置,按Ctrl-V。
    
    
    这样,就拷贝了所有的字段名称以及它们所带的属性。
    
    
    无闪烁地快速附加字符串到textbox控件
    
    附加文本到TextBox或者RichTextBox控件的通常方法是在当前内容上连接上新的字符串:
    
    
    Text1.Text = Text1.Text & newString
    
    
    但还有一个更快的方法,并且会减少连接操作的闪烁感,代码如下:
    
    Text1.SelStart = Len(Text1.Text)
    
    Text1.SelText = newString
    
    
    快速找到选中的OptionButton
    
    
    OptionButton控件经常是作为控件数组存在的,要快速找到其中的哪一个被选中,可以使用下面的代码:
    
    
    ’假设控件数组包含3个OptionButton控件
    
    intSelected = Option(0).Value * 0 - Option(1).Value * 1 - Option(2).Value * 2
    
    
    注意,因为第一个操作数总是0,所以上述代码可以精简如下:
    
    intSelected = -Option(1).Value - Option(2).Value * 2
    
    表单及控件的引用阻止了表单的卸载
    
    
    当指派表单或者表单上的控件到该表单模块以外的一个对象变量中时,如果要卸载表单,就必须首先将那个变量设置为 to Nothing。也就是说,如果不设置为Nothing,即使看不到这个对象了,但它仍旧是保存在内存中的。
    
    
    注意:这并非是一个bug,这仅仅是COM引用规则的一个结果。唯一要注意的就是引用的这个控件将阻止整个表单的卸载操作,它将依赖于它的父表单而存在。
    
    
    重定义编译DLL文件的基地址
    
    
    许多VB开发者都知道应该在工程属性对话框的“编译”功能页面中定义一个DLL基地址数值。这不同于工程中任何其他DLL或OCX的基地址。
    
    
    当操作没有源代码的编译DLL或者OCX文件时,可以使用EDITBIN程序修改它的基地址。EDITBIN程序随Visual Studio安装后就有了,可以在主Visual Studio目录的VC98\BIN目录下找到它。比如,以下代码重新设定一个编译DLL文件的基地址为12000000(16进制):
    
    
    
    EDITBIN /REBASE:BASE=0x12000000 myfile.dll
    
    同样,EDITBIN程序对可执行文件也有一些处理技巧。
    
    
    以下是该程序支持的完整功能选项列表(使用EDITBIN /? 可以列出这些):
    
    
    
    /BIND[ATH=path]
    
    /HEAP:reserve[,commit]
    
    /LARGEADDRESSAWARE[:NO]
    
    /NOLOGO
    
    /REBASE[:[BASE=address][,BASEFILE][,DOWN}
    
    /RELEASE
    
    /SECTION:name[=newname][,{!]{cdeikomprsuw}][a{1248ptsx}}
    
    /STACK:reserve[,commit]
    
    /SUBSYSTEM:{NATIVE|WINDOWS|CONSOLE|WINDOWSCE|POSIX}[,#[.##}
    
    /SWAPRUN:{[!]CD|[!]NET}
    
    /VERSION:#[.#]
    
    /WS:[!]AGGRESSIVE
    
    快速调入TreeView控件以及ListView控件的子项内容
    
    
    有一个简单但仍未发现的技巧可用于在TreeView控件中装载多个节点,或者在ListView控件中装载多个ListItems。这种方法要比传统做法快。先看看下面这个传统方法:
    
    
    For i = 1 To 5000
    
    TreeView1.Nodes.Add , , , "Node " & i
    
    Next
    
    
    改进一下,代替重复引用TreeView1对象的Nodes集合,我们可以先将之保存在临时对象变量中:
    
    Dim nods As MSComctlLib.Nodes
    
    Set nods = TreeView1.Nodes
    
    
    For i = 1 To 5000
    
    nods.Add , , , "Node " & i
    
    Next
    
    
    甚至,如果使用With代码块,还可以不需要临时变量:
    
    With TreeView1.Nodes
    
    For i = 1 To 5000
    
    .Add , , , "Node " & i
    
    Next
    
    End With
    
    
    经测试,优化的循环代码要比传统方法执行速度快40%左右。原因在于:将Nodes集合对象保存在临时变量中,或者应用With代码块后VB将使用隐藏的临时变量后,就可以避免在循环中重复绑定Nodes对象到它的父TreeView1对象上。由于这种绑定是低效率的,因此省却它就能节省大量的执行时间。
    
    同样的道理对于其他ActiveX控件也生效:
    
    
    ListView控件的ListItems、ListSubItems以及ColumnHeaders集合
    
    Toolbar控件的Buttons和ButtonMenus集合
    
    ImageList的ListImages集合
    StatusBar控件的Panels集合
    TabStrip控件的Tabs集合

    

 

相关新闻

您可能对这些感兴趣  

用VB做定时断线程序
VisualBasic中的界面设计原则和编程技巧
VB6.0与Windows API 间的呼叫技巧
制作可以自动隐藏的弹出式菜单
ListBox中的字符串超长显示的解决方法
VB中的Unicode 和 Ansi 格式
优化程序显示速度
Visual Basic 产生渐层的 Form 背景
用VB实现客户——服务器(TCP/IP)
用VB制作注册软件的方法

题目筛选器
日期:
类型:
状态:
得分: <=
分类:
作者:
职业:
关键字:
搜索

 
 
 
  焦点事件
 
  知识体系
 
  职业列表
 
 
  最热文章
 
 
  最多引用文章
 
 
  最新文章
 
 
 
 
网站介绍 | 广告服务 | 招聘信息 | 保护隐私权 | 免责条款 | 法律顾问 | 意见反馈
版权所有 不得转载
沪ICP备 10203777 号 联系电话:021-54428255
  帮助提示    
《我的太学》是一种全新的应用,您在操作中遇到疑问或者问题,请拨打电话13564659895,15921448526。
《我的太学》