01 2015 档案

摘要:1 Public Sub Igor() 2 Dim Dtsheet As Excel.Worksheet 3 Dim TotalC As Long '原始数据范围列 4 Dim TotalR As Long ... 阅读全文
posted @ 2015-01-22 14:15 zengzongfa 阅读(1064) 评论(0) 推荐(0)
摘要:1.往组合框添加条目1 With Me .ComboBox1.Items2 .Add( "Ports" )3 .Add( "Igor" )4 End With2.文本框Select Case 1 Private Su... 阅读全文
posted @ 2015-01-13 15:47 zengzongfa 阅读(243) 评论(0) 推荐(0)