- 博客(4)
- 收藏
- 关注
原创 机房收费系统—解决子窗体最小化时,程序一关闭VB就崩溃问题
前言 不知道大家有没有出现过这样的问题,当子窗体是最小化状态时,点击主窗体右上角的[×]按钮,或者直接关闭该子窗体时,VB就会停止运行。曾经这个问题一度困扰了我,但是原系统这样操作确确实实是没有问题的。解决方法 在解决这个问题之前,先来一些准备工作。 不知道大家是否知道,一个窗体在卸载时发生的事件的顺序,其实是这样的:Form_QueryUnload() -> Form_Unload()
2017-12-29 20:57:33 1184 41
原创 机房收费系统—实现子窗体自动最小化
前言 机房终于进入收尾工作了,但是在优化的时候,我发现在原系统中,当我们点击一个子窗体出现的时候,其他的子窗体会自动最小化到主窗体的左下角,那么这个功能是怎么实现的呢?功能实现 其实,让子窗体自动最小化很简单,只需要几行很简单的代码就可以搞定了。请看下面的代码:'当窗体成为活动窗体或该窗体获得焦点时,触发的事件Private Sub Form_Activate() Dim a As F
2017-12-29 17:47:24 874 34
原创 机房收费系统—日结账单
前言 这个星期机房敲完了日周结账单和上下机,但是不同的人看待问题的角度不一样,所以大家做出来的机房也有一些差别,下面我就说一说我的想法。问题的由来 经过机房收费系统的尝试,相信大家都对原来的系统有了一些想法,或许原来的系统有些地方优化的不是很好,当然也正是因为这样给了我们想象的空间。 我发现如果有一段时间我们没有查看日结账单,那么下一次的上期余额就会变成0,当然这是不行的。因为这个问题我也
2017-12-24 17:36:38 826 42
原创 关于VB中的WithEvents关键字理解
【前言】 最近敲机房敲到了日结账单,对于报表和VB的交互我们还是第一次接触,但是我们却可以借助巨人的肩膀。但是我在看巨人博客的时候,发现在定义报表对象的时候却有一些不同。带着这样的疑问,我就想知道到底有什么区别。【WithEvents关键字】 我们在使用报表的时候,当然得先定义一个变量,由于它属于对象变量,所以我们在使用前还必须实例化。 但是我却发现有两种定义代码,接下来就让我们了解一下有
2017-12-17 23:25:48 13445 26
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人