内容发布更新时间 : 2024/11/8 15:09:46星期一 下面是文章的全部内容请认真阅读。

PowerBuilder的创始人 米歇尔克茨曼。 PowerBuilder奠基人 大卫李特瓦克。

1991年6月。Powersoft公司发布了其旗标式客户/服务器硬功开发工具。 1995年PowerBuilder1.0 1996年PowerBuilder5.0 2003年PowerBuilder9.0 PowerBuilder特点：

面向对象的编程和时间去懂的应用开发程序开发工具， 支持跨平台开发 可以轻松编写语句 人性化设计。

拥有独特的库文件画板和层次清晰的系统资源库。 提供了丰富多样不同风格的数据窗口 PowerBuilder9.0新特性。 支持快速开发的jsp编辑器。

支持xml、PBNI（PowerBuilder Native Interface）、EJB Client、PB9.0与Web Service 的关系，PB9.0与.NET、其他增强功能。

建立应用对象

建立Student的工作区和目标，然后建立一个名为student的对象在其Open事件中加入如下脚本：

//设置SQLCA的属性,利用名为pbexam的数据源连接数据库 SQLCA.DBMS=\SQLCA.AutoCommit=False SQLCA.DBParm=\CONNECT USING SQLCA; //打开登录窗口 open(w_register) 在应用程序的Close事件中加入如下脚本： 精选

//断开数据库连接 DISCONNECT USING SQLCA; 登录窗口

在用户名的单行编辑框的ue_enterkey事件中加入如下脚本： //判断用户是否按下回车 If key = KeyEnter! Then //把输入焦点转移到\密码\单行编辑框 sle_2.SetFocus() End If 在密码单行编辑框的ue_enterkey事件中加入如下脚本： If key = KeyEnter! Then //触发登录按钮的Clicked事件 cb_1.TriggerEvent(Clicked!) End If 在登录按钮的Clicked事件的脚本中加入如下脚本： String password,right //用SQL语句根据用户名查找密码 //right为一全局变量，用来保存用户权限 SELECT mm,qx INTO:password,right FROM \WHERE \//SQLCode等于100代替没有得到任何记录。 If SQLCA.SQLCode=100 Then MessageBox(\提示消息\没有此用户\ sle_1.text=\ sle_1.SetFocus() ElseIf password<>sle_2.text Then MessageBox(\提示信息\密码错误！\ sle_2.text=\ sle_2.SetFocus() Else //打开主窗口，关闭登录窗口 Open(w_main) Close(Parent) End If 在取消按钮的Clicked事件的中加入如下脚本： Close(parent)//关闭登录窗口 菜单设计

精选

在学生管理菜单项的Clicked事件中加入如下脚本: //打开学生管理窗口 OpenSheet(w_student,w_main,4) 在页面设置菜单项的Clicked事件中加入如下脚本: window actsheet //取得当前活动窗口 actsheet=w_main.GetActiveSheet() //触发活动窗口的ue_pageset事件 actsheet.TriggerEvent(\在打印菜单项的Clicked事件中加入如下脚本: window actsheet actsheet=w_main.GetActiveSheet() actsheet.TriggerEvent(\在退出菜单项的Clicked事件中加入如下脚本: Close(ParentWindow) 在窗口级联菜单项的Clicked事件中加入如下脚本: //修改菜单的选中标志 m_jilian.checked=True m_chongdie.checked=False m_shuiping.checked=False m_chuizhi.checked=False //改变工作表的排列方式 ParentWindow.ArrangeSheets(cascade!) 在窗口重叠菜单项的Clicked事件中加入如下脚本: m_jilian.checked=False m_chongdie.checked=True m_shuiping.checked=False m_chuizhi.checked=False ParentWindow.ArrangeSheets(Layer!) 在窗口水平菜单项的Clicked事件中加入如下脚本: m_jilian.checked=False m_chongdie.checked=False m_shuiping.checked=True m_chuizhi.checked=False ParentWindow.ArrangeSheets(Tile!) 在窗口垂直菜单项的Clicked事件中加入如下脚本: m_jilian.checked=False m_chongdie.checked=False m_shuiping.checked=False m_chuizhi.checked=True 精选