1.   小明想用VB程序做一个抽奖程序。请帮小明完成代码编写。

Private Sub Command1_Click( )

    Dim  As Integer

    Randomize

    num = Int( * 3)

    Text1. Text = Textname((num)). Text

End Sub