تگ های موضوع گالری تصاویر با دیتابیس اکسس

گالری تصاویر با VB.NET و دیتابیس Access

گالری تصاویر یکی از پروژه‌های جذاب و کاربردی در برنامه‌نویسی است. در اینجا، به شما آموزش می‌دهیم که چگونه با استفاده از VB.NET و دیتابیس Access یک گالری تصاویر بسازید.

مقدمه

ابتدا، برای ایجاد گالری تصاویر، به یک دیتابیس Access نیاز داریم که شامل جدولی برای ذخیره‌سازی اطلاعات تصویر باشد. این جدول معمولاً شامل فیلدهایی مانند ID، نام تصویر، و مسیر تصویر است.

ایجاد دیتابیس Access

1. ایجاد جدول:
   

- یک جدول به نام `Images` بسازید.
- فیلدهای زیر را اضافه کنید:
- `ID` (نوع: AutoNumber)
- `ImageName` (نوع: Text)
- `ImagePath` (نوع: Text)

1. وارد کردن داده‌ها:
   

- تصاویر را در فولدری مشخص ذخیره کنید و مسیر آنها را در جدول وارد کنید.

طراحی فرم در VB.NET

1. ایجاد پروژه جدید:
   

- یک پروژه Windows Forms جدید با نام دلخواه بسازید.

1. افزودن کنترل‌ها:
   

- یک `DataGridView` برای نمایش تصاویر.
- یک `PictureBox` برای نمایش تصویر انتخاب شده.
- یک `Button` برای بارگذاری تصاویر.

کد VB.NET برای اتصال به دیتابیس

برای اتصال به دیتابیس Access از کد زیر استفاده کنید:
```vb.net
Imports System.Data.OleDb
Public Class Form1
Dim connectionString As String = "Provider=Microsoft.ACE.OLEDB.

1. 0;Data Source=yourdatabase.accdb;"
   

Dim connection As New OleDbConnection(connectionString)
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
LoadImages()
End Sub
Private Sub LoadImages()
Dim query As String = "SELECT * FROM Images"
Dim adapter As New OleDbDataAdapter(query, connection)
Dim table As New DataTable()
adapter.Fill(table)
DataGridView

1. DataSource = table
   

End Sub
End Class
```

نمایش تصویر انتخاب شده

زمانی که کاربر روی یک ردیف در `DataGridView` کلیک می‌کند، تصویر مربوطه در `PictureBox` نمایش داده می‌شود:
```vb.net
Private Sub DataGridView1_SelectionChanged(sender As Object, e As EventArgs) Handles DataGridView

1. SelectionChanged
   

If DataGridView

1. SelectedRows.Count > 0 Then
   

Dim row As DataGridViewRow = DataGridView

1. SelectedRows(0)
   

Dim imagePath As String = row.Cells("ImagePath").Value.ToString()
PictureBox

1. Image = Image.FromFile(imagePath)
   

End If
End Sub
```

نتیجه‌گیری

با اجرای این کد، شما یک گالری تصاویر ساده با استفاده از VB.NET و دیتابیس Access ایجاد کرده‌اید. این پروژه می‌تواند به شما در درک بیشتر مفاهیم برنامه‌نویسی و کار با دیتابیس‌ها کمک کند.
امیدوارم این توضیحات مفید واقع شده باشد! اگر سوالی دارید، خوشحال می‌شوم کمک کنم.