请问下这段代码哪里错了?

来源:百度知道 编辑:UC知道 时间:2024/05/12 02:07:36
Private Sub lblTitle_Click()
forml.Top = (Screen.Height - forml.Height) / 2 '垂直方向居中
forml.Left = (Screen.Width - forml.Width) / 2 '水平方向居中
End Sub

Private Sub Command1_Click()
textl.Text = "进入Visual Basic世界" '设置文本框的文本
End Sub

Private Sub Command2_Click()
textl.Text = "" '设置文本框的文本为空
End Sub

Private Sub Command3_Click()
Unload forml '设置文本框的文本为空
End Sub

Private Sub Command4_Click()
frmAbout.Show l '显示关于对话框
End Sub

我是个新手。大家帮忙看下哪里错了。
另外请问各位有没有教程?
教程有用的追加 20 分

是vb的程序吧
1.对象都初始化了吧。
2.frmAbout.Show应该是个方法吧,是不是需要带()
例如 Dim about As New AboutDialog()
about.Show()
3.unload应该是 xxx.unload(yyyy)格式吧。
例如 Dim domain As AppDomain
AppDomain.Unload(domain)

请参考 MSDN。 说得很详细的

最好说一下,你这是什么什么语言,出了什么错

错误百出,
(建议)http://tech.163.com/special/000915SN/vbgreat.html
http://www.enet.com.cn/eschool/video/vb/
这2个网址去学吧

完全没问题 4个按钮 默认控件名 一个标签 名称为 lblTitle
两个窗体 forml (是L不是1哦~),frmabout
一个text控件 一样是L
show 后面的参数 最后用数值来代替 1 或 0

把所有的Forml改为Form1
把所有的Textl改为Text1
frmAbout.Show l 改为frmAbout.Show 1

注意字母l和数字1的区别

Private Sub Command3_Click()
Unload forml '设置文本框的文本为空
End Sub

unload form1这个是把form1窗体卸载掉!不是设置文本框为空