VB毕业论文设计.pdf

毕业论文设计 VB 面向对象程序设计，从开始到现在，我学到了一个面向对象的思想， VB 很不错的 一个入门面向对象编程语言，下面开始说下我从开始学习到现在总结和积累的经验。 刚开始玩 VB，感觉真好玩，只会一个 show（）方法，想了一个捉弄人的好玩的东东 ， 毕竟刚开始玩，要有自己的创新，直接看 api 函数，看不懂，所以先简单的做一个自己的小 程序了，做了发给朋友玩玩。 1：初学 VB 制作一个好玩的程序 说明：本程序是初级 VB，刚玩的时候制作的，捉弄人玩的吧，因为我比较喜欢玩 ，所 以这个捉弄人的小小程序就诞生了 ，思路是这样的，先初始设置 4 个窗体，在桌面四个角上， 每个角都设置一个，启动出窗体设置第一个 form1，然后关闭一个就显示??他的三个 ，这样 他打开后显示一个窗体，只要关闭就会显示三个，关闭其中任何一个，就显示其他的三个窗 体，因为要捉弄人吧，总不能被人家在任务管理器直接关闭了吧，所以要加上一句， App.TaskVisible= False，加上这句在任务管理器中就看不到应用程序啦 ，不过在进程中还是 能看到的，想隐藏进程吗，就算 VC 也不可能吧，有一种方法可以插入进程 ，但是不是隐藏 进程，因为是玩玩了，没必要搞的那么麻烦，而且是新手所以制作个这样简单好玩的东西 哈。。。 代码部分： Private Sub Form_Load() App.TaskVisible= False ‘这里上面说了是隐藏任务管理器中应用程序显示的。 MsgBox 欢迎大家一起交流技术 QQ：454690484 网站 , , 网痴娱 乐技术 ‘ 这里是打开的时候装入一个消息框用来显示内容效果如下： End Sub Private Sub Form_Unload(Cancel As Integer) ‘上面的那是窗体装入事件，这里的是窗体卸载事件， Form2.Show‘当窗体被卸载（关闭）的时候让 form2，form3，form4 三个窗体显示。。。 Form3.Show Form4.Show End Sub Private Sub Timer1_Timer() ‘这里需要提前画一个时间控件 ，因为喜欢玩嘛，所以做了个特效，要字体颜色不断变 换，设定变换颜色可以设置时间控件的 interval 这个属性，来设定变换颜色间隔的时间 ，显 示颜色，我用的是常量颜色，当然还可以用那个 RGB 函数，下面的常量 vbRed 代表红色， vbGreen 代表蓝色，就是 vb 然后加上颜色英文，可以查下 VB 常量。 If Form1.BackColor = vbRed Then Form1.BackColor = vbGreen Else Form1.BackColor = vbRed End If ‘判断如果是红色则变成绿色 ，如果不是红色的话，变成红色，因为这里面的事件是在 时间控件里面发生的，因 interval 这个属性来决定变换颜色的速度。 End Sub 其他三个窗体也都要这么设置，那么只要关闭一个就显示其他的三个了，刚开始玩 ，发 给朋友，感觉真好玩，这是我的第一个 VB 程序。截个图看下效果 呵呵，在应用程序里面找不到，关不掉，不过在进程里面是可以找到的 ，关掉就可以了。。。 2：好玩的自作特效代码 说明：一次看到一个青年文摘网页 ，那文字是一个一个的出现 ，而且鼠标是十字形状的， 以后自学网站才知道那个鼠标样式原来是通过 CSS 设置的，言归正传，人家用那个网页实 现，是 jsp 实现的，我也想用 VB 实现，要实现肯定不是难事