思路：一个textbox，一个command，按一下command，textbox中随机显示0或1，请教如何实现？

自我解决
Private Sub Command1_Click()
Dim a As Integer
Randomize
a = Int((1 - 0 + 1) * Rnd + 0)
Print a
End Sub