در خواست راهنمایی در مورد جستجوی یک رکورد

[taha_nadri]

با عرض سلام خسته نباشید خدمت دوستان

بنده تازه دارم با وی بی آشنا می شوم سوال بنده در مورد جستجوی یک رکورد هست .
من توسط sql یک بانک طراحی کرده ام و در وی بی هم یک فرم با یک DataGridView آماده کرده ام حالا سوال بنده اینجاست من یک مقدار زیادی اطلاعات دارم و حالا می خوام یک Textbox در فرم قرار بدهم که زمانیکه به عنوان مثال شماره طرف را وارد کردم در DataGridView اطلاعات آن رکورد را نمایش بدهد .
ممنون میشم اگر بنده را در این خصوص راهنمایی بفرمائید.
tabel name :Sheet1$
Columns name : شماره
بی صبرانه منتظر کمک شما دوستان هستم .:افسرده:

[taha_nadri]

دوستان و اساتید بزرگوار
کسی نیست تا بنده را راهنمایی کنه

[az.heidarzadeh]

خب احتمالا شما يه select‌ كلي از همه اطلاعات جدول گرفتيد و توي گريد لود كرديد select * from Sheet1 درسته؟
خب حالا توي تكست باكس شماره مورد نظرتو وارد كن اونو به sql بفرست و اينبار select * from Sheet1 where columnName=123 رو به گريد بايند كنيد فقط اطلاعات اون شخص نمايش داده ميشه

[tolid123456789]

سلام از كد زير استفاده كنيد:
ابتدا در بالاترين قسمت مربوط به كد نويسي فرمي كه Datagrid داريد برويد و كد هاي زير را بنويسيد


imports System.data
imports System.data.SqlClient


در مرحله بعدي يك متغير كانكشن ميسازيم براي اتصال به ديتابيسمون ( اين كد را بعد از خط Public Class Form1 بنوسيد) با فرض اينكه نام فرم مورد بحث Form1 باشه.

Dim con As New SqlConnection("data source=.;initial catalog=Name_Database;integrated security=true")

حالا يك تكس باكس به نام TextBox1 به فرم اضافه كنيد
يك كليد به نام Search_btn به فرمتون اضافه كنيد
براي رويداد كليك كليد كد زير رو بنويسيد


Dim cmd As New SqlCommand
cmd.Connection = con
cmd.CommandText = "select * from Sheet1$ where Columnsname='" & TextBox1.text.trim & "'"
Dim da As New SqlDataAdapter(cmd)
Dim dt As New DataTable
If con.State = ConnectionState.Closed Then con.Open()
da.Fill(dt)
DataGridView1.DataSource = dt
con.Close()



اگر سئوالي بود درخدمتتون هستم
لطفا نتيجه رو به بنده اطلاع بديد
:تشویق::تشویق:

[hamidrezax1]

عالی بود بسیار بسیار مممنونمممم