姬豪杰的专栏

MousePointer属性用来显示鼠标箭头的形状的。 可在C:/WINDOWS/Cursors 找到这些形状。  常数                       值      描述       vbDefault               0       缺省值       vbArrow                 1       箭头       vbCrosshair            2      十字线       vbIbeam                 3      I  

Private Sub Command1_Click()    Dim xlApp As Object '定义EXCEL类    'Dim xlApp As Excel.Application    Set xlApp = CreateObject("Excel.Application") '创建EXCEL应用类    Dim xlBook As Object '定义工件簿类    'Dim xlBook As Excel.Workbook    Set xlBook = xlApp.Workbooks.O

http://hi.baidu.com/liemeng/blog/item/f3848018c047cab44aedbcbf.htmlhttp://www.360doc.com/content/10/0112/15/406571_13347261.shtmlhttp://www.360doc.com/content/10/0318/20/1025014_19300724.shtml

  最近用excel和VB比较多，就简单的学习了一下VB中对Excel的处理。今天就介绍一些吧。    在VB中要想调用Excel，需要打开VB编程环境“工程”菜单中的“引用”项目，并选取项目中的“Microsoft Excel 11.0 object library”项。由于你的Excel版本不同，所以这个选项的版本号也是不同的。    因为EXCEL是以层次结构组织对象的，其对象模型中含有许多不同的对象元素。    第一层：Application对象，即Excel本身；    第二层：workbooks

<br />格式菜单下对锁定控件解锁.

BaseForm'-----'BaseForm'-----'画面初期化Private Sub Form_Load() '磁盘路径 Drive_Path = "D:" '文件夹路径 Dir_Path = "D:" '新旧文件路径 Old_filepath_txt.Text = ""