这段C代码如何改为VB.NET？

例如：
MessageBox.Show("xxxxx", MessageBoxButtons.OKCancel, Sub(obj, args)
                                                                 If (args.Result = ShowResult.OK) Then
                                                                        MessageBox.Show ("你点击了OK")
                                                                 End If
                                                             End Sub)