VB,我不懂VB,请教一下下面代码错在哪里啊??

来源:百度知道 编辑:UC知道 时间:2024/06/23 23:07:38
Private Sub Form_click()

Form1.Name = firSimpleApp

Form1.Caption = "VB应用程序实例"
Form.BackColor = blue

End Sub

Private Sub Label1_load()

Label1.Name = lblBegin
Label1.Caption = "Let's begin to study Visual Basic!"
Label1.BackColor = white
Label1.ForeColor = red
Label1.FontName = "arial"

Label1.FontSize = 16
Label.alingnment = 0

End Sub

name属性是只读属性,不能在运行时重新赋值的

还有 Private Sub Label1_load()是错的,你是怎么写的呢?
label控件没有load事件的

控件的事件是vb定义好了的,双击控件会自动生成默认事件

Private Sub Form_click()
'Form1.Name = firSimpleApp 此项在属性栏“名称”处设置
Form1.Caption = "VB应用程序实例"
Form1.BackColor = blue
Call Label1_load
End Sub

Private Sub Label1_load()
' Label1.Name = lblBegin 此项在属性栏“名称”处设置
Label1.Caption = "Let's begin to study Visual Basic!"
Label1.BackColor = white
Label1.ForeColor = red
Label1.FontName = "arial"
Label1.FontSize = 16
Label1.Alignment = 0
End Sub

Form的名字是Form1吗?

改成
Private Sub Form_click()

Me.Caption = "VB应用程序实例"
Me.BackColor = blue

End Sub

Private Sub Form_click()
Form1.Caption = "VB应用程序实例"
Form.BackColor = blue
Label1.Caption = "Let's begin to study Visual Basic!"
Lab