AnimateWindow是个窗口打开和关闭时产生动画效果新是个新, 所以在 API Viewer中是找不到,必需自己定义: Public Declare Function SetLayeredWindowAttributes Lib "user32" (ByVal hwnd As Long, ByVal crKey As Long, ByVal bAlpha As Byte,中国教程在线,http://www.5istudy.cnBy [阅读全文] [PDF]
(1)启动API浏览器通过该浏览器复制“SetWindowPos”声明语句(2)启动Visual Basic新建个标准EXE工程(3)使用“工程”|“添加模块”菜单项添加个新模块文件(4)打开模块代码窗口将“SetWindowPos”声明语句粘贴进去(5)打开Form1窗体代码窗口编写如下 view plaincopy to clipboardpr? Private [阅读全文] [PDF]
闪烁文字可以在屏幕上起到明显提示作用通过使用VBTimerControl控件员可以轻松在窗体上实现闪烁文字效果本文将演示如何为LabelControl控件加上闪烁效果这种思路方法同样适用于其它多种Control控件 当你在窗体上加入TimerControl控件时它只出现在设计时而不会在运行时出现可见Control控件图标TimerControl控件带有两个重要参数Interval(间隔)属性用来确定TimerControl控件多久触发次其单位为毫秒因此当该值为500时就表示秒钟会触发两次Enabled(使能)属性用来确定TimerControl控件是 [阅读全文] [PDF]
凡使用过VB4以上版本用户都会发现和VB3相比它提供了个称的为插件新特征个插件实际上是个OLE服务器用于扩展VB开发环境增强VB功能我们可以使用插件为VB菜单增加定制项可管理当前激活窗体及Control控件并响应多种文件控制事件VB在SAMPLES目录ALIGN、DATAWIZ和SPY子目录下就包含了 3个这样插件应用 这里我们着重讨论DATAWIZ下数据窗体设计器插件 1．数据窗体设计器插件引入 通常我们在使用VB数据Control控件设计数据窗体时大量时间都花在窗体可视化设计过程上如标签和数据装订Control控件建立和对齐定位我们设想要是能根 [阅读全文] [PDF]
窗体犹如块画布在设计时是设计区域而在运行时每个窗体对应于个窗口 、窗体结构: 窗体结构和普通 Windows 下窗口非常相似如图: " _disibledevent= 300End Sub 上面语句会把 Form1 窗体移动到距屏幕顶部 200 Twip 距屏幕左边距 300 Twip 地方 6、Visible(可见)属性: 当个对象 Visible 属性设置为 False 时运行时不能看见；只有当 Visible 属性值变为 True 时才能被看见 本属性虽然简单但却是常常需要用到请大家牢记在心 3、窗体主要事件: 1、Load( [阅读全文] [PDF]
在前面教程中我们讲到了窗体主要属性和事件而本节我们主要讲述窗体些窗口运用本节知识对于后面“多文档文件”创建非常重要所以希望大家好好掌握 、添加窗体: 在 VB 中每创建个新文件自动会生成个新窗体如果想在本窗体基础上再添加个窗体那么应该如何做呢？ 1、选择工程/添加窗体命令弹出如图窗口: " _disibledevent="VB教程第 4章第 4节——基本窗体操作" /> 图 4 2、其他窗体载入: 我们可以在主窗口中设置菜单或按钮并在该菜单或按钮代码区输入如下代码: Form2.Show 1 其中Show 是显示 [阅读全文] [PDF]
Private Sub Timer1_Tick(ByVal sender As Object, ByVal e As .EventArgs) Handles Timer1.Tick Dim Snow(1000, 2), Amounty As Integer Dim Oldx, Oldy As Integer Dim Coloury As Integer Dim Chg As Boolean Static c As Integer = 0 If Chg Then c = c - 20 Else c [阅读全文] [PDF]
在VB编程中应用窗体出现和关闭般都是静态不过我们利用下面个APIAnimateWindow就可以轻松实现窗体动态效果 APIAnimateWindow声明如下: Private Declare Function AnimateWindow Lib "user32" (ByVal hwnd As Long, ByVal dwTime As Long, ByVal dwFlags&nbs [阅读全文] [PDF]
作者: Builder.com
闪烁文字可以在屏幕上起到明显提示作用通过使用VBTimerControl控件员可以轻松在窗体上实现闪烁文字效果本文将演示如何为LabelControl控件加上闪烁效果这种思路方法同样适用于其它多种Control控件
当你在窗体上加入TimerControl控件时它只出现在设计时而不会在运行时出现可见Control控件图标TimerControl控件带有两个重要参数Interval(间隔)属性用来确定TimerControl控件多久触发次其单位为毫秒因此当该值为500时就表示秒钟会触发两次Enabled(使能)属性用来确定TimerControl [阅读全文] [PDF]
对于自定义的窗体类型我们是无法添加到Forms对象集合中的。而且也和其它诸如构造函数传参等方法一样，会在窗体间大量互相引用各自的成员，造成了彼此之间存在着很大的耦合性，非常不利于窗体模块间的独立，这不符合良好软件设计模式的思想。
如果我们想在一个窗体中访问另一个窗体中自定义的成员，必须把该成员的可见性设置为Public或者通过属性公开，通过属性公开的话还说得过去，但如果把可见性设置成Public的，这样做就无可避免的破坏了类型封装性的原则，而这一做法也是我们在。NET下开发相当乐意做的，特别是对于初次接触。NET的开发人员，实现访问另一类型中成员的话最先想到的就是把该成员的可见性设置为P [阅读全文] [PDF]
我们先来看看SetWindowPos函数的定义和参数：
使用API函数之前必须先在程序中声明如下：
Private Declare Function SetWindowPos Lib 'user32' (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long
其中各参数的意义如下:
参数 意义
hwnd [阅读全文] [PDF]
（1）启动API浏览器，通过该浏览器复制“SetWindowPos”函数的声明语句。（2）启动Visual Basic，新建一个标准EXE工程。（3）使用“工程”|“添加模块”菜单项，添加一个新的模块文件。（4）打开模块的代码窗口，将“SetWindowPos”函数的声明语句粘贴进去。（5）打开Form1窗体的代码窗口，编写如下程序。 view plaincopy to clipboardprint? Private Sub Form_Load() retnum [阅读全文] [PDF]
BR>使用GetBitmapBits,将图片颜色信息读到个中,然后就对数据进行扫描,使用CreateRectRgn生成每个有用点图窗体,再使用CombineRgn对有用图象合并,组成所要窗体,最后使用SetWindowRgn来设定窗体代码:Module1Public Declare Function GetObjectAPI Lib \"gdi32\" Alias \"GetObjectA\" (ByVal hObject As Long, ByVal nCoun [阅读全文] [PDF]
中用API创建窗体和VC中步骤是样只不过用IDE环境创建是把过程都封装起来现在我们用API方式创建大致让我们了解个窗体产生过程让我们使用VB员对系统机制多些了解.先所以下用C创建窗体过程:入口: APIENTRY WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance, LPSTR lpCmdLine, nCmdShow)进入后先化结构WNDCLASSEX wcex;APIRegisterClassEx,注册窗体 [阅读全文] [PDF]
么，让我们现在开始。1。新建一个VB6的标准EXE工程，然后添加一个模块，将下列代码加入新的模块中：Option Explicit Private Declare Function SetWindowLong Lib \"user32\" Alias _ \"SetWindowLongA\" (ByVal hWnd As Long, ByVal nIndex _ As Long, ByVal dwNewLong As Long) As Long Private Declare Function CallWindowProc Lib \"user32\" A [阅读全文] [PDF]
Q聊天时窗体自动隐藏功能用VC 或CBC都可以很简单地实现前几天看到有则用CBC实现例子便想用VB实现下可惜当窗体上放满Control控件时FORMMOUSEMOVE事件不能很好地触发所以只好用以下笨办法现把代码贴上窗体上需放TIMERControl控件Interval属性为200大伙如有好意见不妨贴出来让我学习学习Option ExplicitPrivate Declare Function GetCursorPos Lib \"user32\" (lpPo A [阅读全文] [PDF]
有很多软件为了实现特殊的显示效果，采用非矩形的窗体，而这些窗体往往没有标题栏。想要移动一个没有标题栏的窗口是不那么容易的。下面我介绍两种在VB中采取不同原理的方法移动一个没有标题栏的窗口。 方法一 这种方法是在窗体的MouseDown、MouseUp和MouseMove等事件的处理过程中添加代码，实现在鼠标左键按下后移动时，改变窗体的Left和Top属性，实现移动无标题栏的窗体。 进入VB，把窗体Form1的BorderStyle属性设置为0-None（无标题栏），再窗体上添加一个ButtonCommand组件，用来关闭程序。代码如下： [阅读全文] [PDF]
我们先来看看SetWindowPos函数的定义和参数： 使用API函数之前必须先在程序中声明如下： Private Declare Function SetWindowPos Lib \"user32\" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long 其中各参数的意义如下: 参数 意义 [阅读全文] [PDF]
------------------------------------------- 使窗体右上角的X按钮失效 ------------------------------------------- 程序说明： 本例利用API函数GetSystemMenu得到系统菜单的句柄 X按钮是系统菜单的一菜单项，然后用RemoveMenu函数 删去这一菜单项，也就是使X按钮失效了。 ------------------------------------------- 【VB声明】 Private Declare Function GetSystemMenu Li [阅读全文] [PDF]
代码: module1 option explicit public const gwl_wndproc = (-4) public const wm_nchittest = &h84 public const htclient = 1 public const htcaption = 2 declare function callwindowproc lib \"user32\" alias \"callwindowproca\" (byval lppr [阅读全文] [PDF]
- linux安装oracle:如何在你的Linux机器上安装运行Oracle jdbc:
- oracle10g:Oracle CSO:软件Software应该自我保护
- redhatlinux安装:ORACLE9IAS在redhat linux as 2.1上的安装
- sqlserverinsert:SQL SERVER数据导成INSERT
- oracle9iforlinux:linux es3+oracle9i备份规划脚本_修订版
- 杜绝安全隐患:杜绝安全隐患 容易忽视的Oracle安全问题
- 缓冲区溢出:Oracle缓冲区忙等待的识别和解决
- 清空数据库:Access数据库清空表后如何才能让自动编号复位
- javascript编码:javascript文档的编码问题解决
- jdbc教程:JDBC基础教程的CallableStatement
- 关注性能:改进您的开发过程
- 关注性能:异常的异常
- 堆大小:错误的堆大小产生的 堆问题
- 【转载】国内不谈java－－硅谷有感
- minij2ee常见问题(FAQ)
- j2eetutorialsun:且看微软的.Net和Sun公司的J2EE如何对垒(2)
- Flash鼠绘:可爱瓢虫的绘制
- java界面:基于Java的界面布局DSL的设计和实现
- spring异常处理:Spring中事件处理的小窍门技巧
- jdbc事务:JavaBean中使用JDBC方式进行事务处理
