看别人写的文件分割工具挺好用,也学着写了一个,附源代码。(5) Begin VB.OptionButton optSplit Caption = "分割" Height = 255 Left = 240 TabIndex = 8 Top = 240 Value = -1 'True Width = 1305 End End Begin VB.CommandButton cmdFind Caption = "选择文件夹" Height = 345 Left = 2550 TabIndex = 6 Top = 1170 Width = 1125