Forgot Password ??

PHP , ASP , ASP.NET, VB.NET, C#, Java , jQuery , Android , iOS , Windows Phone

	Registered : 109,037

HOME > .NET Framework > Forum > เกิดปัญหาเกี่ยวกับการผูกข้อมูล โดยใช้ Form ที่มี Tab ค่ะ vb.net T_T

เกิดปัญหาเกี่ยวกับการผูกข้อมูล โดยใช้ Form ที่มี Tab ค่ะ vb.net T_T

เริ่มหัวข้อใหม่

bell

โพสกระทู้ ( 325 )
บทความ ( 0 )

ปัญหาใหม่มาอีกแล้ว (ปัญหาใหม่รายวัน)

เกริ่นก่อนนะคะ คือ ว่าเราจะทำการค้นหาข้อมูลจาก หน้า Form ค้นหาก่อนนะคะ

เสร็จแล้วพอเราเลือกข้อมูล ก็จะให้มันไปโชว์ที่หน้า Form จัดการข้อมูลของพนักงาน

เราจะผูกข้อมูลไว้โดยให้มันอ่านจากรหัสพนักงานค่ะ ให้มัน Binding กัน(ข้อมูลมันก็มานะ)
แต่ว่าพอเรากดไปที่ Tab ถัดไป มันก็ขึ้น Error แบบนี้ค่ะ

เราก็เลยคิดว่ามันคงจะเป็นเพราะ Tab (เพิ่งเคยใช้ Tab ครั้งแรก)

แต่เบื้องต้นก็ บันทึก ลบ แก้ไข ข้อมูลได้นะคะ

ส่วนนี้เป็นโค้ดที่เกี่ยวข้องค่ะ (เยอะหน่อย database มันใหญ่อ่ะ)

Imports System.Data
Imports System.Data.OleDb
Imports System.IO

Public Class DataEmp
Private con As New OleDbConnection(conn)
Private data As DataSet
Private cmd As OleDbCommand
Private adapter As OleDbDataAdapter
Private row_count As Integer = 0
Private _position As Integer = 0

Private Sub ReadData()
Dim sql As String = "SELECT * FROM EmpProfile WHERE IdNumber = " & Me.IdNumbertxt.Text

cmd = New OleDbCommand(sql, con)
Dim adapter As New OleDbDataAdapter(cmd)
data = New DataSet()
adapter.Fill(data, "Emp")
row_count = data.Tables("Emp").Rows.Count

End Sub
Private Sub Bindings()

