vb中，Label1.caption = A,B,C,E中随机一个的代码该怎么弄?

Private Sub Form_Click()
Dim c As String
Dim a As Integer
Dim b As Integer
Randomize
a = Asc("A")
b = Asc("D")
c = a + Rnd * (b - a)
Label1.Caption = Chr(c)
End Sub本回答被提问者采纳