设为首页 友情链接
在线留言 发表文章
加入收藏 广告联系

刺猬首页

| 专案技术 | 网络技术 | 图形图象 | 网络编程 | 网页设计 | 操作系统 | 服务器 | 技术白皮书 | 在线实验室 | 刺猬论坛 |
小说专版  | 数据库 | 设计赏析 | 存储频道 | 网络安全 | 私服架设 |  Solaris | 网站评估 | PC维护技巧 | 下载中心 | 博 客 |
专   题: | Linux | java | cisco | 防病毒 | 刀片 | SOA | iscsi | ASP.NET | SQL | Oracle |
您现在的位置: IT公社 IT community >> 网络编程 >> VB.NET >> 教程正文 用户登录 新用户注册
专 题 栏 目
最 新 热 门
最 新 推 荐
相 关 文 章
跟我学XML和XSL
捷足先登学用CSS:HTML结…
一步一步跟我学Linux平台…
跟我一起学习.net之一
  跟我学用ActiveBar           
跟我学用ActiveBar
 

p align="JUSTIFY">   喜爱编程的朋友们,想不想轻轻松松就制作出类似于Office97、IE5这样的专业级界面来?ActiveBar就可以实现大家的梦想。

  该软件是由Datadynamics公司开发的,运行于Windows 95/98、Windows NT 的环境下,可用于VB、 VC、 DELPHI以及Web界面的开发,能在Design time和runtime两种方式下生成界面。

  好了,赶快下载ActiveBar,到http://www.net.edu.cn的“Eduction On Line”-“软件大本营”处,下载actbar10.exe文件,大小为1354KB。安装完成后,就随我一起开始ActiveBar之旅。

   启动VB(5.0/6.0都可以),建立一个新工程,选择菜单“工程”-“部件”,打开“部件”对话框,选择控件ActiceBar Control,将ActiveBar控件添加到VB的工具箱中,这时VB的工具箱中会出现这样一个控件。

  在VB的新工程中建立一个MDI窗体,一定要把这个MDI窗体设置为首先启动的窗体。将控件添加到窗体上,如图1所示,选择图标,单击鼠标右键,在菜单中点击“Designer”来启动ActiveBar,如图2所示。

     图1

       图2

  在Tools的窗体上单击图标来打开Manage Categories对话框,在New Category的文本框中输入File后,单击旁边的Add按钮。按照此方法依次输入Edit、Help、Built-in Menus后,如图3所示。完成后单击OK按钮,来保存Manage Categories对话框的内容。


     图3

  回到Tools窗体,在下拉列表框中选择File,点击图标,出现Tool Properties的对话框,在Caption文本框中输入:新建(&F) ,Name文本框中输入miFNew,ToolTip text文本框中输入: 新建文件,在ShortCut Key下拉列表框中选择Ctrl-N,其他的? 可以不进行改动。接着我们可以为这个New子项添加图标,点击Tool Properties对话框下方的Image按钮,这时会出现一个图标编辑窗口,如图4所示。点击Capture Image图标,屏幕上会出现一个带有网格的正方形框,并且鼠标的指针变为一个小放大镜,按住鼠标左键,将小放大镜放在自己感兴趣的图标上时,该图标会出现在正方形框中,调整好图标的位置后,松开左键捕获这个图标,图标编辑窗体再次出现,单击Apply按钮进行确认。

        图4

  此时,File项中的New子项已经完成。如法炮制,点击图标继续添加子项,输入的内容请见表1。

表1:File项内容

Name

Caption

Tooltip Text

Shortcut Key

MiFOpen

打开(&O)

打开文件

Ctrl-O

MiFSave

保存(&S)

保存文件

Ctrl-S

MiFPrint

打印(&P)

打印文件

Ctrl-P

MiFExit

退出(&X)

关闭程序

F11

完成后的File项效果如图5所示。

 


   图5

  接下来我们按照表2、3的内容,依次完成Edit项和Help项的制作。

  表2:Edit项内容

Name

Caption

Tooltip Text

Shortcut Key

MiECut

剪切(&T)

剪切

Ctrl-X

MiECopy

复制(&C)

拷贝

Ctrl-C

MiEPaste

粘贴(&P)

粘贴

Ctrl-V

表3:Help项内容

Name

Caption

Tooltip Text

MiHContents

内容(&C)

内容

MiHSearch

搜索(&S)

搜索

MiHAbout

关于(&A)

关于

  在bond窗体上点击Create Popup图标来添加一个新的子菜单,此时bond窗体上出现PopupBond1项,双击此项,屏幕上出现一个名为PopupBond1的窗体,用鼠标右键单击此窗体,在弹出的菜单中选择Bond Properties,在Bond Properties对话框的Name文本框中输入File,Caption框中输入myfile。此时,PopupBond1窗体已改名为myfile窗体,然后切换到Tools窗体,在下拉列表框中选择File项,将其所属的各子项都拖入到File窗体里,结果如图6所示。


  图6

  依照上述方法,为Edit、Help项添加PopupMenu2、PopupMenu3窗体,分别在Name文本框中输入Edit、Help,在Caption框中分别输入myedit、myhelp,完成这两项的制作。

   切换到Tools窗体,在下拉列表框中选择Built-In Menu项,依次点击NewTool图标,来生成3个子项,分别填写Tool Properties对话框,内容请参见表4

表4:Built-In Menu项内容

Name

Caption

Submenu

mnuFile

文件(&F)

File

mnuEdit

编辑(&E)

Edit

mnuHelp

帮助(&H)

Help

回到Bonds窗体,点击Menu Bar图标,会出现MnuBand1子项,双击鼠标打开该子项的窗体,选定这个窗体,单击鼠标右键单出窗体菜单,将此窗体的Name改为MainMenu,将Tools窗体上的Built-In Menu项所属的所有子项都拖到新建的窗体上,具体方法同上述相似,不再赘述。

  最后一步是为这个制作好的菜单界面添加工具条:在Bonds窗体上点击Toolbar图标,双击产生的Band1项,打开Band1窗体,将窗体的Name改为Standard,可以把你制作过的图标统统都拖到这个窗体上。

运行Vb工程,结果如图7所示,怎么样?够Cool的吧!

      图7

  还有一个小问题,每次运行用ActiveBar设计的界面时,开始总会弹出一个消息框,提示你该软件没有注册,只能用30天…,非常影响情绪,如果你想去掉这个烦人的消息框的话,请到http://home.baoding.cn.net/~haying处下载freeocx.zip(46K),解压后,阅读里面的readme文件,照着去做就行了!

频道声明:本频道的文章除部分特别声明禁止转载的专稿外,可以自由转载.但请务必注明出出处和原始作者 文章版权归本频道与文章作者所有.对于被频道转载文章的个人和网站,我们表示深深的谢意。

原始作者:佚名 录入时间:2007-1-23 1:20:00
信息来源:不详 投稿信箱:itqoo@126.com
教程录入:itqoo    责任编辑:itqoo 
  • 上一个教程:

  • 下一个教程:
  • 【字体: 】【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口
      网友评论:(只显示最新10条。评论内容只代表网友观点,与本站立场无关!)
    - 关于我们 - 合作伙伴 - 友情链接 - 广告刊登 - 投稿热线 - 在线留言版权声明联系方式 -
    IT公社版权所有 粤ICP备05127012号
    Copyrigh@2005-2006 itqoo.com.Inc All Rights Reserved  推荐分辨率 1024*768
    联系站长:E-Mail:itqoo@126.com     MSN:urchincc@hotmail.com    QQ:点击这里给我发消息
    特别感谢:亿太网络提供空间支持