精华区文章阅读

发信人: zhaowei (还珠格格), 信区: VisualBasic
标  题: Visual Basic中的界面设计原则和编程技巧7
发信站: 紫丁香 (Tue Jun  1 18:18:44 1999), 转信

   菜单项的其他属性

   用ALT+字母键激活顶层菜单，或者在菜单激活后用字母键激活
   一个菜单项，必须学会使用&。&用在菜单项的标题属性
   (Caption)里。它的用法和作用与在用C语言编制的Windows程序
   中的用法和作用相同。

   有时希望顶层菜单之间的间隔大一些，或者某个顶层菜单出现
   在菜单条的最右端，这时就要用到标题属性是空格的菜单。如
   果一个菜单的标题是由多个空格组成的，那么这个菜单在菜单
   条上就占用跟空格的个数相应的空间，并且它后面的菜单也顺
   序地后移；如果这个菜单的Visible属性是False，那么它就跟
   不存在一样。

   　

   窗口设计的原则和举例

   下面是一个浮动窗口技术的例子。为了引起用户的注意，或者
   必须保证含有重要信息的窗口不被其他窗口覆盖，就要用到浮
   动窗口技术，建立一个“总在最前面”(TopMost)的窗口。具体
   的做法是：

   (1)在VB程序中加入如下的声明：

   Declare Function SetWindowPos Lib"user"(Byval h%,Byval
   hb%,Byval x%,Byval y%,By

   val cx%,Byval cy%,Byval f%)As Integer

   Global Const SWP_NOMOVE=2

   Global Const SWP_NOSIZE=1

   Global Const HWND_TOPMOST= 1

   Global Const HWND_NOTOPMOST=2

   Global Const FLAGS=SWP_NOMOVE Or SWP_NOSIZE

   (2)假设要把窗体frmExample设置成总在最前面的窗口，只要在
   frmExample窗体的Form_Load过程里加入以下代码：

   Dim success%

   success=SetWindowPos(frmExample.hWnd,HWND_TOPMOST,0,0,0,0,FLAGS)

   如果要取消总在最前面的特性，则可以执行如下的代码：

   success=SetWindowPos(frmExample.hWnd,HWND_NOTOPMOST,0,0,0,0,FLAGS)

   success不等于0表示SetWindowPos执行成功。

   在MDI程序里，有一个窗口是所有其他窗口的父窗口，各个子窗
   口完成相对独立的功能，就像是多个独立的工具组合起来一
   样。在这方面，MS Word和Windows的File Manager是最好的例
   子。

--
----------------------
        %-%      身  人
      % * * %    不  在
      %  .  % /   由江
         \\--/     己湖                    �
-----------------------

※ 来源:．紫丁香 bbs.hit.edu.cn．[FROM: 202.118.243.47]

VB 版 (精华区)