有人说可以等于0，有的说不行Rnd 函数返回小于 1 但大于或等于 0 的值 要等于0就取整。 [0,1)正确! '原则上可以为0 , 但几率很小 Private Sub Command1_Click() For I = 1 To 10000 Randomize Debug.Print Rnd Next End Sub '输出几个0? 这种问题也要动用代码解决啊 服了U
Private Sub Check1_Click() If Check1.Value = 1 Then DTP1.Enabled = True Else DTP1.Enabled = False End If End Sub Private Sub Check2_Click() If Check2.Value = 1 Then DTP2.Enabled = True Else
......
