B:\VB测试\333 "Hight=""","Width=""","Thickness=""" 显示在DataGridView1 用VB.NET做
时间: 2023-12-21 20:05:33 浏览: 191
要在DataGridView1中显示B:\VB测试\333这个路径下的文件信息,你需要先读取该路径下的文件,然后将文件信息添加到DataGridView的DataSource中。以下是使用VB.NET实现的方法:
1. 首先,需要在项目中添加对System.IO命名空间的引用,以便使用File类。
2. 然后,创建一个函数来读取指定路径下的文件信息,并将这些信息添加到DataGridView的DataSource中。
以下是具体的代码实现:
```vb
Imports System.IO
Public Class Form1
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
' 设置DataGridView的列名
DataGridView1.Columns.Add("文件名", "文件名")
DataGridView1.Columns.Add("高度", "高度")
DataGridView1.Columns.Add("宽度", "宽度")
DataGridView1.Columns.Add("厚度", "厚度")
' 读取指定路径下的文件信息
ReadFileInfo()
End Sub
Private Sub ReadFileInfo()
Dim folderPath As String = "B:\VB测试\333"
If Directory.Exists(folderPath) Then
Dim files As String() = Directory.GetFiles(folderPath)
For Each file As String In files
Dim fileInfo As New FileInfo(file)
Dim row As DataGridViewRow = New DataGridViewRow()
row.CreateCells(DataGridView1)
' 添加文件名、高度、宽度和厚度信息到DataGridView的单元格中
row("文件名").Value = fileInfo.Name
row("高度").Value = fileInfo.Length
row("宽度").Value = fileInfo.Width
row("厚度").Value = fileInfo.Height
' 将新行添加到DataGridView中
DataGridView1.Rows.Add(row)
Next
Else
MessageBox.Show("指定的文件夹路径不存在!")
End If
End Sub
End Class
```
这段代码首先设置了DataGridView的列名,然后调用ReadFileInfo函数来读取指定路径下的文件信息,并将这些信息添加到DataGridView的DataSource中。
阅读全文