Forgot Password ??

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

	Registered : 109,038

HOME > .NET Framework > Forum > เมื่อปิดฟอร์มย่อย จะให้ฟอร์มหลักรีเฟรชค่ายังไงค่ะ สมมติว่าฟอร์ม A มี combobox แสดงชื่อรายการ a-e

[.NET] เมื่อปิดฟอร์มย่อย จะให้ฟอร์มหลักรีเฟรชค่ายังไงค่ะ สมมติว่าฟอร์ม A มี combobox แสดงชื่อรายการ a-e

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

Guest

สมมติว่าฟอร์ม A มี combobox แสดงชื่อรายการ a-e และมีปุ่มเพิ่มรายการ

Code (VB.NET)

Private Sub A_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        ShowProduct()
End Sub
 
Private Sub ShowProduct()
        sqlPro = "SELECT * FROM tbAddProduct"
        dbDAP = New OleDbDataAdapter(sqlPro, dbConn)
        dbDSP.Clear()
        dbDAP.Fill(dbDSP, "tbAddProduct")
        allPro = Me.BindingContext(dbDSP.Tables("tbAddProduct")).Count
        ReDim ProID(allPro)
        ReDim ProName(allPro)
        For i = 0 To allPro - 1
            ProID(i) = CStr(dbDSP.Tables("tbAddProduct").Rows(i).Item("Number"))
            ProName(i) = CStr(dbDSP.Tables("tbAddProduct").Rows(i).Item("AddProduct"))
            cboProduct.Items.Add(ProName(i))
        Next
    End Sub
 
 Private Sub btnAddProduct_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnAddProduct.Click
       B.Show()
    End Sub

เมื่อคลิกปุ่ม เพิ่มรายการซ่อม(btnAddProduct) จะแสดงฟอร์ม B ออกมา จากนั้นเพิ่ม รายการ f เข้าไป

เมื่อเพิ่มเสร็จ listbox จะแสดงรายการที่เพิ่มเข้าไป

Code (VB.NET)

strAdd = "INSERT INTO tbAddProduct ([Number],[AddProduct])"
            strAdd &= " VALUES ('" & str3 & "','" & txtDataProduct.Text & "')"
            dbCommand.CommandType = CommandType.Text
            dbCommand.CommandText = strAdd
            dbCommand.Connection = dbConn
            dbCommand.ExecuteNonQuery()         
            lstData.Items.Add(txtDataProduct.Text)

เมื่อกดปุ่ม ออกหน้าเพิ่มสินค้า(btnExit) จะกลับไปฟอร์ม A และ combobox ต้องมีรายการ f ที่เพิ่มเข้าไป

แต่มันออกแค่ a-e เหมือนเดิม ไม่มีข้อมูล f ที่ป้อนเข้าไป ต้องเพิ่มคำสั่งอะไรเข้าไปอีกค่ะ

Code (VB.NET)

Private Sub btnExit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnExit.Click
        Me.Close()
    End Sub

Tag : - - - -

Date : 2010-04-20 14:28:41

By : mamozaa

View : 3044

Reply : 3

No. 1

Guest

วานผู้รู้ช่วยตอบหน่อยนะค่ะ

งานเร่งเลยค่ะ

Date : 2010-04-20 23:21:59

By : mamozaa

No. 2

xxx

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

ถ้าจะรอผู้รู้จริงๆ ก็ไม่รู้ว่าจะมาเมื่อไหร่ ลองให้ผู้ไม่รู้แต่แอ๊บเหมือนรู้ช่วยแล้วกันนะ

-------------------------------------------------------------------------------------------

ต้องอีเวนท์แฮนเดิลตอนที่ปิดฟอร์มย่อยก่อน
Code (VB.NET)

Private  Sub btnAddProduct_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnAddProduct.Click
      B.Show()
      AddHandler B.FormClosed, AddressOf B_FormClosed
End Sub
 
Private Sub B_FormClosed(ByVal sender As Object, ByVal e As FormClosedEventArgs)
      'จะทำอะไรก็ทำในนี้ จะเอาค่าในฟอร์มย่อยมาอัฟเดตฟอร์มหลักก็แล้วแต่
      'ตัวอย่าง
      'cboProduct.Items.Clear()
      'ShowProduct()
End Sub

ปล. ถ้าสามารถแก้ source ShowProduct() ก็แก้นะ มันทำงานได้ก็จริงแต่เห็น code แล้วทนไม่ได้ น่าจะศึกษาการ bind data ให้ combobox ใหม่นะ

Date : 2010-04-21 08:28:04

By : tungman

No. 3

หางอึ่ง

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

เห็นด้วยกับ tungman
จขกท น่าลองซื้อหนังสือการเขียน VB.NET มาอ่านซักเล่มนะ (เอาเล่มไหนก็ได้ มีทุกเล่มเรื่อง Combobox)
ไม่งั้น โค้ดอะไรที่น่าจะง่าย กลายเป็นเรื่องยาก

Date : 2010-04-21 09:06:51

By : watcharop

ค้นหาข้อมูล

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

Re : เมื่อปิดฟอร์มย่อย จะให้ฟอร์มหลักรีเฟรชค่ายังไงค่ะ สมมติว่าฟอร์ม A มี combobox แสดงชื่อรายการ a-e

รายละเอียด

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

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

Notice

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

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

โดย

อีเมล์

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