vb.net 排列組合算法

看了你說(shuō)遞歸的效率低。那么你可以不用的。

阿拉善盟網(wǎng)站制作公司哪家好，找成都創(chuàng)新互聯(lián)！從網(wǎng)頁(yè)設(shè)計(jì)、網(wǎng)站建設(shè)、微信開(kāi)發(fā)、APP開(kāi)發(fā)、響應(yīng)式網(wǎng)站建設(shè)等網(wǎng)站項(xiàng)目制作，到程序開(kāi)發(fā)，運(yùn)營(yíng)維護(hù)。成都創(chuàng)新互聯(lián)從2013年開(kāi)始到現(xiàn)在10年的時(shí)間，我們擁有了豐富的建站經(jīng)驗(yàn)和運(yùn)維經(jīng)驗(yàn)，來(lái)保證我們的工作的順利進(jìn)行。專注于網(wǎng)站建設(shè)就選成都創(chuàng)新互聯(lián)。

給出的方法就是先生成第一個(gè)排列，然后每次調(diào)用下面的函數(shù)給出下一個(gè)排列，這樣生成的效率很高，這個(gè)函數(shù)可以內(nèi)聯(lián)。

這個(gè)是很經(jīng)典的排列組合算法啊？在網(wǎng)上能搜到一大堆。

大概是那種帶指向的移動(dòng)的算法。我給你搜一個(gè)吧。

我找了幾個(gè)，這個(gè)是我覺(jué)得說(shuō)的比較清楚的，你可以仔細(xì)參考一下，看不懂的話再搜點(diǎn)別的好了。。

全排列的算法跟這個(gè)不太一樣的。需要有點(diǎn)改動(dòng)的。

至于語(yǔ)言的話，應(yīng)該不會(huì)有太大問(wèn)題吧。。basic版的確實(shí)比較少，現(xiàn)在我也比較懶不想動(dòng)手寫。。還是要靠你自己啦。

★生成排列的算法：

比如要生成5，4，3，2，1的全排列，首先找出一個(gè)最小的排列12345, 然后依次調(diào)用n!次STL算法中的next_permutation()即可輸出所有的全排列情況。所以這種算法的細(xì)節(jié)就是STL algorithm中next_permutation()的實(shí)現(xiàn)機(jī)制。詳細(xì)的實(shí)現(xiàn)代碼，大伙可以參考侯捷的《STL源代碼剖析》，在這里我只說(shuō)一下我的理解：

1 首先從最尾端開(kāi)始往前尋找兩個(gè)相鄰元素，令第一個(gè)元素為*i,第二個(gè)元素為*ii，且滿足*i*ii，找到這樣一組相鄰的元素后。

2 再?gòu)淖钗捕碎_(kāi)始往前檢驗(yàn)，找出第一個(gè)大于*i的元素，令為*k，將i,k元素對(duì)調(diào)。

3 再將ii及ii之后的所有元素顛倒排列，此即所求之"下一個(gè)"排列。

prev_permutation()算法的思路也基本相同，只不過(guò)它們尋找的"拐點(diǎn)"不同，在next_permutation()算法中尋找的是峰值拐點(diǎn)，而在prev_permutation()算法中尋找的是谷值拐點(diǎn)。另外，在第二步中，prev_permutation()要找的是第一個(gè)小于*i的元素而不是第一個(gè)大于*i的元素。

具體例子，有空再舉，現(xiàn)在時(shí)間太晚了:)

★生成組合的算法：

如下面截圖所示，分全組合和r-組合兩種情況。

這里有一段核心代碼：

//--------------------------------------------------------

// Generate next combination (algorithm from Rosen p. 286)

//--------------------------------------------------------

public int[] getNext () {

if (numLeft.equals (total)) {

numLeft = numLeft.subtract (BigInteger.ONE);

return a;

}

int i = r - 1;

while (a[i] == n - r + i) {

i--;

}

a[i] = a[i] + 1;

for (int j = i + 1; j r; j++) {

a[j] = a[i] + j - i;

}

numLeft = numLeft.subtract (BigInteger.ONE);

return a; //這里返回的a數(shù)組，存儲(chǔ)的就是下標(biāo)的排列組合。

}

