我是刚开始学VB的，这段代码我不知道错在哪里了？
我编写的却没有反应，按哪一个键都没有反应！！！！

Private Sub Cmd1_Click()
Label1.BorderStyle = 1
'为Label1添加边框
End Sub
Private Sub Cmd2_Click()
Label1.Font = "隶书"
'设置标签中文字的字体为隶书
Label1.FontSize = 15
'设置标签中文字的字体为15号字
Label1.FontBold = True
'设置标签中文字的字体为粗体
EndSub
Private Sub Cmd3_Click()
Label1.Visible = False
'将标签设置为隐藏
End Sub
Private Sub Cmd4_Click()
Label1.Alignment = 2
'设置标签中文字的对齐方式为居中形式
End Sub
Private Sub Cmd5_Click()


Label1.BorderStyle = 0
'将Label1边框取消
Label1.Visible = True
'将标签恢复显示
Label1.Font = "宋体"
'设置标签中文字的字体大小为12号字
Label1.FontBold = True
'设置标签中文字的字体为常规
Label1.Alignment = 0
'设置标签中文字的对齐方式为左对齐形式
End Sub

估计是控件名称有问题
看看属性列表里的按钮名称和程序中的按钮名称是不是一样的

看代码没有发现什么错误

Private Sub Cmd1_Click()
Label1.BorderStyle = 1
'为Label1添加边框
End Sub
Private Sub Cmd2_Click()
Label1.Font = "隶书"
'设置标签中文字的字体为隶书
Label1.FontSize = 15
'设置标签中文字的字体为15号字
Label1.FontBold = True
'设置标签中文字的字体为粗体
EndSub
Private Sub Cmd3_Click()
Label1.Visible = False
'将标签设置为隐藏
End Sub
Private Sub Cmd4_Click()
Label1.Alignment = 2
'设置标签中文字的对齐方式为居中形式
End Sub
Private Sub Cmd5_Click()


Label1.BorderStyle = 0
'将Label1边框取消
Label1.Visible = True
'将标签恢复显示
Label1.Font = "宋体"
'设置标签中文字的字体大小为12号字
Label1.FontBold = True
'设置标签中文字的字体为常规
Label1.Alignment = 0
'设置标签中文字的对齐方式为左对齐形式
End Sub

[[it] 本帖最后由 multiple1902 于 2008-5-25 18:11 编辑 [/it]]

版主不要咬文嚼字了，关键是要帮他解决问题

你是否看了他程序的效果

我编译的结果在4楼。

可是还是不可以啊！！
我把EndSub有改成了End Sub 中间加了一个空格！
可是我翻译的怎么不就不行了那！