VB6VB.NET通用实例教程：控件使用+错误处理全场景实战教学

『VB6/VB.NET通用实例教程：控件使用 + 错误处理全场景实战教学』
是不是经常遇到这种情况？在 VB6 里用得好好的控件，放到VB.NET里突然就报错？明明按教程拖了个按钮，运行时却提示 “控件未定义”？今天就专门讲控件使用和错误处理，不管你用 VB6 还是VB.NET，看完这些实战案例，至少能少踩 80% 的坑，一起往下看吧！

为什么同样的控件在 VB6 和VB.NET里用法不一样？

这得从基础说起。VB6 用的是 ActiveX 控件，VB.NET则基于.NET Framework，控件本质就不同。比如最常用的文本框，VB6 里叫 TextBox，VB.NET里也叫 TextBox，但属性和事件差不少。给大家举个简单例子：

操作场景	VB6 实现方式	VB.NET实现方式
获取输入内容	Text1.Text	TextBox1.Text
清空内容	Text1.Text = ""	TextBox1.Clear()
禁止输入	Text1.Locked = True	TextBox1.Enabled = False

我们在使用时要是混着用，比如在VB.NET里写 TextBox1.Locked，虽然不会报错，但效果和预期可能不一样，这就是很多新手 confusion 的地方。

列表框加载数据总是出问题，该怎么办？

列表框（ListBox）是最容易出错的控件之一。新手常犯的错是 “数据重复加载” 或者 “加载后选不中”。以加载学生名单为例：
在 VB6 里，正确步骤应该是：先清空列表框（List1.Clear），再用循环添加（List1.AddItem 姓名）。要是忘了 Clear，每次运行都会在后面追加，列表里就一堆重复数据。
VB.NET里更简单，直接绑定数据源就行：ListBox1.DataSource = 数据集，ListBox1.DisplayMember = "姓名"。但这里要注意，绑定前必须设置 DisplayMember，不然显示的会是 “System.Data.DataRowView”，看着就头大。
如果不设置 Clear 或正确绑定，程序运行起来要么数据乱得很，要么点半天没反应，用户体验就差远了。

按钮点击事件没反应，常见原因有哪些？

按钮（CommandButton/Button）是交互核心，但新手总遇到 “点了没反应” 的情况。主要原因有三个：

1. 事件没绑定：VB6 里要确保按钮的 Click 事件里有代码，VB.NET里得检查是不是在设计器里双击按钮自动生成的事件，手动写的事件容易漏绑定。
2. 控件被遮挡：有时候在上面放了其他控件，把按钮挡住了，看着能点，其实点的是上面的控件。可以右键 “置前” 试试。
3. Enabled 属性为 False：不小心把 Enabled 设成了 False，按钮变灰，自然点不动。在属性窗口改回 True 就行。

我之前帮朋友看代码，他的按钮点了没反应，查了半天发现是事件名写错了，VB6 里按钮名叫 Command1，事件却写成了 Command2_Click，能有反应才怪。

错误处理用 On Error 就够了吗？

肯定不够。VB6 里常用 On Error Resume Next 跳过错误，但这样会隐藏问题；VB.NET推荐用 Try...Catch...Finally，更规范。给大家看个实战案例：
VB6 里处理文件打开错误：
On Error GoTo ErrHandle
Open "D:\data.txt" For Input As #1
' 正常代码
Exit Sub
ErrHandle:
MsgBox "出错了：" & Err.Description
Resume Next
VB.NET里则这样写：
Try
Dim fs As New FileStream ("D:\data.txt", FileMode.Open)
Catch ex As Exception
MsgBox ("出错了：" & ex.Message)
Finally
' 不管成功失败都执行，比如关闭文件
End Try
如果不用错误处理，程序遇到文件不存在这种情况就会直接崩溃，给用户抛个 “运行时错误”，体验特别差。但也别滥用 On Error Resume Next，之前见过有人全代码都加这个，结果真出错了都找不到在哪。
最后说个个人心得：控件使用没捷径，就是多拖多试，每次报错别急着删代码，先看错误提示里的关键词，比如 “未定义” 就查控件名拼没拼错，“属性不存在” 就核对版本差异。错误处理则要养成习惯，写完一段功能就加一段处理，别等程序崩溃了再补。刚开始可能觉得麻烦，练多了自然就顺了，希望这些能帮到你！

标签： Visual Basic VB.NET