另，為什麼不用最新的控制項？因為，俺用的是正版的好不好？雖然我啥都是用盜版的，不過，老闆布置的工作，東西是給使用者用的，不敢用盜版。老闆也問了，要不要換成最新的？不過，我的知識還停留在vb2005，現在雖然公升級到vs2010，可是可是，我用的還是所有都是2005呀。
1. 在form上新增乙個toolstrip控制項
2. 動態新增選單的**。
a.前提：因為，我做的工具欄的選單項都只有圖示和文字，而且，只有兩類，一類是按鈕，即toolstripbutton，一類是分隔欄，即toolstripseparator
b. 為了讓按鈕有圖示，還要先給form新增乙個imagelist控制項，並把所有用到的圖示放裡面。並用**將其作為toolstrip的圖示列表。
**： otoolstrip.imagelist = ilimagelist
c. 為了讓程式能處理動態新增的按鈕的選擇操作，即click事件，還要先新增乙個過程，因為click事件有兩個引數，你在新增這個過程時，也要包含一樣的引數，因為，你的工具欄通常不可能只有乙個按鈕，所以，可以使用callbyname進行呼叫不同的過程來完成對應的功能，用callbyname時，被呼叫的過程或者函式，要設定成public屬性。直接用select case進行分支也行，看具體情況，此時就只要設定成private。
**：private sub dotoolstripclick(byval sender as object, byval e as system.eventargs)
dim otsitem as toolstripitem = sender
callbyname(me, "do" & otsitem.name, calltype.method, nothing)
end sub
d.新增按鈕的**，要注意的是，imagekey指定imagelist裡面的圖示時，要用圖示的全名，即包含副檔名：
dim otsbutton as toolstripbutton
otsbutton = new toolstripbutton
with otsbutton
.name = "first"
.imagekey = "first.bmp"
.text = "first"
.displaystyle = toolstripitemdisplaystyle.imageandtext
end with
addhandler otsbutton.click, addressof testit
otoolstrip.items.add(otsbutton)
e.新增分隔欄的**：
dim otsseperator as toolstripseparator
otsseperator = new toolstripseparator
otoolstrip.items.add(otsseperator)
隨機雜湊的實現（VB2005）
編寫過程式的人都知道，隨機雜湊是我們經常要實現的問題。什麼是隨機雜湊？比方說，現在有乙個數列1 2 3 4 5 6。我希望得到乙個隨機的打亂順序的數列，例如 2，5，6，3，4，1。這個新的數列就是原數列的隨機雜湊。實際情況中，我們經常需要給定乙個範圍，就能得到乙個隨機雜湊。比方說 給定 2，7 通...
遍歷組合的實現 VB2005
在數學的統計分支裡，排列與組合是乙個很重要的分支。在各種實際應用中，排列與組合也扮演了重要的角色。舉例來說，安排人員參加活動可以看作是組合的應用。比方說，現在有十個人，選出其中的五個人參加某項集體活動。由於彼此之間有著脾氣性格等因素，所以，不同的人員組合有著不同的工作效率。現在，要求你找出效率最高的...
遍歷組合的實現 VB2005
在數學的統計分支裡，排列與組合是乙個很重要的分支。在各種實際應用中，排列與組合也扮演了重要的角色。舉例來說，安排人員參加活動可以看作是組合的應用。比方說，現在有十個人，選出其中的五個人參加某項集體活動。由於彼此之間有著脾氣性格等因素，所以，不同的人員組合有著不同的工作效率。現在，要求你找出效率最高的...