كيف يمكنني عمل data screen entry لبعض fieldes

أضف form1 جديد وفي بدايته أكتب ..

Imports System.Data
Imports System.Data.SqlClient

وتحت Public Class Form1 أكتب ..

'غير اسم السيرفر والباسورد لما يناسبك
Dim objConnection As New SqlConnection _
(“server=bnewsome;database=pubs;user id=sa;password=!p@ssw0rd!;”)
Dim objDataAdapter As New SqlDataAdapter( _
“SELECT product.productID, product.productname FROM product “ , objConnection)
Dim objDataSet As DataSet
Dim objDataView As DataView
Dim objCurrencyManager As CurrencyManager

وفي حدث Form1_Load أكتب ...

objDataSet = New DataSet()
objDataAdapter.Fill(objDataSet, “product”)
objDataView = New DataView(objDataSet.Tables(“product”))
objCurrencyManager = CType(Me.BindingContext(objDataView), CurrencyManager)
txtproductID.DataBindings.Clear()
txtproductName.DataBindings.Clear()
txtproductID.DataBindings.Add(“Text”, objDataView, “productID”)
txtproductName.DataBindings.Add(“Text”, objDataView, “productname”)
txtRecordPosition.Text = objCurrencyManager.Position + 1 & _
“ of “ & objCurrencyManager.Count()

أضف على الـ Form1 مربع نص وسمه txtproductID ثم أضف مربع نص اخر وسمة txtproductName ثم أضف مربع نص أخر وسمه txtRecordPosition

أخي احمد هذه البدايه وياليت تكمل انت من اللي فاهمه وإذا واجهتك مشاكل انا والأخوان تحت أمرك قدر المستطاع ...

السلام عليكم ورحمة الله وبركاته

أخي أحمد لقد نبهتك قبل ذلك بالالتزام بقواعد المشاركه ولم أغلق لك الموضوع لأنه كان أول موضوع لك , ورغم ذلك قمت انت بتكرار هذا الموضوع !!!

سأقوم هذه المره بحذف الموضوع المكرر الآخر , وبهذا تكون قد استنفذت جميع محاولاتك معي :D وفي المره القادمه سأحذف الموضوعين مع الانذار والحرمان من المشاركه :D

كما يجب ارفاق محاولاتك عند طلب المساعده :D