机房收费系统(四)----基本
前言
学生上机状态查看:frmInquiryLineState
学生查看余额:frmInquireMoney
删除或添加用户:frmAddorDeleteUser(添加用户:frmAddUser)
基本数据设定:frmBasicDataSet
说明:frmHowtoMenu
关于:frmAbout (作者信息:frmWriter)
充值:frmFillMoney
退卡:frmReturnMoney
一、SetParent函数
在开始制作主窗体的时候就会涉及到这样的函数应用,但理解不够,导致后面还会出错。
1、狭义讲:
SetParent函数是对窗体的弹出位置、折叠、子窗体父窗体的形式的一种加工手段。(个人理解函数:是通过一种简单的可以套用的,对于某些需要提供相应服务的一种固定形式)
应用套路:setparent +当前需要操作句柄 ,目标句柄
例子:setparent 密码窗体.hwnd , 主窗体.hwnd '把密码窗体显示在主窗体之上。
所以如果是子窗体里面套子窗体,比如删除或添加用户窗体里,点击按钮,弹出另一个添加用户窗体。那么就让添加用户窗体在删除添加用户窗体上弹出: setparent 添加用户窗体.hwnd,删除或添加用户窗体.hwnd
2、广义讲:
setparent函数是API函数的一种,是对于某些物体进行操作,将他转移到目标位置。API函数,是一个协调中心、和调用服务的中心。协调的是程序应用、内存分配、资管管理;调用的是各种函数。
这里的对于某个物体到另一个目标物体上进行操作,而不旦旦指狭义上的对于一个窗体到另一个窗体的操作。比如一个cmd控件,要移动到任何一个目标位置。
SetParent cmdOK.hwnd , ***.hwnd 但这个控件就会失去了它原本的所带的事件不能实现,怎么实现呢?这里有一个特别好的文章链接:setparent用文字详细的描述了这是怎样的过程,但是有一些东西并不是很理解,把我自己的理解汇总为下面的图:
这里的对于某个物体到另一个目标物体上进行操作,而不旦旦指狭义上的对于一个窗体到另一个窗体的操作。比如一个cmd控件,要移动到任何一个目标位置。
SetParent cmdOK.hwnd , ***.hwnd 但这个控件就会失去了它原本的所带的事件不能实现,怎么实现呢?这里有一个特别好的文章链接:setparent用文字详细的描述了这是怎样的过程,但是有一些东西并不是很理解,把我自己的理解汇总为下面的图:
图解:有一个单机窗体事件,单机后让cmdok按钮显示在另一个窗体1上。而cmdOK-click也有自己的事件,是调用一个图片,当单机事件成功后,按钮调到窗体1上,并且在窗体1上可以实现click调用图片的功能。(初步的浅显思想,不对的地方请多多指正)
二、驼峰命名法
之前的窗体都是自己按照自己的想法,有的是汉语拼音有的是汉语随意的命名,看到了这样的一篇博客就把之前的命名都改了过来点击打开链接。之前就听师父们提到过驼峰命名法,但也只是听说的阶段,今天简单总结一下自己的第一理解。
驼峰命名法名字的由来:当变量名和函数名是由多个单词连起来表示的唯一一个词义时,第一词第一个字母小写其余的单词的第一个字母大写或者每个单词的首字母都大写,形成此起彼伏的状况想驼峰一样,所以称为错峰命名法。资料里描述,驼峰命名是由Perl语言发展来的,而这本书的封面正是一个骆驼。
驼峰命名法分为:大驼峰和小驼峰命名法两种,小驼峰一般都是第一个字母小写,其他单词首字母都是大写,一般用于变量的命名。大驼峰是所有单词的第一个字母都大写。
三、text
这个属性再熟悉不过了,接触最多的就是text控件的属性,在很多的地方都要用到,回顾一下。
1、可以多行输入文本,并且自动换行:是MultiLine属性 设置为true(这是在本行都填满的情况下的换行)
2、并且当文本超过高度自动生成下滑滚轮:ScrollBars属性 属性值是2-veritical
3、字体可以设置为自动调节:通过按钮让fontsize的值累加或者累减,还有进行单机事件的Ucase函数和Lcase函数 比如:text1.text=UCase(text1.text) '文本全部为大写,同理可以设置小写(字体也可以设置大小颜色还有其他的格式等:fontsize或者fontcolor属性直接设置数字大小颜色就可以)
4、在指定的地方换行:用VBCrlf 字符串常数:应用:“A” & VBCrlf & "B" 表示B在A的下一行位置,如果想要行距变大,那就:“A” & VBCrlf & VBCrlf & "B"这样就是A所在的行和B所在的行中间隔了一行
小结
很多细小的东西都是需要不断的重复温故学习,待续。。。