-
一个实现图像旋转效果的VB实例
一个实现图像的旋转效果实例,由VB6.0编写,前几年的源码,本程序实现图片的逆时针旋转90度,单击窗口中的按钮即可实现旋转功能,这部分代码,可参考如下代码:
逆时针旋转90度
Private Sub Command2_Click()
For j = 0 To h Step 1
For i = 0 To w Step 1
BitBlt Picture2.hDC, i, j, 1, 1, Me.Picture1.hDC, j, i, srCopy
Next i
Next j
End Sub
- 2023-07-06 04:55:02下载
- 积分:1
-
VB演示矩阵的加法运算
VB6.0演示矩阵的加法运算,本例中一共是两个矩阵,每一个矩阵都根据不同的算法生成矩阵数字序列,然后把这两个矩阵求和,最后一栏展示的是矩阵相加后的结果,以指定格式输出。看了代码,我暂时没搞懂是什么算法,感兴趣的自己下载源码,研究学习吧。
- 2022-04-27 13:59:41下载
- 积分:1
-
VB Socket获取主机名和IP地址
VB Socket获取主机名和IP地址,获取主机名是使用了VB中的GetComputerName直接得到,然后对Socket初始化,使用gethostbyname取得主机地址,再获取到IP后进行转化为标准的IP格式。转换过程如下:
RtlMoveMemory host, hostent_addr, LenB(host)
RtlMoveMemory hostip_addr, host.hAddrList, 4
ReDim temp_ip_address(1 To host.hLength)
RtlMoveMemory temp_ip_address(1), hostip_addr, host.hLength
For i = 1 To host.hLength
ip_address = ip_address & temp_ip_address(i) & "."
Next i
ip_address = Mid$(ip_address, 1, Len(ip_address) - 1)
MsgBox "IP:" + ip_address
- 2022-10-23 19:55:03下载
- 积分:1
-
VB 为菜单添加分割线
VB6为菜单制作添加分割线,在菜单项与菜单项之间显示一个分隔线,这个在Windows经典风格的窗口中,十分常见,像一个水平线那样,把菜单分成多个部分,这个水平线带有阴影效果,视觉效果更立体。
本窗口中的菜单,是一个企业综合管理系统的主界面面板,那些菜单都是测试用的,你可以看一下菜单中的分隔线是如何嵌入到菜单中的。
- 2022-09-22 23:30:03下载
- 积分:1
-
VB OutLook折叠展开的主界面菜单
VB OutLook式主界面菜单,可折叠和展开,类似WindowsXP的界面左侧菜单,如示例图所示,本示例菜单效果请看左侧的图文式菜单,鼠标单击后可向下滑开,显示出二级的图文菜单,再次单击则合拢菜单。以前这种菜单在微软Windows的OutLook中使用,本源码是仿写的这种菜单。
- 2022-05-14 02:45:19下载
- 积分:1
-
VB.NET自制的看图工具软件
VB.NET自制图片查看器,一个看图工具软件,功能方面主要有图片原图显示、自动缩放图片、图片居中、自动缩放图片框、背景色设置、文件名及其路径、视图ToolStripMenuItem等。你可以通过这个小程序了解一些VB.NET与图片之间的操作技巧,另外还可以学习到窗口对话框的一些基本操作、PictureBox控件用法、目录和文件列表框的使用、处理鼠标事件、偏移量计算图片位置,重画图片、绘图画面,颜色填充、窗体界面元素控制等的控制方法。。
- 2022-12-25 17:15:03下载
- 积分:1
-
VB.NET 超市管理系统
VB.NET 超市管理系统,数据库基于SQLSERVER,使Label透明显示,进货管理、售货管理、价格管理、进货查询、售货查询、增加用户管理等。这个示范代码主要是演示VB与SQLSERVER数据库之间的各种操作,大部分是一些数据的基础应用。测试前请先附加好数据库,否则会弹出出错提示。
- 2022-01-26 05:34:54下载
- 积分:1
-
VB.NET 软件在线自动升级功能演示
VB.NET 软件在线自动升级功能演示,含源代码,程序自动更新版本源码中核心文件为UpdatingForm.vb,此文件包括了程序自动升级的主要功能,比如更新显示信息、删除不需要的文件、查找客户端需要更新的文件和需要删除的文件、查找服务器端新增需要下载的文件、版本控制文件为必须下载文件、设置当前下载的文件序数、强制结束进程等。
本程序需要一个存放软件最新版本的服务器或者是网址,程序运行后最先检测该网址下的软件是否是最新,若该网址不存在或出错,程序将不再继续,直接退出,如图所示。
- 2022-07-23 12:00:34下载
- 积分:1
-
VB6 给窗体添加滚动条
VB6 给窗体添加滚动条,调整水平滚动条的一些属性。当窗体的大小发生变化时发生,垂直滚动条与窗体相对位置不变,滚动条的大小随着窗体大小的改变而改变,命令按钮作水平滚动条与垂直滚动条交接处的填充。
因代码注释较多,详细代码情况请您下载本源码包,自行解压查看。
- 2023-02-22 07:50:04下载
- 积分:1
-
VB.NET Try Catch Finally用法演示源码
VB.NET 演示带Finally的Try Catch 异常处理用法演示,这个源码就是捕捉VB.NET运行错误的,结合了最常规的try catch组合,并且使用了Finally处理的情况,那么为什么要使用Finally呢?使用Finally的好处是,把资源释放或状态还原的代码放到finally块中,可以保证在try和catch语句执行完后,一定会执行finally语句块,而不用考虑各种复杂的跳转情况。
- 2023-05-11 05:35:04下载
- 积分:1