自定义博客皮肤VIP专享

*博客头图:

格式为PNG、JPG,宽度*高度大于1920*100像素,不超过2MB,主视觉建议放在右侧,请参照线上博客头图

请上传大于1920*100像素的图片!

博客底图:

图片格式为PNG、JPG,不超过1MB,可上下左右平铺至整个背景

栏目图:

图片格式为PNG、JPG,图片宽度*高度为300*38像素,不超过0.5MB

主标题颜色:

RGB颜色,例如:#AFAFAF

Hover:

RGB颜色,例如:#AFAFAF

副标题颜色:

RGB颜色,例如:#AFAFAF

自定义博客皮肤

-+
  • 博客(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关注的人

提示
确定要删除当前文章?
取消 删除