IdDatabasetxt.DataBindings.Add("Text", data, "Emp.ID")
Datetxt.DataBindings.Add("Text", data, "Emp.EmpDate")
Positiontxt.DataBindings.Add("Text", data, "Emp.EmpPosition")
StatusBox.DataBindings.Add("Text", data, "Emp.EmpStatus")
FrontNametxt.DataBindings.Add("Text", data, "Emp.EmpFrontName")
LastNametxt.DataBindings.Add("Text", data, "Emp.EmpLastName")
DateRegistertxt.DataBindings.Add("Text", data, "Emp.EmpDateRegister")
NickNametxt.DataBindings.Add("Text", data, "Emp.EmpNickName")
IdCardtxt.DataBindings.Add("Text", data, "Emp.EmpIdCard")
Birthdaytxt.DataBindings.Add("Text", data, "Emp.EmpBirthday")
ProvinceBorntxt.DataBindings.Add("Text", data, "Emp.EmpProvinceBorn")
Agetxt.DataBindings.Add("Text", data, "Emp.EmpAge")
Heighttxt.DataBindings.Add("Text", data, "Emp.EmpHeight")
Weighttxt.DataBindings.Add("Text", data, "Emp.EmpWeight")
Racetxt.DataBindings.Add("Text", data, "Emp.EmpRace")
Nationalitytxt.DataBindings.Add("Text", data, "Emp.EmpNationality")
Religiontxt.DataBindings.Add("Text", data, "Emp.EmpReligion")
Addresstxt.DataBindings.Add("Text", data, "Emp.EmpAddress")
Roadtxt.DataBindings.Add("Text", data, "Emp.EmpRoad")
Districttxt.DataBindings.Add("Text", data, "Emp.EmpDistrict")
Areatxt.DataBindings.Add("Text", data, "Emp.EmpArea")
Provincetxt.DataBindings.Add("Text", data, "Emp.EmpProvince")
PostalCodetxt.DataBindings.Add("Text", data, "Emp.EmpPostalCode")
Telephonetxt.DataBindings.Add("Text", data, "Emp.EmpTelephone")
Mobiletxt.DataBindings.Add("Text", data, "Emp.EmpMobile")
Emailtxt.DataBindings.Add("Text", data, "Emp.EmpEmail")
Locationbox.DataBindings.Add("Text", data, "Emp.EmpLocation")
Conditionbox.DataBindings.Add("Text", data, "Emp.EmpCondition")
Marrybox.DataBindings.Add("Text", data, "Emp.EmpMarry")
FatherNametxt.DataBindings.Add("Text", data, "Emp.EmpFatherName")
FatherSurnametxt.DataBindings.Add("Text", data, "Emp.EmpFatherSurname")
FatherAgetxt.DataBindings.Add("Text", data, "Emp.EmpFatherAge")
FatherCareertxt.DataBindings.Add("Text", data, "Emp.EmpFatherCareer")
MotherNametxt.DataBindings.Add("Text", data, "Emp.EmpMotherName")
MotherSurnametxt.DataBindings.Add("Text", data, "Emp.EmpMotherSurname")
MotherAgetxt.DataBindings.Add("Text", data, "Emp.EmpMotherAge")
MotherCareertxt.DataBindings.Add("Text", data, "Emp.EmpMotherCareer")
RelativesNumbertxt.DataBindings.Add("Text", data, "Emp.EmpRelativesNumber")
ManAmounttxt.DataBindings.Add("Text", data, "Emp.EmpManAmount")
WomanAmounttxt.DataBindings.Add("Text", data, "Emp.EmpWomanAmount")
Numbertxt.DataBindings.Add("Text", data, "Emp.EmpNumber")
OneNametxt.DataBindings.Add("Text", data, "Emp.EmpOneName")
OneSurNametxt.DataBindings.Add("Text", data, "Emp.EmpOneSurName")
OneAgetxt.DataBindings.Add("Text", data, "Emp.EmpOneAge")
OneCareertxt.DataBindings.Add("Text", data, "Emp.EmpOneCareer")
TwoNametxt.DataBindings.Add("Text", data, "Emp.EmpTwoName")
TwoSurnametxt.DataBindings.Add("Text", data, "Emp.EmpTwoSurname")
TwoAgetxt.DataBindings.Add("Text", data, "Emp.EmpTwoAge")
TwoCareertxt.DataBindings.Add("Text", data, "Emp.EmpTwoCareer")
ThreeNametxt.DataBindings.Add("Text", data, "Emp.EmpThreeName")
ThreeSurnametxt.DataBindings.Add("Text", data, "Emp.EmpThreeSurname")
ThreeAgetxt.DataBindings.Add("Text", data, "Emp.EmpThreeAge")
ThreeCareertxt.DataBindings.Add("Text", data, "Emp.EmpThreeCareer")
MarryNametxt.DataBindings.Add("Text", data, "Emp.EmpMarryName")
MarrySurnametxt.DataBindings.Add("Text", data, "Emp.EmpMarrySurname")
MarryAgetxt.DataBindings.Add("Text", data, "Emp.EmpMarryAge")
MarryCareertxt.DataBindings.Add("Text", data, "Emp.EmpMarryCareer")
NumberChildtxt.DataBindings.Add("Text", data, "Emp.EmpNumberChild")
SonAmounttxt.DataBindings.Add("Text", data, "Emp.EmpSonAmount")
DaughterAmounttxt.DataBindings.Add("Text", data, "Emp.EmpDaughterAmount")
School1txt.DataBindings.Add("Text", data, "Emp.EmpSchool1")
Branch1txt.DataBindings.Add("Text", data, "Emp.EmpBranch1")
Since1txt.DataBindings.Add("Text", data, "Emp.EmpSince1")
To1txt.DataBindings.Add("Text", data, "Emp.EmpTo1")
School2txt.DataBindings.Add("Text", data, "Emp.EmpSchool2")
Branch2txt.DataBindings.Add("Text", data, "Emp.EmpBranch2")
Since2txt.DataBindings.Add("Text", data, "Emp.EmpSince2")
To2txt.DataBindings.Add("Text", data, "Emp.EmpTo2")
School3txt.DataBindings.Add("Text", data, "Emp.EmpSchool3")
Branch3txt.DataBindings.Add("Text", data, "Emp.EmpBranch3")
Since3txt.DataBindings.Add("Text", data, "Emp.EmpSince3")
To3txt.DataBindings.Add("Text", data, "Emp.EmpTo3")
School4txt.DataBindings.Add("Text", data, "Emp.EmpSchool4")
Branch4txt.DataBindings.Add("Text", data, "Emp.EmpBranch4")
Since4txt.DataBindings.Add("Text", data, "Emp.EmpSince4")
To4txt.DataBindings.Add("Text", data, "Emp.EmpTo4")
School5txt.DataBindings.Add("Text", data, "Emp.EmpSchool5")
Branch5txt.DataBindings.Add("Text", data, "Emp.EmpBranch5")
Since5txt.DataBindings.Add("Text", data, "Emp.EmpSince5")
To5txt.DataBindings.Add("Text", data, "Emp.EmpTo5")
Office1txt.DataBindings.Add("Text", data, "Emp.EmpOffice1")
OfficeAddress1txt.DataBindings.Add("Text", data, "Emp.EmpOfficeAddress1")
Begin1txt.DataBindings.Add("Text", data, "Emp.EmpBegin1")
End1txt.DataBindings.Add("Text", data, "Emp.EmpEnd1")
SumTime1txt.DataBindings.Add("Text", data, "Emp.EmpSumTime1")
Position1txt.DataBindings.Add("Text", data, "Emp.EmpPosition1")
Salary1txt.DataBindings.Add("Text", data, "Emp.EmpSalary1")
Reason1txt.DataBindings.Add("Text", data, "Emp.EmpReason1")
JobQuality1txt.DataBindings.Add("Text", data, "Emp.EmpJobQuality1")
CommanderName1txt.DataBindings.Add("Text", data, "Emp.EmpCommanderName1")
PhoneOffice1txt.DataBindings.Add("Text", data, "Emp.EmpPhoneOffice1")
Office2txt.DataBindings.Add("Text", data, "Emp.EmpOffice2")
OfficeAddress2txt.DataBindings.Add("Text", data, "Emp.EmpOfficeAddress2")
Begin2txt.DataBindings.Add("Text", data, "Emp.EmpBegin2")
End2txt.DataBindings.Add("Text", data, "Emp.EmpEnd2")
SumTime2txt.DataBindings.Add("Text", data, "EmpSumTime2")
Position2txt.DataBindings.Add("Text", data, "Emp.EmpPosition2")
Salary2txt.DataBindings.Add("Text", data, "Emp.EmpSalary2")
Reason2txt.DataBindings.Add("Text", data, "Emp.EmpReason2")
JobQuality2txt.DataBindings.Add("Text", data, "Emp.EmpJobQuality2")
CommanderName2txt.DataBindings.Add("Text", data, "Emp.EmpCommanderName2")
PhoneOffice2txt.DataBindings.Add("Text", data, "Emp.EmpPhoneOffice2")
Office3txt.DataBindings.Add("Text", data, "Emp.EmpOffice3")
OfficeAddress3txt.DataBindings.Add("Text", data, "Emp.EmpOfficeAddress3")
Begin3txt.DataBindings.Add("Text", data, "Emp.EmpBegin3")
End3txt.DataBindings.Add("Text", data, "Emp.EmpEnd3")
SumTime3txt.DataBindings.Add("Text", data, "Emp.EmpSumTime3")
Position3txt.DataBindings.Add("Text", data, "Emp.EmpPosition3")
Salary3txt.DataBindings.Add("Text", data, "Emp.EmpSalary3")
Reason3txt.DataBindings.Add("Text", data, "Emp.EmpReason3")
JobQuality3txt.DataBindings.Add("Text", data, "Emp.EmpJobQuality3")
CommanderName3txt.DataBindings.Add("Text", data, "Emp.EmpCommanderName3")
PhoneOffice3txt.DataBindings.Add("Text", data, "Emp.EmpPhoneOffice3")
TrainningName1txt.DataBindings.Add("Text", data, "Emp.EmpTrainningName1")
TrainBegin1txt.DataBindings.Add("Text", data, "Emp.EmpTrainBegin1")
TrainEnd1txt.DataBindings.Add("Text", data, "Emp.EmpTrainEnd1")
TrainPosition1txt.DataBindings.Add("Text", data, "Emp.EmpTrainPosition1")
TrainQuality1txt.DataBindings.Add("Text", data, "Emp.EmpTrainQuality1")
TrainningName2txt.DataBindings.Add("Text", data, "Emp.EmpTrainningName2")
TrainBegin2txt.DataBindings.Add("Text", data, "Emp.EmpTrainBegin2")
TrainEnd2txt.DataBindings.Add("Text", data, "Emp.EmpTrainEnd2")
TrainPosition2txt.DataBindings.Add("Text", data, "Emp.EmpTrainPosition2")
TrainQuality2txt.DataBindings.Add("Text", data, "Emp.EmpTrainQuality2")
SpeakThaibox.DataBindings.Add("Text", data, "Emp.EmpSpeakThai")
WriteThaibox.DataBindings.Add("Text", data, "Emp.EmpWriteThai")
ReadThaibox.DataBindings.Add("Text", data, "Emp.EmpReadThai")
SpeakEnglishbox.DataBindings.Add("Text", data, "Emp.EmpSpeakEnglish")
WriteEnglishbox.DataBindings.Add("Text", data, "Emp.EmpWriteEnglish")
ReadEnglishbox.DataBindings.Add("Text", data, "Emp.EmpReadEnglish")
SpeakJapanbox.DataBindings.Add("Text", data, "Emp.EmpSpeakJapan")
WriteJapanbox.DataBindings.Add("Text", data, "Emp.EmpWriteJapan")
ReadJapanbox.DataBindings.Add("Text", data, "Emp.EmpReadJapan")
SpeakChinabox.DataBindings.Add("Text", data, "Emp.EmpSpeakChina")
WriteChinabox.DataBindings.Add("Text", data, "Emp.EmpWriteChina")
ReadChinabox.DataBindings.Add("Text", data, "Emp.EmpReadChina")
Program1txt.DataBindings.Add("Text", data, "Emp.EmpProgram1")
Classbox1.DataBindings.Add("Text", data, "Emp.EmpClassbox1")
Program2txt.DataBindings.Add("Text", data, "Emp.EmpProgram2")
Classbox2.DataBindings.Add("Text", data, "Emp.EmpClassbox2")
Program3txt.DataBindings.Add("Text", data, "Emp.EmpProgram3")
Classbox3.DataBindings.Add("Text", data, "Emp.EmpClassbox3")
TypeWriterThaitxt.DataBindings.Add("Text", data, "Emp.EmpTypeWriterThai")
TypeWriterEnglishtxt.DataBindings.Add("Text", data, "Emp.EmpTypeWriterEnglish")
NoDriver1txt.DataBindings.Add("Text", data, "Emp.EmpNoDriver1")
HaveDriverbox1.DataBindings.Add("Text", data, "Emp.EmpHaveDriver1")
NoDriver2txt.DataBindings.Add("Text", data, "Emp.EmpNoDriver2")
HaveDriverbox2.DataBindings.Add("Text", data, "Emp.EmpHaveDriver2")
Sport1txt.DataBindings.Add("Text", data, "Emp.EmpSport1")
Sport2txt.DataBindings.Add("Text", data, "Emp.EmpSport2")
Sport3txt.DataBindings.Add("Text", data, "Emp.EmpSport3")
Hobby1txt.DataBindings.Add("Text", data, "Emp.EmpHobby1")
Hobby2txt.DataBindings.Add("Text", data, "Emp.EmpHobby2")
Hobby3txt.DataBindings.Add("Text", data, "Emp.EmpHobby3")
Talenttxt.DataBindings.Add("Text", data, "Emp.EmpTalent")
YesNo1box.DataBindings.Add("Text", data, "Emp.EmpYesNo1")
ReasonProvincetxt.DataBindings.Add("Text", data, "Emp.EmpReasonProvince")
OutsiderName1txt.DataBindings.Add("Text", data, "Emp.EmpOutsiderName1")
OutsiderSurname1txt.DataBindings.Add("Text", data, "Emp.EmpOutsiderSurname1")
OutsiderCareer1txt.DataBindings.Add("Text", data, "Emp.EmpOutsiderCareer1")
Relation1txt.DataBindings.Add("Text", data, "Emp.EmpRelation1")
OutsiderAddress1txt.DataBindings.Add("Text", data, "Emp.EmpOutsiderAddress1")
OutsiderPhone1txt.DataBindings.Add("Text", data, "Emp.EmpOutsiderPhone1")
OutsiderName2txt.DataBindings.Add("Text", data, "Emp.EmpOutsiderName2")
OutsiderSurname2txt.DataBindings.Add("Text", data, "Emp.EmpOutsiderSurname2")
OutsiderCareer2txt.DataBindings.Add("Text", data, "Emp.EmpOutsiderCareer2")
Relation2txt.DataBindings.Add("Text", data, "Emp.EmpRelation2")
OutsiderAddress2txt.DataBindings.Add("Text", data, "Emp.EmpOutsiderAddress2")
OutsiderPhone2txt.DataBindings.Add("Text", data, "Emp.EmpOutsiderPhone2")
QuaranterNametxt.DataBindings.Add("Text", data, "Emp.EmpQuaranterName")
QuaranterSurNametxt.DataBindings.Add("Text", data, "Emp.EmpQuaranterSurName")
QuaranterCareertxt.DataBindings.Add("Text", data, "Emp.EmpQuaranterCareer")
Relation3txt.DataBindings.Add("Text", data, "Emp.EmpRelation3")
QuaranterAddresstxt.DataBindings.Add("Text", data, "Emp.EmpQuaranterAddress")
QuaranterPhonetxt.DataBindings.Add("Text", data, "Emp.EmpQuaranterPhone")
QuaranterOfficetxt.DataBindings.Add("Text", data, "Emp.EmpQuaranterOffice")
QuaranterPositiontxt.DataBindings.Add("Text", data, "Emp.EmpQuaranterPosition")
QuaranterOfficeAddresstxt.DataBindings.Add("Text", data, "Emp.EmpQuaranterOfficeAddress")
QuaranterOfficeAddressPhonetxt.DataBindings.Add("Text", data, "Emp.EmpQuaranterOfficeAddressPhone")
YesNo2box.DataBindings.Add("Text", data, "Emp.EmpYesNo2")
Remark1txt.DataBindings.Add("Text", data, "Emp.EmpRemark1")
Informationtxt.DataBindings.Add("Text", data, "Emp.EmpInformation")
YesNo3box.DataBindings.Add("Text", data, "Emp.EmpYesNo3")
Remark2txt.DataBindings.Add("Text", data, "Emp.EmpRemark2")
YesNo4box.DataBindings.Add("Text", data, "Emp.EmpYesNo4")
RelativeNametxt.DataBindings.Add("Text", data, "Emp.EmpRelativeName")
RelativeSurnametxt.DataBindings.Add("Text", data, "Emp.EmpRelativeSurname")
RelativePositiontxt.DataBindings.Add("Text", data, "Emp.EmpRelativePosition")
Relation4txt.DataBindings.Add("Text", data, "Emp.EmpRelation4")
YesNo5box.DataBindings.Add("Text", data, "Emp.EmpYesNo5")
Remark3txt.DataBindings.Add("Text", data, "Emp.EmpRemark4")
Introducetxt.DataBindings.Add("Text", data, "Emp.EmpIntroduce")
Salarytxt.DataBindings.Add("Text", data, "Emp.EmpSalary")
TimeSincebox.DataBindings.Add("Text", data, "Emp.EmpTimeSince")
TimeTobox.DataBindings.Add("Text", data, "Emp.EmpTimeTo")
Bankbox.DataBindings.Add("Text", data, "Emp.EmpBank")
NoAccounttxt.DataBindings.Add("Text", data, "Emp.EmpNoAccount")
Point1txt.DataBindings.Add("Text", data, "Emp.EmpPoint1")
Point2txt.DataBindings.Add("Text", data, "Emp.EmpPoint2")
Point3txt.DataBindings.Add("Text", data, "Emp.EmpPoint3")
Point4txt.DataBindings.Add("Text", data, "Emp.EmpPoint4")
Point5txt.DataBindings.Add("Text", data, "Emp.EmpPoint5")
Point6txt.DataBindings.Add("Text", data, "Emp.EmpPoint6")
Point7txt.DataBindings.Add("Text", data, "Emp.EmpPoint7")
AddExamtxt.DataBindings.Add("Text", data, "Emp.EmpAddExam")
TimesLoantxt.DataBindings.Add("Text", data, "Emp.EmpTimesLoan")
SumLoantxt.DataBindings.Add("Text", data, "Emp.EmpSumLoan")
Loantxt.DataBindings.Add("Text", data, "Emp.EmpLoan")
TimesWarntxt.DataBindings.Add("Text", data, "Emp.EmpTimesWarn")
TimesFinetxt.DataBindings.Add("Text", data, "Emp.EmpTimesFine")
SumFinetxt.DataBindings.Add("Text", data, "Emp.EmpSumFine")
Mistake1txt.DataBindings.Add("Text", data, "Emp.EmpMistake1")
Mistake2txt.DataBindings.Add("Text", data, "Emp.EmpMistake2")
Mistake3txt.DataBindings.Add("Text", data, "Emp.EmpMistake3")
OutOfficebox.DataBindings.Add("Text", data, "Emp.EmpCheckOut")
ReasonOuttxt.DataBindings.Add("Text", data, "Emp.EmpReasonOut")
End Sub

