PowerBuilder总结——原来你是这么的简单

 一、个人总结

     在自学考试最后的阶段是让我们用pb做一个小程序。当然，之前对pb只是有个简单的了解，但是真要是用它做个什么东西还真难。经过了几个星期的奋战，终于将毕业设计做完了。让我们怀着兴奋的心情，来回顾一下这段时间的学习，好好总结一下

    1、毕业设计的感受

       此次毕业设计给了我们一次自主学习的机会。我们如何把新知识变为旧知识，那就需要我们联系之前已有的知识，将它们做比较，找出异同点，然后掌握不一样的地方就行了。
      虽说PowerBuilder是一种新的语言，但是经过了这次学习，在运用中逐渐的熟练使用，从陌生到熟悉，对它有了一个新的认识。

      毕业论文的开始的时候，还是一头雾水，当确定了自己的题目，知道自己要干什么之后，就开始设计自己的功能模块，自己的数据库表，然后查阅各种关于Pb的书，网上找与之相关的各种资料，历经了各种困难，最后终于把它完成了，在这个过程中学到了很多。

    2、毕业设计的心得

      学习就是一件从不知道到知道，从不理解到理解的过程。所以，在这个过程中，我们没必要忧虑，勇敢的大步向前走就行。 生活要用一颗积极的心态去对待，不管我们喜不喜欢，既然选择去做了，就要把它做好，既然要做好就要好好学习这方面的知识。因此，我们要要本着一种学习的心态去学习。首先，要对pb的基本操作有一定的了解，然后去学习语法知识，查阅相关书籍与资料，让pb变得得心应手。

      总之，学完了不仅仅就完了，学完之后首要任务就是总结，总结就是收获，我们不要只知道辛勤耕耘，不懂得自然收获。只有我们认真总结了，收获了，知识才能变为我们自己的，新的也就变成旧的了，这样学习才能达到事半功倍的效果，而且还不会丢知识。最后说一句，书山有路勤为径，学海无涯苦作舟。让我们活到老，学到老。

二、简单操作

      首先跟大家分享了一下自己这次学习的收获之后，就让我们看看通过这次学习，到底学到了什么。
学习一门语言，首先要了解的就是语法知识，下面我们就来说说pb中基本的增、删、改、查（其实更sql语句基本一样）。

     1、添加用户      

        一个系统，首先要做的就是添加数据。这里用到了isnull函数，这个函数是自己写的，以后再介绍怎么写，它的作用就是判断窗体上的控件内容是否为空，保证信息填写完整，没有遗漏。

	//定义变量
	int addlevel
	str_user user  //定义了一个结构，就是我们平时说的实体
	
	//判断是否为空
	if isnull(parent) then
		messagebox("提示","信息填写不完整！") 
		return
	end if
	
	//将权限，转换为可存储信息
	if trim(ddlb_level.text)="管理员" then
		addlevel=0
	elseif trim(ddlb_level.text)="一般用户" then
		addlevel=1;
	else
		messagebox("提示","请选择用户权限级别！") 
	end if
	
	//给变量赋值
	user.yhm=trim(sle_name.text)
	user.mm=trim(sle_pwd.text)
	user.qx=addlevel
	user.zsxm=trim(sle_truename.text)
	
	//添加一条新的信息
	INSERT INTO user_info(username,userpwd,userlevel,truename)
	values (:user.yhm,:user.mm,:user.qx,:user.zsxm);
	
	messagebox("提示","添加成功！") 
	

      2、修改用户信息

        这里出现的冒号，是因为pb语法要求sql语句中的变量都要加上冒号

	
	//定义变量
	int addlevel
	str_user user  <span style="font-family: Arial, Helvetica, sans-serif;">//定义了一个结构，就是我们平时说的实体</span>

	
	//判断是否为空
	if isnull(parent) then
		messagebox("提示","信息填写不完整！") 
		return
	end if
	
	//将权限，转换为可存储信息
	if trim(ddlb_level.text)="管理员" then
		addlevel=0
	elseif trim(ddlb_level.text)="一般用户" then
		addlevel=1;
	else
		messagebox("提示","请选择用户权限级别！") 
	end if
	
	//给变量赋值
	user.yhm=trim(sle_name.text)
	user.mm=trim(sle_pwd.text)
	user.qx=addlevel
	user.zsxm=trim(sle_truename.text)
	
	//保存修改的信息
	update user_info  
	set userpwd=:user.mm,userlevel=:user.qx,truename=:user.zsxm
	where UserName=:user.yhm;  
	
	messagebox("提示","修改成功!")

      3、删除用户信息

        这里用到的userId是一个全局变量，如果这个用户登录了，他就不能将这个用户删除（也就是用户不能删除自己）

str_user user       <span style="font-family: Arial, Helvetica, sans-serif;">//定义了一个结构，就是我们平时说的实体</span>

user.yhm=trim(sle_name.text)  

//判断是否是当前用户
if user.yhm=userId then
	messagebox("警告","该用户正在使用，不能删除！")
else
	//删除所选用户
	delete   
	from user_info  
	where "UserName"=:user.yhm;  
	
	messagebox("提示","删除成功")  
	
	close(parent)   //关闭窗体
end if

       总结：想当初，刚学vb的时候，那是我学的关于计算机的第一个语言，当时学了大概半年的时间。而现在，对于我来说，pb也是一门新的语言，可是只用了半个月，这就学习的过程。因为每个知识都是相关联的，你学到的知识越多，当你再次学习一门新知识的时候，你学的就越快。所以，我们要积累自己的知识，博览群书，让自己的学习充满活力。