登录
首页 » VB源码 » VB SetWindowLong限制调整窗口大小的最大值

VB SetWindowLong限制调整窗口大小的最大值

于 2022-10-14 发布 文件大小:1.96 kB
0 69
下载积分: 2 下载次数: 2

代码说明:

VB 限制调整窗口大小的最大值,我们根据SetWindowLong函数的说明 ,可写出一个函数,当用户拖动窗口时,控制窗口最大能拖动到什么大小,当达到最大值时,窗口就不能继续被拖大,我们定义一个函数,在打开这个VB窗口时自动加载函数,实现对窗口最大拖动大小的控制:   Private Sub Form_Load()    Dim ret As Long    preWinProc = GetWindowLong(Me.hWnd, GWL_WNDPROC)    ret = SetWindowLong(Me.hWnd, GWL_WNDPROC, AddressOf wndproc)   End Sub

下载说明:请别用迅雷下载,失败请重下,重下不扣分!

发表评论

0 个回复

  • VB.NET API函数画线条示例
    VB.NET API函数示例,使用VB api函数画线条的一个例子,如图所示的效果中,鼠标单击两端,即可画出一条直线,主要是学习使用VB.NET中的API画图函数用法。示例运行效果请参见截图所示,本页提供该实例的源码下载。
    2022-03-22 10:44:12下载
    积分:1
  • VB生成圆形图表,圆饼百分比图表
    VB成绩统计饼图,生成圆形图表,圆饼百分比图表的例子,这种图表相信大家见多了,这个例子介绍了VB简单生成圆饼图的方法,对初学VB的朋友会有帮助,通过这个图表,你可以了解绘图、填充、按比例分配、绘制扇形等是如何实现的,用它来显示优秀人数、良好人数、及格人数、不及格人数所占的比例,各个比例用不同的颜色填充,让结果一清二楚,源代码运行于VB6.0环境 ,运行效果如下图所示。
    2022-05-15 05:38:34下载
    积分:1
  • VB 调用API函数设计关于窗体
    VB 调用API函数设计关于窗体,看第一眼,我还以为是调用Windows系统的关于窗口,仔细看,定义了自己的信息,这个例子可看作是VB使用API函数的例子,了解一些用法,关于本例子中的API用法,可看以下代码:   API函数声明:   Private Declare Function ShellAbout Lib "shell32.dll" Alias "ShellAboutA" (ByVal hWnd As Long, ByVal szApp As String, ByVal szOtherStuff As String, ByVal hIcon As Long) As Long   Private Sub Form_Load()    Call ShellAbout(hWnd, "源码素材网", " 欢迎访问网站:http://www.codesc.net!", Me.Icon)   调用了ShellAbout显示信息,更多内容请下载源码。
    2022-01-25 16:50:26下载
    积分:1
  • VB net 模拟考试系统 SQLSERVER版
    VB net 模拟考试系统,本考试时间为30分钟,系统会进行倒计时。你必须正确输入你所在班级、姓名和学号,交卷后不能再考,即时间未到不要急于点""交卷""!点击""确定""进入考试系统。本考试系统的窗口只允许打开一个,程序会判断窗体是否已经打开,如果已经打开,则不需要重复打开,只是显示。   程序正常运行需要SQL数据库,请在测试前附加并连接好。
    2022-02-07 21:46:47下载
    积分:1
  • VB6 给窗体添加滚动条
    VB6 给窗体添加滚动条,调整水平滚动条的一些属性。当窗体的大小发生变化时发生,垂直滚动条与窗体相对位置不变,滚动条的大小随着窗体大小的改变而改变,命令按钮作水平滚动条与垂直滚动条交接处的填充。   因代码注释较多,详细代码情况请您下载本源码包,自行解压查看。
    2023-02-22 07:50:04下载
    积分:1
  • VB6.0 实现表格样式的内容生成Excel表格式
    VB6.0 实现表格样式的内容生成Excel表格式,将DataGrid的表格数据转换成Excel格式,生成Excel表文件,用Offie套件就可以打开,在转换前可设置文字格式、样式等参数,看上去是一个国外的程序,代码里的注释全是英文的,如果E文好的话,推荐参考。
    2022-03-21 16:22:21下载
    积分:1
  • VB6.0 Mid判断指定字符串出现的次数
    VB6.0 判断指定字符串出现的次数,判断字符串A在字符串B中出现的次数,使用了VB的Mid函数来判断,如图所示的运行效果,单击按钮即可查看运行结果。代码验证判断部分,采用for循环遍历判断,代码如下:   Dim j As Integer   j = 0   For i = 1 To Len(Text1)    If Mid(Text1, i, Len(Text2)) = Text2 Then    j = j + 1    End If   Next i   Label2.Caption = "出现" & j & "次"
    2022-03-18 12:18:22下载
    积分:1
  • VB 使用VsMenu控件创建漂亮菜单
    VB 使用VsMenu控件创建漂亮菜单,是一个很不错的VsMenu控件用法演示实例,在窗体上单击右键,可以看到弹出式菜单效果。   Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)    If Button = vbRightButton Then PopupMenu MDIfrmMain.mnuEdit    End Sub
    2022-09-24 14:25:02下载
    积分:1
  • VB NET SQLSERVER 酒店客房管理系统
    VB NET SQLSERVER 酒店管理系统,功能模块:基础设置、业务管理、预定管理、入住管理、收钱退房、信息查询、客房管理、预定信息查询、入住信息查询、入住客史查询等,只是一个基础级的酒店客户管理程序,测试前请把Database下的数据库附加,修改数据库连接字符串,然后运行Debug中的exe程序。
    2023-04-22 15:20:03下载
    积分:1
  • VB 类似超级兔子的程序界面
    VB 类似超级兔子的程序界面,这只是一个应用程序的界面效果,不包括界面菜单中的功能,因此对界面UI的美化可以参考。这个界面是使用BMP贴图的方式实现,整个窗口就是一张图片,但是经过了处理,添加了菜单,其实挺简单的,当时用在一个手机维修管理系统中了,现在发上来,不知道对大家是否有用?
    2022-02-07 20:21:01下载
    积分:1
  • 696516资源总数
  • 106679会员总数
  • 14今日下载