vb 程序实例 适合初学者学习 在VB6.0中,每个应用程序都是从窗体(Form)开始的,窗体是构成用户接口的所有控件的容器。录活运用窗体的各项属性和操作,可以为用户设计出赏心悦目的操作界面。 1.窗体以当前屏幕分辨率全屏显示 在应用程序的编制调试过程中,用于经常用到菜单、工具条和工具框等辅助工具,一般不将窗体设为全屏显示,以便于操作;另外,当屏幕分辨率改变时,窗体可能不能正常显示,可以在窗体的Load事件中插入下列代码,即可使窗体启动时以当前屏幕分辨率全屏显示: Private Sub F
Delphi让窗体始终保持最大化,Delphi不让窗体最小化,只能最大化显示,当点击最小化的时候会弹出一个提示,告之不支持此项操作,程序通过判断消息类型是否"最小化"或"恢复",是则进入自己处理函数、不是则采取系统默认处理方式。具体操作代码如下: if (Msg.CmdType =SC_MINIMIZE) or (Msg.CmdType =SC_RESTORE) then //判断消息类型是否"最小化"或"恢复" //是则进入自己处理函数 begin ShowMessa
这是一个相对简单的VB制作透明 窗体的方法,看上去这个窗体无边框、无标题栏,也没有最小最大化及关闭按钮,完全显示了一个图片的效果,其实本代码是一个透明窗体的实现实例,特此为大家分享代码如下: Private Declare Function CreateCompatibleBitmap Lib "gdi32" (ByVal hdc As Long, _ ByVal nWidth As Long, ByVal nHeight As Long) As Long API函数声明 Pr