Question

vb中设置窗体透明度和设置图片某一颜色的函数

vb中设置窗体透明度和设置图片某一颜色为透明色的函数，还有当读取txt内容而txt内容为空时会发生错误，如何将错误提示出来而不是结束程序？

Answer 1

设置窗体透明度：Declare Function SetLayeredWindowAttributes Lib "user32" (ByVal hwnd As Long, ByVal crKey As Long, ByVal bAlpha As Byte, ByVal dwFlags As Long) As Long
使用这个API函数,改变balpha的值就可以了,取值范围是0-255,0是完全透明,255是完全不透明 设置图片某一颜色为透明色：不知道有没有这样的函数，我只会用bitblt来复制。 读取txt内容而txt内容为空时会发生错误，如何将错误提示出来而不是结束程序？ ：那你在读取的时候直接判断一下文件是否为空就可以了呀

Answer 2

设置窗体透明度用SetLayeredWindowAttributes 这个API函数 楼上已经给出设置某以颜色为透明那么就要对比像素 有点麻烦 代码不写了。最后一个问题要么你就判断是否为空 为空就不进行操作 要么就用on error resume next来容错 这个语句可以避免程序中出现的错误 而不会结束程序。