用VB编程过程中遇到很多问题，请高手帮忙解决
问题：
要将一些管子装到箱子里。管子已给出内外径，有相同的也有不同的。箱子只有一种规格，已给出长宽。使管子装箱方案最优化。管间距已给出、可以大管套小管、不考虑管长及箱子的高度。

我的解决方法是：
建立两个子函数：函数1----根据箱的短边尺寸（可以连续调用）选出大管放到箱中。函数2----根据大管内径及管间距选出最合适的小管套入大管中（使大管内径与所选次小管外径及间距差值最小）。
然后循环调用函数1和函数2，同时输出箱中的管子布置。
我遇到的问题很多，比如：读入数据（文本文件数据）、函数的调用等等。

请高手写出程序。先谢了