.net随笔-vb.net屏幕截图，剪粘板图像，打开图像

最新推荐文章于 2024-08-07 03:59:20 发布

「已注销」

最新推荐文章于 2024-08-07 03:59:20 发布

阅读量970

点赞数

文章标签： vb.net 剪粘板截图

本文链接：https://blog.csdn.net/AI_LX/article/details/88804546

版权

本文介绍了如何使用VB.NET进行屏幕截图并处理剪贴板中的图像，包括读取和打开图像文件，展示了相关代码示例，帮助开发者实现图像操作功能。

摘要由CSDN通过智能技术生成

Public Class Form1
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        My.Computer.Clipboard.SetImage(PictureBox1.Image)
    End Sub

    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        If My.Computer.Clipboard.ContainsImage() Then
            PictureBox2.Image = My.Computer.Clipboard.GetImage()
        Else
            MessageBox.Show("剪粘板内无图像数据")
        End If

    End Sub

    Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click

        OpenFileDialog1.Filter = "Image Files(*.BMP;*.JPG;*.GIF)|*.BMP;*.JPG;*.GIF"
        OpenFileDialog1.ShowDialog() '打开文件选择框
        PictureBox1.ImageLocation = OpenFileDialog1.FileName '得到选择的文件
    End Sub

    Private Function CaptureScreen()
        '截图
        Dim myGraphics As Graphics = Me.CreateGraphics()
        Dim s As Size = New Size(1024, 768)
        Dim memoryImage As