Private Sub DataEmp_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

con.Open()
If IdNumbertxt.Text = "" Then
ClearData()
Else
ReadData()
Bindings()
End If
End Sub
Private Sub ClearData()
IdDatabasetxt.Text = ""
IdNumbertxt.Text = ""
Datetxt.Text = Date.Today()
Positiontxt.Text = ""
StatusBox.Text = ""
FrontNametxt.Text = ""
LastNametxt.Text = ""
DateRegistertxt.Text = ""
NickNametxt.Text = ""
IdCardtxt.Text = ""
Birthdaytxt.Text = ""
ProvinceBorntxt.Text = ""
Agetxt.Text = ""
Heighttxt.Text = ""
Weighttxt.Text = ""
Racetxt.Text = ""
Nationalitytxt.Text = ""
Religiontxt.Text = ""
Addresstxt.Text = ""
Roadtxt.Text = ""
Districttxt.Text = ""
Areatxt.Text = ""
Provincetxt.Text = ""
PostalCodetxt.Text = ""
Telephonetxt.Text = ""
Mobiletxt.Text = ""
Emailtxt.Text = ""
Locationbox.Text = ""
Conditionbox.Text = ""
Marrybox.Text = ""
FatherNametxt.Text = ""
FatherSurnametxt.Text = ""
FatherAgetxt.Text = ""
FatherCareertxt.Text = ""
MotherNametxt.Text = ""
MotherSurnametxt.Text = ""
MotherAgetxt.Text = ""
MotherCareertxt.Text = ""
RelativesNumbertxt.Text = ""
ManAmounttxt.Text = ""
WomanAmounttxt.Text = ""
Numbertxt.Text = ""
OneNametxt.Text = ""
OneSurNametxt.Text = ""
OneAgetxt.Text = ""
OneCareertxt.Text = ""
TwoNametxt.Text = ""
TwoSurnametxt.Text = ""
TwoAgetxt.Text = ""
TwoCareertxt.Text = ""
ThreeNametxt.Text = ""
ThreeSurnametxt.Text = ""
ThreeAgetxt.Text = ""
ThreeCareertxt.Text = ""
MarryNametxt.Text = ""
MarrySurnametxt.Text = ""
MarryAgetxt.Text = ""
MarryCareertxt.Text = ""
NumberChildtxt.Text = ""
SonAmounttxt.Text = ""
DaughterAmounttxt.Text = ""
School1txt.Text = ""
Branch1txt.Text = ""
Since1txt.Text = ""
To1txt.Text = ""
School2txt.Text = ""
Branch2txt.Text = ""
Since2txt.Text = ""
To2txt.Text = ""
School3txt.Text = ""
Branch3txt.Text = ""
Since3txt.Text = ""
To3txt.Text = ""
School4txt.Text = ""
Branch4txt.Text = ""
Since4txt.Text = ""
To4txt.Text = ""
School5txt.Text = ""
Branch5txt.Text = ""
Since5txt.Text = ""
To5txt.Text = ""
Office1txt.Text = ""
OfficeAddress1txt.Text = ""
Begin1txt.Text = ""
End1txt.Text = ""
SumTime1txt.Text = ""
Position1txt.Text = ""
Salary1txt.Text = ""
Reason1txt.Text = ""
JobQuality1txt.Text = ""
CommanderName1txt.Text = ""
PhoneOffice1txt.Text = ""
Office2txt.Text = ""
OfficeAddress2txt.Text = ""
Begin2txt.Text = ""
End2txt.Text = ""
SumTime2txt.Text = ""
Position2txt.Text = ""
Salary2txt.Text = ""
Reason2txt.Text = ""
JobQuality2txt.Text = ""
CommanderName2txt.Text = ""
PhoneOffice2txt.Text = ""
Office3txt.Text = ""
OfficeAddress3txt.Text = ""
Begin3txt.Text = ""
End3txt.Text = ""
SumTime3txt.Text = ""
Position3txt.Text = ""
Salary3txt.Text = ""
Reason3txt.Text = ""
JobQuality3txt.Text = ""
CommanderName3txt.Text = ""
PhoneOffice3txt.Text = ""
TrainningName1txt.Text = ""
TrainBegin1txt.Text = ""
TrainEnd1txt.Text = ""
TrainPosition1txt.Text = ""
TrainQuality1txt.Text = ""
TrainningName2txt.Text = ""
TrainBegin2txt.Text = ""
TrainEnd2txt.Text = ""
TrainPosition2txt.Text = ""
TrainQuality2txt.Text = ""
SpeakThaibox.Text = ""
WriteThaibox.Text = ""
ReadThaibox.Text = ""
SpeakEnglishbox.Text = ""
WriteEnglishbox.Text = ""
ReadEnglishbox.Text = ""
SpeakJapanbox.Text = ""
WriteJapanbox.Text = ""
ReadJapanbox.Text = ""
SpeakChinabox.Text = ""
WriteChinabox.Text = ""
ReadChinabox.Text = ""
Program1txt.Text = ""
Classbox1.Text = ""
Program2txt.Text = ""
Classbox2.Text = ""
Program3txt.Text = ""
Classbox3.Text = ""
TypeWriterThaitxt.Text = ""
TypeWriterEnglishtxt.Text = ""
NoDriver1txt.Text = ""
HaveDriverbox1.Text = ""
NoDriver2txt.Text = ""
HaveDriverbox2.Text = ""
Sport1txt.Text = ""
Sport2txt.Text = ""
Sport3txt.Text = ""
Hobby1txt.Text = ""
Hobby2txt.Text = ""
Hobby3txt.Text = ""
Talenttxt.Text = ""
YesNo1box.Text = ""
ReasonProvincetxt.Text = ""
OutsiderName1txt.Text = ""
OutsiderSurname1txt.Text = ""
OutsiderCareer1txt.Text = ""
Relation1txt.Text = ""
OutsiderAddress1txt.Text = ""
OutsiderPhone1txt.Text = ""
OutsiderName2txt.Text = ""
OutsiderSurname2txt.Text = ""
OutsiderCareer2txt.Text = ""
Relation2txt.Text = ""
OutsiderAddress2txt.Text = ""
OutsiderPhone2txt.Text = ""
QuaranterNametxt.Text = ""
QuaranterSurNametxt.Text = ""
QuaranterCareertxt.Text = ""
Relation3txt.Text = ""
QuaranterAddresstxt.Text = ""
QuaranterPhonetxt.Text = ""
QuaranterOfficetxt.Text = ""
QuaranterPositiontxt.Text = ""
QuaranterOfficeAddresstxt.Text = ""
QuaranterOfficeAddressPhonetxt.Text = ""
YesNo2box.Text = ""
Remark1txt.Text = ""
Informationtxt.Text = ""
YesNo3box.Text = ""
Remark2txt.Text = ""
YesNo4box.Text = ""
RelativeNametxt.Text = ""
RelativeSurnametxt.Text = ""
RelativePositiontxt.Text = ""
Relation4txt.Text = ""
YesNo5box.Text = ""
Remark3txt.Text = ""
Introducetxt.Text = ""
Salarytxt.Text = ""
TimeSincebox.Text = ""
TimeTobox.Text = ""
Bankbox.Text = ""
NoAccounttxt.Text = ""
Point1txt.Text = ""
Point2txt.Text = ""
Point3txt.Text = ""
Point4txt.Text = ""
Point5txt.Text = ""
Point6txt.Text = ""
Point7txt.Text = ""
AddExamtxt.Text = ""
TimesLoantxt.Text = ""
Loantxt.Text = ""
SumLoantxt.Text = ""
TimesWarntxt.Text = ""
TimesFinetxt.Text = ""
SumFinetxt.Text = ""
Mistake1txt.Text = ""
Mistake2txt.Text = ""
Mistake3txt.Text = ""
OutOfficebox.Text = ""
ReasonOuttxt.Text = ""
End Sub

