vb.net图片按钮 vb按钮怎么有图片

vb.net图片按钮如何实现?用什么控件?

用Button控件就可以了 修改BackgroundImage 属性 类似这样

Button1.BackgroundImage = Image.FromFile("C:\Users\hp\Desktop\EMOTICONS\EMOTICON SMILE.png")

如果要实现动态效果的话需要2个图片当Button1_MouseHover事件时也就是鼠标停留在button上的时候显示一个图片,当Button1_MouseLeave事件时,也就是鼠标离开button时显示原来的图片,这样就是动态的了.

相关问答

Q1: vb.net怎么编写图片按钮，如图

MouseEnter 鼠标进入

MouseLeave 鼠标离开

PictureBox1.ImageLocation =“路径"

Q2: vb.net编程，怎么把图片里的button按钮用循环写出来

Public Class Form1

Public MyButtons(4) As Button

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Dim bt As Control

For Each bt In Me.Controls

Select Case bt.Name

Case "Button1"

MyButtons(1) = bt

Case "Button2"

MyButtons(2) = bt

Case "Button3"

MyButtons(3) = bt

Case "Button4"

MyButtons(4) = bt

End Select

Next

Dim i As Integer

For i = 1 To 4

MsgBox(MyButtons(i).Name)

Next

End Sub

End Class

Q3: vb.net 怎么来回切换图片?

vb.net 怎么来回切换图片?1、添加控件Picturebox1和控件Timer1，将Timer1的Interval属性改为1000（即1秒），Enabled属性改为True

2、假设你要循环切换4张图片，你可以添加如下代码即可实现：

Dim a As Integer = 0

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick

If a = 4 Then

a = 0

Else

a = a + 1

End If

If a = 0 Then Me.PictureBox1.Image = Image.FromFile("1.jpg")

If a = 1 Then Me.PictureBox1.Image = Image.FromFile("2.jpg")

If a = 2 Then Me.PictureBox1.Image = Image.FromFile("3.jpg")

If a = 3 Then Me.PictureBox1.Image = Image.FromFile("4.jpg")

End Sub

Q4: vb.net中,如何点击按钮调出选择文件窗口选中图片并在picturebox中显示出来?

button , OpenFileDialog , PictureBox , textbox 控件，我把图片显示在 picturebox 中，而路

径存放在 textbox 中，不知道这样行不行。

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim filename As String

OpenFileDialog1.Filter = "jpg files (*.jpg)|*.jpg"

OpenFileDialog1.FilterIndex = 1

If OpenFileDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then

filename = OpenFileDialog1.FileName

Else

End

End If

If Not (PictureBox1.Image Is Nothing) Then

PictureBox1.Image.Dispose()

PictureBox1.Image = Nothing

End If

'PictureBox1.Image = System.Drawing.Image.FromFile(filename)

去掉注释后就显示图片

TextBox1.Text = filename

End Sub

picturebox中只记录文件存放的路径，我找了一个 ImageLocation 函数

PictureBox1.ImageLocation = filename 不过还是会显示图片

vb.net图片按钮的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于vb按钮怎么有图片、vb.net图片按钮的信息别忘了在本站进行查找喔。