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 ......
1、关于吉大视频：1-3集讲VB程序设计的概述4-30集讲VB基础知识，如控件的使用31-64集讲ActiveX控件、数据库等的高级编程部分。
看的过程中注意快捷键的使用和截图工具的运用，看视频时将重点作出标注。
2、由CSTR、Cstr（）、string、Instr（）和str（）（此为深度扩展）所想到的关于总结的方法。
&nb ......
VC++
与VB
数据类型对应关系
在做VC与vb程序间互相调用，需要注意两种语言不同编译器对数据类型的定义区别，此时两者数据类型的对应关系就显得十分的重要，对应关系以及声明方式如下所示。
VC++
VB
short
Integer
int
Long
long
Long
UNIT
Long
ULONG
Long
WORD
DWORDLon ......
rnd函数返回或者说产生一个小于1但大于或等于0的single类型的随机数。
产生随机数之前需要一个种子。
·不同的种子，可使随机数生成器生成不同的随机数；
·在一个种子下，生成的随机数相同。
随机数生成器的语句为randomize。格式为：randomize[x]。
·当x>0时，使用前一次调用rnd函数产生的� ......
