VB实例 —万年历 （1）
1、创建控件：lbl1、txt1、lbl2、cmd1
2、lbl1.caption=输入日期（任一种正确格式）：
设置lbl1、txt1、lbl2、cmd1的字体大小及颜色；
3、双击按钮“确认”，添加代码，效果为：
Option Explicit
Private Sub cmd1_Click()
Dim a, b
b = txt1.Text
a = Weekday(b)
Select Case a
Case 1
lbl2.Caption = "星期日"
Case 2
lbl2.Caption = "星期一"
Case 3
lbl2.Caption = "星期二"
Case 4
lbl2.Caption = "星期三"
Case 5
lbl2.Caption = "星期四"
Case 6
lbl2.Caption = "星期五"
Case 7
&nb
相关文档：
Public Function IsValidIPAddress(ByVal strIPAddress As String) As Boolean
On Error GoTo Handler
Dim varAddress As Variant, n As Long, lCount As Long
varAddress = Split(strIPAddress, ".", , vbTextCompare)
If IsArray(varAd ......
·错误类型
·编程员的错误（比如分母不能是0，参数个数或数据类型不对应）
·环境方面的错误（比如文件太大，磁盘放不下）
·时间上的错误（比如视图给尚未完成加载的窗体设置焦点）
·创建错误处理程序
......
昨天晚上，米老师把我叫到办公室。问我学了一周感觉如何，我当时很汗颜。米老师身体不好，电脑版班么多学生，他可以让自己轻松一点儿，但他没有。作为几十个学生的免费老师，做为人父人夫，老师尚且知道我学了一周成果怎样呢，但我自己却没有想过，很惭愧。犯任何错误第一次可以原谅，但绝不应该让它出现第二次，学了一周， ......
1、关于吉大视频：1-3集讲VB程序设计的概述4-30集讲VB基础知识，如控件的使用31-64集讲ActiveX控件、数据库等的高级编程部分。
看的过程中注意快捷键的使用和截图工具的运用，看视频时将重点作出标注。
2、由CSTR、Cstr（）、string、Instr（）和str（）（此为深度扩展）所想到的关于总结的方法。
&nb ......