คือว่า ลองพยายามเองแล้ว มันแก้ไม่ได้ ก็เลยต้องมาขอให้เพื่อนๆช่วยอีกแล้วT_T

Tag : .NET, Ms Access, VB.NET

Date : 2011-04-04 16:37:10

By : mayapopy

View : 1657

Reply : 9

No. 1

bell

โพสกระทู้ ( 325 )
บทความ ( 0 )

อ๋อ ลืมบอกไป โปรเจ็คที่แล้ว เสร็จแล้วค่ะ ขอบคุณ

คุณ หางอึ่ง
คุณ kaimuk
คุณ Programmer Of Persia
คุณ 3rds
คุณ mr.win
คุณ termja
คุณ koung_OldTraford
คุณ nut_dev
คุณ Mr.Hikhalu
คุณ angelrings0
คุณ moo
คุณ Nibbāna

ปล. ถ้าตกใครไป ขอโทษด้วยนะคะ ไม่ได้ตั้งใจค่ะ เพราะว่าช่วยกันหลายคน แหะๆ ขอบคุณ ทุกๆคนค่า ตอนนี้ติดโปรเจ็คใหม่

คิดว่า ฝึกละกันเน่อะ อิอิ

Date : 2011-04-04 16:49:01

By : mayapopy

No. 2

