VB高手请进!!(不是高手也进来看看)

来源：百度知道编辑：UC知道时间：2024/05/10 17:57:15

这是一个字体闪烁效果的程序.里面有些不懂,特来请教!
Option Explicit------什么意思?

Private Sub Command1_Click()
End
End Sub

Private Sub Form_Load()
Label1.Top = 850---- - --这个不设行吗?
Label1.Left = 750
Timer1.Interval = 555
Form1.WindowState = 2------这个什么意思?
End Sub

Private Sub Timer1_Timer()
chc Label1, 1, 4, 8-------chc是什么?

End Sub
Sub chc(Cont As Control, Color1 As Integer, Color2 As Integer, Color3 As Integer)--------cont和control分别是什么?
If Val(Cont.Tag) = Color1 Then------cont.tag和val分别是什么?
Cont.Tag = Color2
ElseIf Val(Cont.Tag) = Color2 Then-------elseif可以分开吗?分开与合上有区别吗?
Cont.Tag = Color3
ElseIf Val(Cont.Tag) = Color3 Then
Cont.Tag = Color1
Else
Cont.Tag = Color------这个是什么?
End If
Cont.ForeColor = QBColor(Cont.Tag)------QB是什么?这样设置什么意思?
End Sub
希望各位高手赐教!
如果觉得一下回答这么多问题太烦了,请挑几个回答,并把题目写清楚,谢谢!
还有一个问

Label1.Top = 850---- - --这个不设行吗?
这个是定义了label1控件的位置，不设应该可以，只要之前放好位置

Form1.WindowState = 2------这个什么意思?
0/1/2 分别是窗口最小化、普通、最大化

If Val(Cont.Tag) = Color1 Then------cont.tag和val分别是什么?
cont 是一个参数
val 是一个函数，将字符窜形的数字转换成数值
例如val("123")=123 <--Integer型

QBColor(Cont.Tag)------QB是什么?这样设置什么意思?
QBcolor是VB内建函数，分别是QBcolor(0-15)代表了16种不同的颜色

ElseIf Val(Cont.Tag) = Color2 Then-------elseif可以分开吗?分开与合上有区别吗?
不可以分开，这就是函数格式。
相同的函数有
select case XX
case 情况1
case 情况2
...
end select

不要从实例中学，系统学习！推荐一本书！http://www.joyo.com/detail/product.asp?prodid=zjbk028330&ref=SR&uid=w5ssc98qwaa7wqaaqssg77gg5

这本书超级好！讲的很详细！不过对你来说也许有一点难，看看吧！我觉得市面上没有比这个更好的教材了

还有什么，请联系我

楼上正解 ,补充
Option Explicit------什么意思?
要求一下变量在使

VB高手请进!!(不是高手也进来看看) CS高手请进,不是高手也请进! CS高手请进，不是高手也欢迎红警高手请进（不是高手也请进）！！！！！！！！！！！！！！！！电脑维修高手请进!不是高手也请进! vb高手请进！！！！！！！！！！！！！！1 VB编程高手请进 VB高手请进 vb高手请进来 vb高手请进