基于数据库的表单设计程序实现超级链接控件与互联网对接的论文.docVIP

　　基于数据库的表单设计程序实现超级链接控件与互联网对接的论文 摘 要：数据库中所提供的各种有效控件，实现超级链接控件与互联网对接。 关键词：超级链接；事件代码；表单设计器 利用超级链接控件可以巧妙地实现表单程序与互联网网站的对接。可以先制作一个简单例子：建立表单程序与大庆职业学院网站的对接。操作步骤如下： （1）新建一表单并命名。 （2）在表单上添加超级链接控件和命令按钮控件各一个。 （3）命令按钮mand1的caption属性设置为：大庆职业学院，添加合适的背景颜色。表单背景随意设置。表单标题更改为：“互联网站点访问。” （4）添加代码（也是制作的最关键步骤）： mand1的click事件代码编写如下： thisform.hyperlink1.navigeteto（http：//）。 （5）保存并运行表单。.使用ctrl+e执行即可实现表单程序与互联网对接。同样，如果建立表单程序与其他网站的超级链接及同时与多个网站建立超级链接访问，步骤和上面相似。 下面再看一个综合性的例子：超级链接控件（hyperlink）不象文本框、命令按钮等控件那样常用，一般是在制作软件的“关于”表单的时候能够用到它。这个控件的最常用的方法是navigateto（指定要打开的网址），本文来做一个关于这个控件的例子 制作步骤如下： （1）新建表单，将其autocenter属性值设置为.t.，保存为“表单1.scx”。 （2）向表单添加一个标签控件label1，caption属性值设为“编程入门网”，fontbold属性值设为.t.，fontsize属性值设为12，forcolor属性值设置为“0,0,255”（rgb颜色）。 （3）向表单上添加一个命令按钮控件mand1，caption属性值设为“关于本站”。 （4）向表单上添加一个标签控件label2，caption属性值设为“访问指定网站”。 （5）向表单添加一个列表框控件list1，采用其默认属性值。 （6）适当调整控件、大小及在表单上的位置。 （7）添加事件代码： a.表单的load事件代码：（form1的load事件） declare integer shellabout in shell32.dll long hp;声明api函数 set library to “foxtools.fll” 载入vfp的fll库 b.表单（form1）的init事件代码： this.addobject（hyperlink1，hyperlink） 这是添加,若以后要移去它可用removeobject（hyperlink1） this.list1.additem（msdn） this.list1.additem（csdn） this.list1.additem（yesky） this.list1.additem（小小鸟） c.“编程入门网”标签label1的click事件代码：thisform.hyperlink1.navigateto（） d.“关于本站”命令按钮mand1的click事件代码： hp;访问微软msdn主页 thisform.hyperlink1.navigateto（msdn.microsoft.） case this.selected（2）访问csdn网站 thisform.hyperlink1.navigateto（） case this.selected（3）访问天极 thisform.hyperlink1.navigateto（） case this.selected（4）访问编程入门网 thisform.hyperlink1.navigateto（） endcase　 （8）运行“表单1.scx”。（可用快捷键ctrl+e） 总而言之，超级链接功能可以使程序具备直接访问的能力，不少优秀的软件都提供直接访问inter的功能。如金山词霸2000在它的系统桌面上提供互联网资源；其应用程序在其帮助菜单中提供microsoftonthe1），属性设置如下： autocenter=.t. caption=”在表单中使用超级链接” （2）通过表单控制工具栏在form1上添加一个超级链接控件（hyperlink1）和一个命令按钮mand1，设置mand1的caption属性为：“链接到计算机世界网站”。 （3）在mand1的clickevent事件中写入代码：thisform.hyperlink1.navigateto （4）保存表单form1，然后运行这个表单，当单击???链接到计算机世界网站”这个命令按钮时，就会启动inter浏览器并直接链接到站点。首先设置一个菜单选项，然后为这个菜单选项创建一个过