以下是一个简单的示例代码，用于在VB中显示当前日期和时间：
Public Class Form1
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
' 在窗体加载时显示当前日期和时间
Label1.Text = DateTime.Now.ToString()
End Sub
End Class
在上述代码中，我们使用了DateTime.Now来获取当前日期和时间，然后使用ToString()方法将其转换为字符串，并将其赋值给名为Label1的标签的Text属性。这样，在窗体加载时，标签Label1将显示当前日期和时间。
请注意，此示例假设您已经在窗体上添加了一个名为Label1的标签。您可以根据自己的需求进行调整和修改。
