看别人写的文件分割工具挺好用,也学着写了一个,附源代码。(14) cmbSplitSize.ItemData(2) = 800000 cmbSplitSize.AddItem "0.6M" cmbSplitSize.ItemData(3) = 600000 cmbSplitSize.AddItem "0.3M" cmbSplitSize.ItemData(4) = 400000 cmbSplitSize.AddItem "0.1M" cmbSplitSize.ItemData(5) = 100000 cmbSplitSize.ListIndex = 1End Sub
Private Sub optSplit_Click() cmdStart.Enabled = True cmbSplitSize.Enabled = True cmdOk.Enabled = FalseEnd Sub
Private Sub optUnit_Click() cmdStart.Enabled = False cmbSplitSize.Enabled = False cmdOk.Enabled = TrueEnd Sub