到這里，也許大伙會(huì)有一個(gè)疑問(wèn)，假如要求的不是數(shù)字的排列組合，而是字符或字符串的排列組合呢？怎么辦？其實(shí)很簡(jiǎn)單，你只要拿數(shù)組的下標(biāo)來(lái)做排列組合，返回他們下標(biāo)的排列組合，然后再到原數(shù)組中讀取字符串值，就可以輸出全部的排列組合結(jié)果。

vb和vb.net的區(qū)別和特點(diǎn)

1、vb.net ?完全符合面向?qū)ο蟮木幊陶Z(yǔ)言抽象、封裝、繼承的四大特性，而vb不支持繼承。

2、錯(cuò)誤處理不同。

vb中只是On Error.....goto和On Errer Resume Next ，這些錯(cuò)誤稱為非結(jié)構(gòu)化異常處理。而在vb.net中采用的結(jié)構(gòu)化異常處理機(jī)制，try...catch....finally控制。

3、兩者產(chǎn)生的窗體不同。

vb.net 允許創(chuàng)建不同類型的應(yīng)用程序，例如，創(chuàng)建ASP.NET和ASP.NET Web 服務(wù)應(yīng)用程序，還允許創(chuàng)建控制臺(tái)應(yīng)用程序和作為桌面服務(wù)運(yùn)行的應(yīng)用程序。但是vb 只能創(chuàng)建Windows窗體。

4、數(shù)據(jù)庫(kù)訪問(wèn)的差別。

vb6.0是通過(guò)ADO（Active X Data Objext）來(lái)實(shí)現(xiàn)對(duì)數(shù)據(jù)庫(kù)訪問(wèn)。而vb.net 是通過(guò)ADO.NET來(lái)訪問(wèn)數(shù)據(jù)庫(kù)。

擴(kuò)展資料

Visual Basic（簡(jiǎn)稱VB）是Microsoft公司開(kāi)發(fā)的一種通用的基于對(duì)象的程序設(shè)計(jì)語(yǔ)言，為結(jié)構(gòu)化的、模塊化的、面向?qū)ο蟮摹瑓f(xié)助開(kāi)發(fā)環(huán)境的事件驅(qū)動(dòng)為機(jī)制的可視化程序設(shè)計(jì)語(yǔ)言。是一種可用于微軟自家產(chǎn)品開(kāi)發(fā)的語(yǔ)言。

“Visual” 指的是開(kāi)發(fā)圖形用戶界面 (GUI) 的方法——不需編寫大量代碼去描述界面元素的外觀和位置，而只要把預(yù)先建立的對(duì)象add到屏幕上的一點(diǎn)即可。

“Basic”指的是 BASIC (Beginners All-Purpose Symbolic Instruction Code) 語(yǔ)言，是一種在計(jì)算技術(shù)發(fā)展歷史上應(yīng)用得最為廣泛的語(yǔ)言。

Visual Basic源自于BASIC編程語(yǔ)言。VB擁有圖形用戶界面（GUI）和快速應(yīng)用程序開(kāi)發(fā)（RAD）系統(tǒng)，可以輕易的使用DAO、RDO、ADO連接數(shù)據(jù)庫(kù)，或者輕松的創(chuàng)建Active?X控件，用于高效生成類型安全和面向?qū)ο蟮膽?yīng)用程序 。

參考資料：百度百科-Visual Basic

vb.net比較字符串

vb.net規(guī)定如果要比較字符串，不能用“=”，strcomp(str1,str2,n)或者string.compare(str1,str2)

例如：

Dim a As String = "c"

Dim b As String = "c"

Dim n As Integer = String.Compare(a, b)

If n = 0 Then

MsgBox("=")

Else

MsgBox("")

End If

網(wǎng)站名稱：包含vb.netpair的詞條
網(wǎng)址分享：http://www.chinadenli.net/article16/hpihgg.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供商城網(wǎng)站、網(wǎng)站設(shè)計(jì)、網(wǎng)站制作、小程序開(kāi)發(fā)、品牌網(wǎng)站設(shè)計(jì)、App設(shè)計(jì)

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請(qǐng)盡快告知，我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng)，如需處理請(qǐng)聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時(shí)需注明來(lái)源： 創(chuàng)新互聯(lián)