VB5.0应用程序的启动与退出设计

脱光光摆pose

脱光光摆pose

2016-02-18 19:09

下面图老师小编跟大家分享VB5.0应用程序的启动与退出设计,一起来学习下过程究竟如何进行吧!喜欢就赶紧收藏起来哦~
在缺省情况下,应用程序中的第一个窗体被指定为启动窗体。应用程序开始运行时,此窗体就被显示出来(因而最先执行的代码是该窗体Form_Initialize事件中的代码)。如果想在应用程序启动时显示别的窗体,就得改变启动窗体,其方法如下:
  1从“工程”菜单中,选劝工程属性”。
  2选劝通用”。
  3在“启动对象”下拉列表中,选取要作为新启动窗体的窗体。
  4选劝确定”。
  
  没有启动窗体时的启动
  
  有时候需要在应用程序启动时不加载任何窗体。例如想先运行装入数据文件的代码,然后再根据数据文件的内容决定显示几个不同窗体中的哪一个。为此,可在标准模块中创建一个名为Main的子过程,并将其设为启动对象。
  SubMain()
  DimintStatusAsInteger
  ′调用一个函数过程来检验用户状态
  intStatus=GetUserStatus
  ′根据状态显示某个启动窗体
  IfintStatus=1Then
  frmMainShow
  Else
  frmPasswordShow
  EndIf
  注意:这个过程必须是一个子过程,且不能在窗体模块内。
  
  结束应用程序
  
  当所有窗体都已关闭并且没有代码正在执行时,事件驱动的应用程序就停止运行。如果最后一个可见窗体关闭时仍有隐藏窗体存在,那么,应用程序表现为已经结束了(因为没有可见的窗体),可实际上却仍在继续运行,直至所有隐藏窗体都关闭为止。之所以出现这种情况,是因为对已卸载窗体的属性或控件的任何访问,都将导致隐含地、不予显示地加载那个窗体。
  为了避免出现这类问题,最好的办法是确保所有的窗体都已卸载,可以使用Forms集合和Unload语句。例如在主窗体上可以用一个名为cmdQuit的命令按钮来退出程序,如果应用程序只有一个窗体,则Click事件过程可简单为:PrivateSubcmdQuit_Click()UnloadMeEndSub如果应用程序使用多窗体,通常把代码放入主窗体的Unload事件过程可以卸载这些窗体。可以使用Forms集合确保找到并关闭所有窗体。
  PrivateSubForm_Unload
  DimiasInteger
  ′在窗体集合中循环并卸载每个窗体
  Fori=0toFormsCount-1
  UnloadForms(I)
  Next
  EndSub->

展开更多 50%)
分享

猜你喜欢

VB5.0应用程序的启动与退出设计

编程语言 网络编程
VB5.0应用程序的启动与退出设计

VB5.0与Windows API 间的呼叫技巧

编程语言 网络编程
VB5.0与Windows API 间的呼叫技巧

s8lol主宰符文怎么配

英雄联盟 网络游戏
s8lol主宰符文怎么配

在VB应用程序中控制Win95的启动

编程语言 网络编程
在VB应用程序中控制Win95的启动

用VB编写WindowsCGI应用程序

编程语言 网络编程
用VB编写WindowsCGI应用程序

lol偷钱流符文搭配推荐

英雄联盟 网络游戏
lol偷钱流符文搭配推荐

VB5.0中实现鼠标拖放

编程语言 网络编程
VB5.0中实现鼠标拖放

让VB应用程序支持鼠标滚轮

编程语言 网络编程
让VB应用程序支持鼠标滚轮

lolAD刺客新符文搭配推荐

英雄联盟
lolAD刺客新符文搭配推荐

让VB应用程序支持鼠标滚轮

让VB应用程序支持鼠标滚轮

Ubuntu 13.10不能启动VirtualBox怎么办?

Ubuntu 13.10不能启动VirtualBox怎么办?
下拉加载更多内容 ↓