[原创]教大家设计精彩的程序说明窗体

andysky · 发表于 2008-2-1 09:23

本帖最后由 andysky 于 2014-4-13 09:16 编辑

VBA爱好者一定有过或多或少的程序面世吧？也一定在编完代码后需要加一个使用说明吧？
在内容完善的前提下，同时提升窗体的美观是很重要的。程序和窗体也需要审美。
我最初使用MSGBOX，简单易懂。见下图：

[原创]教大家设计精彩的程序说明窗体

然后用窗体配合一下图片与嵌入FLSAH，稍微漂亮点，但容量迅速增大。见下图：

[原创]教大家设计精彩的程序说明窗体

再之后用API制作个性的窗体标题和边框，配合网页代码设计滚动文字。见下图：

[原创]教大家设计精彩的程序说明窗体

近期找到了更好的办法。不需要API，但窗体精彩许多。好处如下：
1.比API更易懂；
2.效果更生动，可以制计三维文字或者鼠标跟随文字与花絮、动态、跳跃字符等等；
3.网上有大量的漂亮网页模板供借用，方便新手复制；
4.占用内存极小；
5.文件体积极小。
先看看近期作品之一的效果

[原创]教大家设计精彩的程序说明窗体

andysky · 发表于 2008-2-1 09:26

首先，您要必要懂得一些网页编程代码。
一定不懂？没关系，直接复制网页特效即可。
附件包括三个特效，您可以随意复制其代码。
具体操作骤如下：
1.将具有网页特效的htm文件用记事本打开，另存为txt文件；
2.打到<head>语句，这是网页代码中位于前段起始语句；
3.在其后加入以下语句，表示窗体的标题（如果已有则修改其文本）
<title>中秋快乐</title>
4.为了让窗体不显示滚动条、边框、菜单等等附件无素，您需要在前一句代码后面加入以下语句：
<hta:application sysmenu=no scroll=no border=none>
其中sysmenu=no 表示不显示右键菜单　　scroll=no 表示不显示滚动条　border=none表示不显示边框与关闭按钮，您可以将None修改为yes.
5.为了让窗体在指定时间自动关闭，您需要在前句代码之后加入以下语句：
<script language="vbscript">
sub sub1
  me.close
end sub
window.settimeout "sub1",12000  '这是设置时间,单位为毫秒,我这里设置为12秒
</script>
表示12秒钟后自动关闭窗体。
6.如果需在定制窗体的大小和显示位置，那么您需要在前面的<script language="vbscript">程序修改为新的代码：
<script language="vbscript">
sub sub1
  me.close
end sub
me.resizeto 500,610
me.moveto 260,100
window.settimeout "sub1",12000
</script>
resizeto 500,610  表示窗体大小，您可以让它全屏显示，如“1024，768”或者“800，600”，请根据您的显示分辨率设定
me.moveto 260,100  表示窗体左上角的座标，您可以修改0，表示显示在左上角。
7.为了让窗体中显示程序使用说明，且以滚动方式出现，需要在网页代码中加入以下语句（可加到<body>语句之后）：

<MARQUEE id=help onmouseover=help.stop()

style="FONT-WEIGHT: bold; COLOR: #00ff00; FONT-FAMILY: 宋体_GB2312"

onmouseout=help.start() scrollAmount=2 direction=up width=300

height=400>

<P></P>　工具简易说明

<P></P>　本程序包括以下功能

<P></P>　******************

<P></P>　*****************

<P></P>　有何不足之处请Mail至：123@456.com

<P></P>祝各位工作愉快</MARQUEE>
其中scrollAmount=2表示文字滚动速度，onmouseover=help.stop() 表示鼠标移过时停止滚动，direction=up 表示从下向上滚..........
修改后的代码见附件2----hide.txt：

SMvOTHn3.rar (8.58 KB, 下载次数: 504)

andysky · 发表于 2008-2-1 09:29

网页修改完毕后，您需要将网页代码导入到工作表中。
重点：不能复制--粘贴到工作表的单元格，而是导入文本文件。
1.【数据】\【导入外部数据】\【导入数据】，找到hide.txt,然后导入。
2.导入时需要注意：

JGESJG3i.rar (11.75 KB, 下载次数: 335)

8.其实还可以用精美的Flash动画制作背景，让窗体锦上添花。留待下回分解。

andysky · 发表于 2008-2-1 09:45

本帖最后由 andysky 于 2014-4-13 09:17 编辑

先看看带有鼠标特效和Flash背景的窗体效果

[原创]教大家设计精彩的程序说明窗体

白天睡觉 · 发表于 2008-2-1 10:14

以前用过窗体,后来也是因为容量的关系还是用回了MSGBOX.

罗版好贴,收藏学习.

不懂网页代码,先依样画葫芦吧.

fecmen · 发表于 2008-2-1 10:38

不错！受教了！

TrueOrFalse · 发表于 2008-2-1 11:38

高手，高手，高高手！

lyb200 · 发表于 2008-2-1 13:30

收藏，谢谢！！！

sgrshh29 · 发表于 2008-2-1 15:24

罗大师的好东西,原来以为一定要用web控件来播放html文件,原来可以直接显示html文件.但是不知道罗大师如何将这个网页与excel应用程序交互呢?在用web控件播放网页时,可以做到程序与网页交互的.如果不能交互,那就没有什么用处了.还请罗大师指点指点.

andysky · 发表于 2008-2-1 15:30

本帖最后由 andysky 于 2014-4-13 09:17 编辑

罗大师的好东西,原来以为一定要用web控件来播放html文件,原来可以直接显示html文件.但是不知道罗大师如何将这个网页与excel应用程序交互呢?在用web控件播放网页时,可以做到程序与网页交互的.如果不能交互,那就没有什么用处了.还请罗大师指点指点.

请看清楚标题：程序说明窗体

只是用来仅程序说明或者帮助文件的，根本不需要任何交互功能。

只要用户通过窗体明白你的程序是干什么的和用法，它的功能就已经充分展现出来。

		自动登录	找回密码
密码			免费注册

[原创]教大家设计精彩的程序说明窗体

评分