Question

VB问题。定了值a0 a1 a1。想他们代表label 1 label 2 label3的内容。要在哪里打a(0)=label1.caption

这问题问了几个人了，烦死哥了。是在 声明 那打，还是在from load那打 还是在按钮那打。我的程序是按按钮，然后如果label内容符合条件，便在tex那显示内容

Answer 1

赌运气游戏。界面上有3个标签，1个文本框，1个命令按钮，单击开始按钮。产生3个一位随即整数，分别显示在3个标签内.如果3个数中有一个或多个为7时，则文本框内显示“you are lucky”文字的颜色为红色。否则文本框显示"you are unlucky"，而且颜色为黑色

Private Sub Command1_Click()
Randomize
Label1.Caption = Int(Rnd * 10)
Label2.Caption = Int(Rnd * 10)
Label3.Caption = Int(Rnd * 10)
If Label1.Caption = "7" Or Label2.Caption = "7" Or Label3.Caption = "7" Then
Text1.Text = "you are lucky"
Text1.ForeColor = vbRed
Else
Text1.Text = "you are unlucky"
Text1.ForeColor = vbBlack
End If
End Sub

Answer 2

Form_Activate最保险
还有，你的问题相当不清晰

追问

我靠，我要死了。我不问这问题了。我直接给你题目吧，你帮我做好了。

赌运气游戏。界面上有3个标签，1个文本框，1个命令按钮，单击开始按钮。产生3个一位随即整数，分别显示在3个标签内.如果3个数中有一个或多个为7时，则文本框内显示“you are lucky”文字的颜色为红色。否则文本框显示"you are unlucky"，而且颜色为黑色