用VB.NET作简易的图片浏览软件？

2005-09-07 02:32:16 315 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

VB.NET 基础入门 VB.NET 基础入门之前对VB 和C#语言有相应的了解，特别是VB，进行了很长一段时间的的深入的学习，现在开始VB.NET 基础学习，学习进度不快，很多的东西要虚心向身边的高手学习、交流。VB.NET开始有一段时间了，自己阶段是做一个VB.NET 的宏观学习把控！一、什么是VB.NET 阅读详情

请问，各位强人，在VB.NET中作简易的图片软件，我不知道用什么控件可以浏览图片？
我在窗体上添加了菜单栏，其中文件选项中包含打开＆关闭，我想用打开实现这样的功能：当点击打开，选择好了要浏览的图片，图片就会显示在可以显示图片的控件上！
我已经把打开，选择图片，关闭的功能实现了，就是找不到什么控件能够显示图片！请告诉我好不好？

...全文

VB6.0和VB.NET区别学习了一段时间的VB.net,感觉大部分和之前学过的VB形似，但是因为名字不一样，所以肯定就有不同的地方，接下来说说VB和VB.net有哪些不同的地方。 VB.net是推出的一种开发基于.net平台应用程序的开发语言。掌握VB.net不仅要掌握语法，还要理解并运用这些新的概念，功能和观点，还有掌握.net框架。理解CLR(common language runtime,通用语言进行时）。接下阅读详情

LoseProphet

VB 16,718 成员 110,520 内容

+ 关注 + 加入社区

切换为时间正序

不务正 2005-09-07

打赏
举报

Dim filename As String
Dim openfile As New OpenFileDialog
openfile.Filter = "图片文件|*.bmp;*.jpg"
If openfile.ShowDialog = DialogResult.OK Then
filename = openfile.FileName
End If
PictureBox1.Image = Image.FromFile(filename)

LoseProphet 2005-09-07

打赏
举报

没有人回答？
帮帮忙好不好？

LoseProphet 2005-09-07

打赏
举报

...................
我到底听谁的啊？？？
郁闷了！
我先把我的代码给大家看看!
Imports System.IO
Public Class Form1
Inherits System.Windows.Forms.Form

#Region " Windows 窗体设计器生成的代码 "

Public Sub New()
MyBase.New()

'该调用是 Windows 窗体设计器所必需的。
InitializeComponent()

'在 InitializeComponent() 调用之后添加任何初始化

End Sub

'窗体重写 dispose 以清理组件列表。
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub

'Windows 窗体设计器所必需的
Private components As System.ComponentModel.IContainer

'注意: 以下过程是 Windows 窗体设计器所必需的
'可以使用 Windows 窗体设计器修改此过程。
'不要使用代码编辑器修改它。
Friend WithEvents MainMenu1 As System.Windows.Forms.MainMenu
Friend WithEvents MenuItem1 As System.Windows.Forms.MenuItem
Friend WithEvents MenuItem2 As System.Windows.Forms.MenuItem
Friend WithEvents MenuItem3 As System.Windows.Forms.MenuItem
Friend WithEvents MenuItem4 As System.Windows.Forms.MenuItem
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(Form1))
Me.MainMenu1 = New System.Windows.Forms.MainMenu
Me.MenuItem1 = New System.Windows.Forms.MenuItem
Me.MenuItem2 = New System.Windows.Forms.MenuItem
Me.MenuItem3 = New System.Windows.Forms.MenuItem
Me.MenuItem4 = New System.Windows.Forms.MenuItem
'
'MainMenu1
'
Me.MainMenu1.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem1, Me.MenuItem4})
'
'MenuItem1
'
Me.MenuItem1.Index = 0
Me.MenuItem1.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem2, Me.MenuItem3})
Me.MenuItem1.Text = "文件"
'
'MenuItem2
'
Me.MenuItem2.Index = 0
Me.MenuItem2.Text = "打开"
'
'MenuItem3
'
Me.MenuItem3.Index = 1
Me.MenuItem3.Text = "关闭"
'
'MenuItem4
'
Me.MenuItem4.Index = 1
Me.MenuItem4.Text = ""
'
'Form1
'
Me.AutoScaleBaseSize = New System.Drawing.Size(6, 14)
Me.ClientSize = New System.Drawing.Size(552, 361)
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.MaximizeBox = False
Me.Menu = Me.MainMenu1
Me.Name = "Form1"
Me.Text = "简易图片浏览器"

End Sub

#End Region

Private Sub MenuItem3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MenuItem3.Click
Application.Exit()

End Sub

Private Sub MenuItem2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MenuItem2.Click
Dim filename As String
Dim openfile As New OpenFileDialog
openfile.Filter = "图片文件|*.bmp;*.jpg"
If openfile.ShowDialog = DialogResult.OK Then
filename = openfile.FileName
End If
End Sub
End Class

要是点击MenuItem2，也就是打开，才能看到图片，后面还要写一些什么呢？

Overriding 2005-09-07

打赏
举报

PictureBox

EricBai 2005-09-07

打赏
举报

我是这样做的：
1.用一个ListView用于显示图片列表。
2.定义一个ImageList，把ListView的LageImage属性设置为ImageList。
3.根据需要动态设置ImageList中的图片内容，然后再相关的在ListView中进行Item的调整。

这样就可以实现用ListView预览的效果了。

LoseProphet 2005-09-07

打赏
举报

能够将代码写给我就更好啦！谢谢！

用VB.NET作简易的图片浏览软件？

相关推荐