建站
咨詢
售后
建站咨詢
新聞中心
vb.net中,如何實現(xiàn)鼠標在listbox控件上移動時,鼠標所到的條目背景變黑、字變白；移開后還原?
復(fù)雜的不會，來點兒簡單的，借用在listbox里按下鼠標時再移動，會高亮顯示選擇行，并且會隨鼠標移動而變化的這一特點改進的，不足之處是在listbox里，此時處于鼠標左鍵在按下狀態(tài)。
成都網(wǎng)站建設(shè)、網(wǎng)站制作介紹好的網(wǎng)站是理念、設(shè)計和技術(shù)的結(jié)合。創(chuàng)新互聯(lián)擁有的網(wǎng)站設(shè)計理念、多方位的設(shè)計風格、經(jīng)驗豐富的設(shè)計團隊。提供PC端+手機端網(wǎng)站建設(shè)，用營銷思維進行網(wǎng)站設(shè)計、采用先進技術(shù)開源代碼、注重用戶體驗與SEO基礎(chǔ)，將技術(shù)與創(chuàng)意整合到網(wǎng)站之中，以契合客戶的方式做到創(chuàng)意性的視覺化效果。
Declare Sub mouse_event Lib "user32" (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long)
Public Const MOUSEEVENTF_LEFTDOWN = H2 '模擬鼠標左鍵按下
Private Sub ListBox1_MouseMove(sender As Object, e As MouseEventArgs) Handles ListBox1.MouseMove
mouse_event(MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0)
End Sub
vb.net 排列組合算法
看了你說遞歸的效率低。那么你可以不用的。
給出的方法就是先生成第一個排列，然后每次調(diào)用下面的函數(shù)給出下一個排列，這樣生成的效率很高，這個函數(shù)可以內(nèi)聯(lián)。
這個是很經(jīng)典的排列組合算法啊？在網(wǎng)上能搜到一大堆。
大概是那種帶指向的移動的算法。我給你搜一個吧。
我找了幾個，這個是我覺得說的比較清楚的，你可以仔細參考一下，看不懂的話再搜點別的好了。。
全排列的算法跟這個不太一樣的。需要有點改動的。
至于語言的話，應(yīng)該不會有太大問題吧。。basic版的確實比較少，現(xiàn)在我也比較懶不想動手寫。。還是要靠你自己啦。
★生成排列的算法：
比如要生成5，4，3，2，1的全排列，首先找出一個最小的排列12345, 然后依次調(diào)用n!次STL算法中的next_permutation()即可輸出所有的全排列情況。所以這種算法的細節(jié)就是STL algorithm中next_permutation()的實現(xiàn)機制。詳細的實現(xiàn)代碼，大伙可以參考侯捷的《STL源代碼剖析》，在這里我只說一下我的理解：
1 首先從最尾端開始往前尋找兩個相鄰元素，令第一個元素為*i,第二個元素為*ii，且滿足*i*ii，找到這樣一組相鄰的元素后。
2 再從最尾端開始往前檢驗，找出第一個大于*i的元素，令為*k，將i,k元素對調(diào)。
3 再將ii及ii之后的所有元素顛倒排列，此即所求之"下一個"排列。
prev_permutation()算法的思路也基本相同，只不過它們尋找的"拐點"不同，在next_permutation()算法中尋找的是峰值拐點，而在prev_permutation()算法中尋找的是谷值拐點。另外，在第二步中，prev_permutation()要找的是第一個小于*i的元素而不是第一個大于*i的元素。
具體例子，有空再舉，現(xiàn)在時間太晚了:)
★生成組合的算法：
如下面截圖所示，分全組合和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ù)組，存儲的就是下標的排列組合。
}
到這里，也許大伙會有一個疑問，假如要求的不是數(shù)字的排列組合，而是字符或字符串的排列組合呢？怎么辦？其實很簡單，你只要拿數(shù)組的下標來做排列組合，返回他們下標的排列組合，然后再到原數(shù)組中讀取字符串值，就可以輸出全部的排列組合結(jié)果。
VB.net編寫一個控制臺應(yīng)用程序用來從鍵盤上輸入兩個數(shù)然后輸出這兩個數(shù)的和差積商
應(yīng)該定義為double或者single，string類好像不能進行運算。我簡單說一下控制臺的方法，你要一次性輸入和差積商，首先聲明兩個變量用來儲存兩個數(shù)，然后用算法一次性輸出結(jié)果就ok。
Sub Main()
Dim FN As Single
Dim SN As Single
Dim ResultNum As Single
Console.WriteLine("請輸入第一個數(shù)") : FN = Console.ReadLine
Console.WriteLine("請輸入第二個數(shù)") : SN = Console.ReadLine
ResultNum = FN + SN
Console.WriteLine("它們的和: " ResultNum)
ResultNum = FN - SN
Console.WriteLine("它們的差: " ResultNum)
ResultNum = FN * SN
Console.WriteLine("它們的積: " ResultNum)
ResultNum = FN / SN
Console.WriteLine("它們的商: " ResultNum)
Console.ReadLine()
End Sub
vb.net窗體繪圖問題，F(xiàn)orm的Resize事件不能調(diào)用以下過程，求解！謝謝
沒有問題，可以執(zhí)行，您是想做下數(shù)獨嗎？好像是數(shù)獨表格，哈哈
跪求vb.net代碼
新建窗口，添加picture控件
利用line()方法畫線
line(開始x坐標,開始y坐標)-(結(jié)束x坐標,結(jié)束y坐標),線的顏色，畫線的方式(默認為線，B為矩形無填充，BF為填充的矩形)
For i = 1 To 16
Picture1.Line (0, Picture1.Height / 2)-(i * (Picture1.Width / 16), 0), RGB(255, 0, 0)
Picture1.Line (0, Picture1.Height / 2)-(i * (Picture1.Width / 16), Picture1.Height), RGB(255, 0, 0)
Picture1.Line (Picture1.Width, Picture1.Height / 2)-(i * (Picture1.Width / 16), 0), RGB(0, 255, 0)
Picture1.Line (Picture1.Width, Picture1.Height / 2)-(i * (Picture1.Width / 16), Picture1.Height), RGB(0, 255, 0)
Next i
如果要在窗口上畫也可以調(diào)用窗口的line方法即form.line()
分享文章：vb.net數(shù)獨 數(shù)獨c語言程序
分享鏈接：http://www.ef60e0e.cn/article/hhccio.html
