下载地址：
下载地址1（本站为飞网专业下载站，域名：down.cfei.net）
资源简介：
VB，读EXCEL。转，不是本人编写的！在vb读取excel中的数据并在窗体上显示Public ExcelTable As Workbook 'excel 工作表对象Private TextBoxA() As Control '以编辑框为基础动态构造数据网格Private FormWidth As Integer '窗体宽度'以下子程序是用来建立数据网格Sub CreateGrid(No, Data) For i = 1 To CInt(UBound(Data, 1)) For j = 1 To CInt(UBound(Data, 2)) Set a = Form1.Controls.Add("VB.TextBox", "textbox" & CStr(i) & CStr(j) & CStr(No)) ReDim TextBoxA(1 To i, 1 To j) '重新定义动态数组！ Set TextBoxA(i, j) = a With TextBox
飞网下载站，免费下载共享资料，内容涉及教育资源、专业资料、IT资源、娱乐生活、经济管理、办公文书、游戏资料等。