หางอึ่ง

โพสกระทู้ ( 1,348 )
บทความ ( 1 )

เย้ ชื่อได้ขึ้นอันดับ 1 อิอิ

Date : 2011-04-04 16:54:55

By : watcharop

No. 3

หางอึ่ง

โพสกระทู้ ( 1,348 )
บทความ ( 1 )

เป็นอย่างนี้นี่เอง ฟิล์ดถึงได้เยอะจัด

Date : 2011-04-04 16:56:08

By : watcharop

No. 4

bell

โพสกระทู้ ( 325 )
บทความ ( 0 )

ใช่ค่ะ มันใช้เก็บฐานข้อมูลพนักงาน (เหมือนใบสมัครงาน) นี่ยังไม่ได้ใส่รูปนะเนี๊ย

แต่คิดว่าใส่รูปทำเป็น ในหนังสือมีสอน แต่ยังไม่ได้ทำ^^

Date : 2011-04-04 16:59:42

By : mayapopy

No. 5

bell

โพสกระทู้ ( 325 )
บทความ ( 0 )

แถมส่งคำขอบคุณให้ด้วยจ้า

เดี๋ยวจะไล่ส่งให้ทุกคน แต่ส่งได้วันละคน*-*

Date : 2011-04-04 17:01:10

By : mayapopy

