macloteash
3 ธันวาคม พ.ศ. 2552, 17.07 น.
มันมีหลักการเขียนยังไงเหรอครับ พอดีวันที่ อ. สอนผมขาดเรียน
อยากให้ สาธิตหน่อยครับ
เช่น MsgBox ว่า คุณแน่ใจหรือไหมว่าจะลบและแก้ไขข้อมูล
ปุ่ม 1 ตกลง
ปุ่ม 2 ยกเลิก
ขอบคุณครับ
ปล. บอร์ดนี่น่าจะแยก VB.net เป็นอีกห้องนึง Java อีกห้องนึง เพราะผมคิดว่ามันรวมกันเยอะอะครับ
sutthalak
3 ธันวาคม พ.ศ. 2552, 22.38 น.
MsgBox("คุณแน่ใจหรือไม่ ที่จะลบข้อมูลนี้", MsgBoxStyle.Exclamation + MsgBoxStyle.YesNo, "ลบข้อมูล")
MsgBox("คุณแน่ใจหรือไม่ ที่จะลบข้อมูลนี้", MsgBoxStyle.Exclamation + MsgBoxStyle.OkCancel, "ลบข้อมูล")
แต่ปุ่มเป็นภาษาอังกฤษนะครับ
macloteash
6 ธันวาคม พ.ศ. 2552, 0.12 น.
ขอบใจจ้า
sak2005
12 มกราคม พ.ศ. 2553, 1.17 น.
มันมีหลักการเขียนยังไงเหรอครับ พอดีวันที่ อ. สอนผมขาดเรียน
อยากให้ สาธิตหน่อยครับ
เช่น MsgBox ว่า คุณแน่ใจหรือไหมว่าจะลบและแก้ไขข้อมูล
ปุ่ม 1 ตกลง
ปุ่ม 2 ยกเลิก
ขอบคุณครับ
ปล. บอร์ดนี่น่าจะแยก VB.net เป็นอีกห้องนึง Java อีกห้องนึง เพราะผมคิดว่ามันรวมกันเยอะอะครับ
โค๊ดคำสั่งเกี่ยวกับ กรอบหรือกล่องข้อความ ระหว่าง vb6 กับ vb2008 ..สคริ๊ปที่เขียนจะไม่เหมือนกัน
แต่ให้ผลเหมือนกัน ตัวอย่างเช่น..
vb6 ใช้คำสั่ง:
Private Sub Command1_Click()
btncode = MsgBox("Do you wanted test button?", vbYesNo, "Sample Project Test")
If btncode = vbYes Then
MsgBox "You clicked..YES"
Else
MsgBox "You clicked..NO"
End If
End Sub
---------------------------------------------------------------------------------
vb2008 ใช้คำสั่ง:
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim Message As String = "Do you wanted Test button?"
Dim Caption As String = "Sample Project"
Dim Buttons As Integer = MessageBoxButtons.YesNo
Dim btncode As DialogResult
btncode = MessageBox.Show(Message, Caption, MessageBoxButtons.YesNo, MessageBoxIcon.Question, _
MessageBoxDefaultButton.Button1)
If btncode = System.Windows.Forms.DialogResult.Yes Then
MessageBox.Show("You clicked..YES")
Else
MessageBox.Show("You clicked..NO")
End If
End Sub
End Class
pencil
12 มกราคม พ.ศ. 2553, 13.57 น.
If MsgBox("ยืนยันการลบข้อมูล", 16 + 4, "DELETE DATA") = 7 Then Return