ให้เลือก combobox 3 อัน ถ้าเงื่อนไขเป็นจริง ให้แสดงข้อมูลจาก access ไปใส่ใน textbox รบกวนด้วยครับ

Imports System.Data.OleDb
Public Class FSearch

    Private Sub FSearch_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim myConn As New OleDbConnection()
        Dim myCommand As New OleDbCommand()
        Dim myDataReader As OleDbDataReader

        myConn.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=D:\DB_pc.accdb;Persist Security Info=False;"
        myCommand.CommandText = "SELECT pc_price, pc_cpu, pc_mb, pc_id FROM pc"
        myCommand.Connection = myConn
        myCommand.Connection.Open()
        myDataReader = myCommand.ExecuteReader

        Do While myDataReader.Read()
            Dim price As String = myDataReader("pc_price").ToString
            ComboBox1.Items.Add(price)
            Dim use As String = myDataReader("pc_cpu").ToString
            ComboBox2.Items.Add(use)
            Dim mb As String = myDataReader("pc_mb").ToString
            ComboBox3.Items.Add(mb)
        Loop
        myDataReader.Close()
        myConn.Close()
    End Sub

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

        If (ComboBox1.SelectedIndex = 0 And ComboBox2.SelectedIndex = 1 And ComboBox3.SelectedIndex = 1) Then

            TextBox1.Text = "จะให้ข้อมูลใน database มาแสดงตรงนี้ต้องทำยังไงครับ"
            TextBox2.Text = "จะให้ข้อมูลใน database มาแสดงตรงนี้ต้องทำยังไงครับ"

        End If

        
    End Sub
End Class