No. 6

bell

โพสกระทู้ ( 325 )
บทความ ( 0 )

ว่าแต่ คะแนนนี่เอาไว้ทำอะไรหรอ??

Date : 2011-04-04 17:03:38

By : mayapopy

No. 7

หางอึ่ง

โพสกระทู้ ( 1,348 )
บทความ ( 1 )

ตอบความคิดเห็นที่ : 6 เขียนโดย : mayapopy เมื่อวันที่ 2011-04-04 17:03:38

รายละเอียดของการตอบ ::

เอาคะแนน ไปแลกเป็น Central Gift Voucher มั้ง

Date : 2011-04-04 17:28:50

By : watcharop

No. 8

bell

โพสกระทู้ ( 325 )
บทความ ( 0 )

ยังแก้ไม่ได้เลย มีวิธีผูกข้อมูลแบบอื่นไหมคะ?T_T

Date : 2011-04-05 08:25:22

By : mayapopy

No. 9

bell

โพสกระทู้ ( 325 )
บทความ ( 0 )

ทำได้แล้วค่ะ เราซื่อบื้อเอง แหะๆ^^

ขอบคุณค่า

Date : 2011-04-05 11:07:11

By : mayapopy

ค้นหาข้อมูล

แสดงความคิดเห็น

Re : เกิดปัญหาเกี่ยวกับการผูกข้อมูล โดยใช้ Form ที่มี Tab ค่ะ vb.net T_T

รายละเอียด

เพื่อความเรียบร้อยของข้อความ ควรจัดรูปแบบให้พอดีกับขนาดของหน้าจอ เพื่อง่ายต่อการอ่านและสบายตา และตรวจสอบภาษาไทยให้ถูกต้อง

อัพโหลดแทรกรูปภาพ

Notice

เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ
อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง

เพื่อความปลอดภัยและการตรวจสอบ กระทู้ที่แทรกไฟล์อัพโหลดไฟล์จากที่อื่น อาจจะถูกลบทิ้ง

โดย

อีเมล์

บวกค่าให้ถูก