[VB.NET]圖片透明化[通俗易懂]

[VB.NET]圖片透明化[通俗易懂]原URL:http://www.dotblogs.com.tw/chou/archive/2009/02/12/7120.aspx有沒有辦法做到圖片的透明化,我們可以透過MakeTransparent達成MSDN:Bitmap.MakeTransparent方法:為這個Bitmap將預設的透明色彩變為透明。 而在此程式中,加上了讓使用者點選顏色的功能,並且讓點

大家好,又见面了,我是你们的朋友全栈君。

原URL:http://www.dotblogs.com.tw/chou/archive/2009/02/12/7120.aspx

有沒有辦法做到圖片的透明化,我們可以透過 MakeTransparent 達成

MSDN : Bitmap.MakeTransparent 方法 : 為這個 Bitmap 將預設的透明色彩變為透明。

 

而在此程式中,加上了讓使用者點選顏色的功能,並且讓點選的顏色透明化

以下為程式碼

VB.NET

01 Public Class Form1
02     Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
03         PictureBox1.ImageLocation = "Test.bmp"
04     End Sub
05  
06  
07     Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
08         Dim bmp As Bitmap
09         bmp = PictureBox1.Image
10         bmp.MakeTransparent(Color.White)   'Color白色的部份透明
11         bmp.Save("Result.bmp")
12         PictureBox2.ImageLocation = "Result.bmp"
13     End Sub
14  
15     Private Sub PictureBox1_MouseDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox1.MouseDown
16         Dim bmp As Bitmap
17         bmp = PictureBox1.Image
18         bmp.GetPixel(e.X, e.Y)
19         bmp.MakeTransparent(bmp.GetPixel(e.X, e.Y))
20         bmp.Save("Result.bmp")
21         PictureBox2.Image = bmp
22     End Sub
23 End Class

 

執行結果

滑鼠點選白色,使白色成為透明

[VB.NET]圖片透明化[通俗易懂]

 

滑鼠點選藍色,使藍色成為透明

[VB.NET]圖片透明化[通俗易懂]

 

版权声明:本文内容由互联网用户自发贡献,该文观点仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请联系我们举报,一经查实,本站将立刻删除。

发布者:全栈程序员-站长,转载请注明出处:https://javaforall.net/162702.html原文链接:https://javaforall.net

(0)
全栈程序员-站长的头像全栈程序员-站长


相关推荐

  • keil(MDK) 5官方下载教程

    keil(MDK) 5官方下载教程一、KEILKeil公司是一家业界领先的微控制器(MCU)软件开发工具的独立供应商。Keil公司由两家私人公司联合运营,分别是德国慕尼黑的KeilElektronikGmbH和美国德克萨斯的KeilSoftwareInc。Keil公司制造和销售种类广泛的开发工具,包括ANSIC编译器、宏汇编程序、调试器、连接器、库管理器、固件和实时操作系统核心(real-timekernel)。有…

    2022年5月23日
    44
  • 三大主流芯片架构特点是_zachman架构

    三大主流芯片架构特点是_zachman架构根据以往互联网时代的经验,芯片永远都是产业链最上游的存在,是行业先导指标。众所周知,目前芯片领域有两大霸主,分别是Intel和Arm,Intel掌握着X86的架构,并且只授权给AMD一家公司,其他厂商都无法生产X86架构的芯片,而Intel与微软的windows系统结盟,称霸台式机市场并且牢不可破。Arm在移动领域是一家独大,不管是高通、三星或是华为、联发科都是基于Arm的架构开发。MIPS是一个…

    2022年9月7日
    0
  • 找出重复两次的数–有且只有一个数字重复两次,其余都不重复「建议收藏」

    找出重复两次的数–有且只有一个数字重复两次,其余都不重复「建议收藏」问题描述:数字范围是0-99的整数,给出101个整数,其中只有一个是重复两次的数,找出这个数分析:如果是有序的话,遍历一次就可以找出方法一:先排序,再遍历,遍历超过一次方法二:只是排序,排序过程中对于元素相等这一特殊情况拿出来判断,直接返回相等的这个元素,方法三:使用亦或运算符 ^ ,这个也是刚了解到的,遍历一次 相同数字 亦或一次 结果是 0 不同数异或一次,结果是 1 …

    2022年6月13日
    33
  • pycharm注释多行_eclipse多行注释快捷键

    pycharm注释多行_eclipse多行注释快捷键1、Pycharm同时编辑多行:alt+shift+ctral+鼠标左键2、Pycharm同时多行注释:多行选中后ctrl+\

    2022年8月26日
    9
  • rpm卸载多个有依赖的rpm包[通俗易懂]

    rpm卸载多个有依赖的rpm包[通俗易懂][root@devOOo_3.1.0_src]#rpm-qlibxml2[root@devOOo_3.1.0_src]#rpm-qalibxml2*[root@dev~]#rpm-qa|greplibxml2libxml2-python-2.6.26-2.1.12libxml2-devel-2.6.26-2.1.12libxml2-2.6.26libxm…

    2022年9月22日
    0
  • 《深入理解mybatis原理》 MyBatis的一级缓存实现详解 及使用注意事项

    《深入理解mybatis原理》 MyBatis的一级缓存实现详解 及使用注意事项MyBatis是一个简单,小巧但功能非常强大的ORM开源框架,它的功能强大也体现在它的缓存机制上。MyBatis提供了一级缓存、二级缓存这两个缓存机制,能够很好地处理和维护缓存,以提高系统的性能。本文的目的则是向读者详细介绍MyBatis的一级缓存,深入源码,解析MyBatis一级缓存的实现原理,并且针对一级缓存的特点提出了在实际使用过程中应该注意的事项。读完本文,你将会学到:1、什么是一级缓存?为什么使用一级缓存?2、MyBatis的一级缓存是怎样组织的?(即SqlS

    2022年5月21日
    42

发表回复

您的邮箱地址不会被公开。 必填项已用 * 标注

关注全栈程序员社区公众号