[VB.NET] การจัดการแสดงผล MessageBox ด้วย DLL

thongkorn

บ่อยครั้งก็เบื่อหน่ายใน MessageBox หรือกล่องการแสดงผลโต้ตอบกับผู้ใช้งานที่ติดมากับ Visual Studio ของทางไมโครซอฟท์ วันนี้แอดมินมีวิธีการเปลี่ยนแปลง หรือจัดการ MessageBox ด้วยการใช้ DLL ...


อันดับแรกต้อง Add Reference mb.dll เข้ามาก่อน ... (อยู่ในไฟล์ Zip ของโค้ดต้นฉบับ)


มาดูโค้ดแบบง่ายๆกันเถอะ ...

1. Public Class Form1
   
2. 
   
3.     Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
   
4.         Dim show As New mb.ShowMessagebox
   
5.         show.Fonts(New Font("Tahoma", 12))
   
6.         show.ShowBox("คุณรักผมใช่หรือไม่?" & vbCrLf & "หากใช่กดปุ่ม OK หากไม่ใช่ให้กดปุ่มอื่น", mb.MStyle.ok, mb.FStyle.Exclamation, "Custom MessageBox")
   
7.     End Sub
   
8. 
   
9.     Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click
   
10.         Dim show As New mb.ShowMessagebox
    
11.         show.ButtonText("ใช่", "ฮักหลาย")
    
12.         show.Fonts(New Font("Tahoma", 12))
    
13.         If (show.ShowBox("คุณรักผมใช่หรือไม่?" & vbCrLf & "หากใช่กดปุ่มใช่ หากไม่ใช่กดฮักหลาย", mb.MStyle.YesNo, mb.FStyle.Question, "Custom MessageBox")) = Windows.Forms.DialogResult.Yes Then
    
14.             MsgBox("คุณกดใช่")
    
15.         Else
    
16.             MessageBox.Show("คุณกดฮักหลาย")
    
17.         End If
    
18.     End Sub
    
19. 
    
20. End Class

คัดลอกไปที่คลิปบอร์ด

ดาวน์โหลดโค้ดต้นฉบับ VB.NET (2010) ได้ที่นี่ ...

gp1619

สร้าง DLL อย่างไรครับ เพราะอยากเปลี่ยนรูป