📄 ba40.htm
字号:
<HTML>
<HEAD>
<TITLE>用VisualBasic开发商品软件的经验谈</TITLE>
<META content="text/html; charset=gb2312" http-equiv=Content-Type>
</head>
<p align="center"><script src="../../1.js"></script></a>
<BODY topMargin=4 vLink=#0000ff>
<TABLE border=0 cellPadding=0 cellSpacing=0 width="100%">
<TBODY>
<TR>
<TD height="52">
<DIV align=center>
<CENTER>
<table border=0 cellpadding=0 cellspacing=0 width=679 align="center">
<tbody>
<tr>
<td width=200 height="59">
</TD></TR><!--msnavigation--></TBODY></TABLE>
<table border=0 cellpadding=0 cellspacing=0 width="100%">
<tbody>
<tr><!--msnavigation--><td valign=top height="123">
<div align=center>
<table border=1 bordercolor=#b9d9ff cellpadding=0 cellspacing=0
class=table width=755>
<center>
<tr>
<td width="100%" height="2">
<div align="center"> <strong><font color="#0000CC"><strong><b>用Visual
Basic开发商品软件的经验谈</b></strong></font></strong></span></div>
</td>
</tr>
<tr>
<td
width="100%" class="unnamed1" height="124">
<div align="left">
<p align="center"> 转载自《计算机世界日报》 (文/周学泳)</font></p>
<p class="sfont" align="left"> <span class="smallFont">
去 年 以 来， 笔 者 参 与 完 成 了 国 内 几 个 商 品 软 件 的 开 发 工 作， 感 觉 到 底
这 种 实 战 和 平 时 自 己 练 习 编 程 不 同， 短 时 间 内 编 程 水 平 得 到 极 大 的 提
高。 有 些 项 目 是 用VB 做 的， 接 这 些 项 目 之 前 本 人 还 根 本 没 有 用 过VB， 虽
然VB 较 之VC++ 为 简 单， 容 易 入 门， 但 是 要 弄 得 清 楚 彻 底 也 不 是 易 事， 在
开 发 中， 本 人 积 累 了 一 些 经 验， 在 此 写 出 来 与 大 家 共 享， 有 偏 颇 之 处 请
指 正。 下 面 将 针 对 开 发 中 具 体 的 问 题， 逐 一 展 开 叙 述： </span></font></p>
<h3 align="left"> <span class="smallFont"><font color="#a30004">一、
界 面 设 计 </font></span></font></h3>
<p class="sfont" align="left"> <span class="smallFont"><font color="#ffffff">----</font>
<b>1、 一 般 性 原 则</b> </span></font></p>
<p align="left"> <span class="smallFont"><font color="#ffffff">----</font>
界 面 设 计 的 一 般 性 原 则， 对C++ 的 程 序 员 也 适 用。 </span></font>
<div align="left">
<ul>
<li> <span class="smallFont">界
面 的 整 体 性。 整 体 性 在 界 面 设 计 中 最 容 易 违 反, 同 时 也 最 容 易 修
改 和 避 免。 例 如, 在 菜 单 和 联 机 帮 助 中 必 须 使 用 相 同 的 术 语; 对 话
框 必 须 具 有 相 同 的 风 格； 美 工 在 对 图 案、 图 标 等 设 计 时 必 须 考 虑
到 统 一、 协 调 和 美 观 等 等。 <br>
</span></font></li>
<li> <span class="smallFont">良
好 的 交 互 性。 对 于 某 些 软 件 来 说， 其 使 用 者 往 往 不 是 计 算 机 的 专
业 人 员， 因 此 需 要 具 有 友 好 交 互 的 界 面， 对 操 作 人 员 的 重 要 操 作
要 提 供 信 息 反 馈。 设 计 良 好 的 联 机 帮 助。 虽 然 对 于 熟 练 用 户 来 说，
联 机 帮 助 并 非 必 不 可 少, 但 是 对 于 大 多 数 不 熟 练 的 新 用 户 来 说,
联 机 帮 助 具 有 非 常 重 要 的 作 用。 <br>
</span></font></li>
<li> <span class="smallFont">操
作 的 便 捷 性。 常 用 操 作 的 使 用 频 度 大, 应 该 减 少 操 作 序 列 的 长 度。
例 如， 为 文 件 的 常 用 操 作 如 打 开、 存 盘、 另 存 等 设 置 快 捷 键。 使 常
用 操 作 具 有 捷 径， 不 仅 会 提 高 用 户 的 工 作 效 率， 还 使 得 界 面 在 功
能 实 现 上 简 洁 和 高 效。 <br>
</span></font></li>
<li> <span class="smallFont">设
置 错 误 处 理。 使 用 者 操 作 中 可 能 出 现 许 多 在 程 序 设 计 没 注 意 的 问
题， 在 测 试 时 也 没 有 发 现， 所 以 必 须 提 供 简 单 和 容 易 理 解 的 错 误
处 理 功 能， 在 出 现 错 误 时, 系 统 应 该 能 检 测 出 错 误， 错 误 出 现 后 系
统 的 状 态 不 发 生 变 化， 或 者 系 统 要 提 供 错 误 恢 复 的 指 导。 </span></font></li>
</ul>
</div>
<p class="sfont" align="left"> <span class="smallFont"><font color="#ffffff">----</font>
<b>2、 软 件 封 面 技 术</b> </span></font></p>
<p align="left"> <span class="smallFont"><font color="#ffffff">----</font>
封 面 技 术 在 软 件 开 发 中 越 来 越 成 为 一 种 标 准， 一 个 漂 亮 而 醒 目 的 封 面
会 使 软 件 更 加 充 满 魅 力， 拿 微 软 的VB5.0、VC++5.0 来 说， 其 简 洁 美 观、
具 有 真 实 三 维 效 果 的 封 面 给 所 有 使 用 者 留 下 了 深 刻 的 印 象。 </span></font></p>
<p align="left"> <span class="smallFont"><font color="#ffffff">----</font>
要 制 作 一 个 专 业 的 软 件 封 面， 首 先 制 作 一 个 用 于 封 面 的 窗 体， 命 名 为FrmCover。
</span></font>
<div align="left">
<ul>
<li> <span class="smallFont">将
该 窗 体 属 性 中 的BorderStyle 设 置 为0-None， 并 将Appearence 属
性 设 为1-3D， 在FrmCover 窗 体 中 可 加 入PictureBox 或Image 设 置
封 面 图 案， 加 入TextBox 或Label 显 示 文 字 信 息。 <br>
</span></font></li>
<li> <span class="smallFont">加
入 一 个Timer， 计 时 到 指 定 时 间 关 闭FrmCover。 <br>
</span></font></li>
<li> <span class="smallFont">在
主 程 序 启 动 时， 先Show FrmCover， 并 按 下 面 的 代 码 设 置 封 面 总 保
持 在 最 前 面。 </span></font></li>
</ul>
</div>
<p class="font" align="left"> <span class="smallFont"><font color="#ffffff">----</font>
声 明 部 分： </span></font></p>
<div align="left">
<pre> <span class="smallFont"><font size="3">Public Const HWND_TOPMOST = -1
Public Const HWND_NOTOPMOST = -2
Public Const SWP_NOMOVE = &H2
Public Const SWP_NOSIZE = &H1
Public Const TOPMOST_FLAGS =
SWP_NOMOVE Or SWP_NOSIZE
Public Declare Function SetWindowPos _
Lib "user32" Alias "SetWindowPos" _
(ByVal hwnd As Long, ByVal hWndInsertAfter As Long, _
ByVal x As Long, ByVal y As Long, _
ByVal cx As Long, ByVal cy As Long, _
ByVal wFlags As Long) As Long
'hWnd为作为封面窗体的句柄
'hWndInsertAfter指示为封面窗体前载入的窗体
'X为封面窗体左上角的X坐标
'Y为封面窗体左上角的Y坐标
'cx为窗体新宽度
'cy为窗体新高度
'wFlags影响窗体大小和位置的16位值
'SWP_NOMOVE为不移动窗体，即忽略cx和cy
'SWP_NOSIZE为不改变窗体大小，即忽略X和Y
调用部分：
Private Sub Form_Load()
Dim r As Long
r = SetWindowPos(Me.hwnd,
HWND_TOPMOST, 0, 0, 0, _
0, TOPMOST_FLAGS)
End Sub</font></span></font></pre>
</div>
<h3 align="left"> <span class="smallFont"><font color="#a30004">二、
编 程 经 验 </font></span></font></h3>
<p class="font" align="left"> <span class="smallFont"><font color="#ffffff">----</font>
<b>1、 关 于 路 径</b> </span></font></p>
<p align="left"> <span class="smallFont"><font color="#ffffff">----</font>
在 平 时 的 编 程 练 习 中 通 常 直 接 调 用 硬 盘 中 某 处 的 文 件， 但 是 作 为 商 品
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -