登录
首页 » VB源码 » 一个实现图像旋转效果的VB实例

一个实现图像旋转效果的VB实例

于 2023-07-06 发布 文件大小:4.12 kB
0 15
下载积分: 2 下载次数: 1

代码说明:

一个实现图像的旋转效果实例,由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

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

发表评论

0 个回复

  • VB 删除指定类型文件
    VB 删除指定类型文件,用户选择电脑中指定路径下的文件类型后,可删除该目录下所有此类型的文件。
    2022-10-25 21:50:02下载
    积分:1
  • vb 判断经历多少个工作日
    vb 判断经历多少个工作日,在两个日期选择器中选择日期值,然后判断选定的两个日期之间相差了多少天,判断两个定点之间的天数,比较基础,但也很有必要学习,时间和日期计算在很多软件中都要用到,这个例子相对简单些。大致代码:   If IsDate(Text1) = True And IsDate(Text2) = True Then    Dim i As Integer    i = gongzuori(CDate(Text1), CDate(Text2))    Label3.Caption = "经历" & i & "个工作日"   Else    MsgBox "请输入日期型"   End If
    2022-03-03 21:14:10下载
    积分:1
  • 股票采集数据
    用VB编的股票采集数据源码、分享出来希望对大家有用。
    2022-07-10 11:37:10下载
    积分:1
  • VB 6.0 过程引用传递参数
    VB 6.0 过程引用传递参数,显示传递前和传递后的参数值:   Private Sub mysub(ByRef i As Integer)    i = 100   End Sub   Private Sub Form_Resize()    Dim num As Integer    num = 1    Print "传递前:" & num    Call mysub(num)    Print "传递后:" & num   End Sub
    2022-02-12 05:00:23下载
    积分:1
  • vb串口调试助手,可用于自己做调试测试工具
    1.用易懂的VB语言编程   2.可设置串口号波特率   3.支持十六进或字符形式发送或接收,可定时发送。3,可自己换程序的图片
    2022-07-13 02:02:52下载
    积分:1
  • 文件夹复制VB6.0实例
    文件夹复制VB6.0实例源码,这里用了一个用户自定义函数,此函数可以出现一个对话框,并返回所选择的路径,若没有选择返回("")。模拟了Windows系统的文件夹模拟功能,看上去比较低级,只是通过这个功能,熟悉一些VB与文件操作的函数用法。
    2022-03-05 20:29:32下载
    积分:1
  • 磁性窗体 VB简单实现方法举例
    VB简单实现磁性窗体,将窗体粘合,子窗体连接的任何窗体都粘合上,获取所有窗体的矩形区域,并重新设置粘合,连接窗体上的矩形。这种窗口多见于一些影音视频播放软件中,比如播放列表快接近播放主窗口时,自动吸附到主窗口上,紧贴主窗口边缘,像是有种磁性一样吸附在一起,本窗口中的三个子窗口,都具有自动吸附的磁性感觉,有兴趣可下载本源码学习测试。
    2022-01-21 20:24:46下载
    积分:1
  • VB Val与汉字的相互转化
    VB 数字与字符串的相互转换(汉字区位码与汉字的相互转化)的例子,主要是使用Val函数来实现转换功能,Val的用法很简单,如Text4.Text = Val(Text3),将此行代码添加到自定义的按钮事件中即可,当用户单击按钮后,可触发此代码执行区位码转换。实现的功能为:   把数字转换成字符串,把字符串转换成数字。
    2022-02-10 12:28:52下载
    积分:1
  • vb.NET模拟扑克牌出牌功能
    vb.NET模拟扑克牌出牌功能,其实可看作是一个界面较简单的扑克牌游戏,界面有些粗糙,没有过多美化,用文字描述了牌面,后续可以对界面进行升级。有点过于简单了,可当作一个初级的VB.NET编程例子吧。
    2022-03-22 04:23:34下载
    积分:1
  • VB6.0 获取汉字拼音简(首字母)
    VB6.0 获取汉字拼音简码,获取汉字拼音首字母,这个比较实用了,现在很多地方都会取首字母作为编号、帐号之类的,代码比较多,这里就不帖核心代码了,大家自行下载本源码吧,运行的效果如截图所示。
    2022-04-15 06:44:52下载
    积分:1
  • 696518资源总数
  • 104353会员总数
  • 66今日下载