asp页面怎么插入下面在vb中的代码：
Private Sub Command1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Check1.Value = 0 And Check2.Value = 0 And Check3.Value = 0 Then
Print "ddd"
End If
End Sub
应该什么定义那？