public function createstringarr() as string()
成都創(chuàng)新互聯(lián)公司是一家集網(wǎng)站建設(shè),鄞州企業(yè)網(wǎng)站建設(shè),鄞州品牌網(wǎng)站建設(shè),網(wǎng)站定制,鄞州網(wǎng)站建設(shè)報價,網(wǎng)絡(luò)營銷,網(wǎng)絡(luò)優(yōu)化,鄞州網(wǎng)站推廣為一體的創(chuàng)新建站企業(yè),幫助傳統(tǒng)企業(yè)提升企業(yè)形象加強(qiáng)企業(yè)競爭力。可充分滿足這一群體相比中小企業(yè)更為豐富、高端、多元的互聯(lián)網(wǎng)需求。同時我們時刻保持專業(yè)、時尚、前沿,時刻以成就客戶成長自我,堅持不斷學(xué)習(xí)、思考、沉淀、凈化自己,讓我們?yōu)楦嗟钠髽I(yè)打造出實用型網(wǎng)站。
return new string(){"d1","d2","d3","d4"}
end function
1、利用公式求出Y值 第一列設(shè)置表頭為x,下面依次填入取值, 比如 x 1 2 3 4 ...... 第二例表頭設(shè)置為y,在下面表格中填入計算公式 如 =2*x+1 然后選中點右下角的十字型標(biāo)記,拖下去,和前面x數(shù)量一致。 2、然后選中數(shù)據(jù)源(即選中要進(jìn)行操作的數(shù)據(jù)區(qū)域,這里指XY值所在區(qū)域。) 3、執(zhí)行菜單命令插入——圖表——XY散點圖 執(zhí)行命令,打開圖表向?qū)υ捒蜻xXY散點圖--選平滑線散點圖--完成 最后使用圖表向?qū)г跈M坐標(biāo)填入x值,縱坐標(biāo)填入y值,生成圖即可 將一次函數(shù)的Y列用公式編輯出來,分別填寫出當(dāng)取不同的X值時得到不的函數(shù)值,選擇函數(shù)值所在列,插入——圖表按提示操作。執(zhí)行菜單命令 執(zhí)行菜單命令
首先在窗體上添加Button1,ListBox1,下面是完整代碼
Public?Class?Form1
Public?Sub?BubbleSort(ByVal?arr()?As?Integer)?'冒泡法排序
Dim?temp?As?Double
Dim?i,?j?As?Integer
For?i?=?0?To?arr.GetUpperBound(0)?-?1
For?j?=?i?+?1?To?arr.GetUpperBound(0)?-?1
If?arr(i)??arr(j)?Then
temp?=?arr(j)
arr(j)?=?arr(i)
arr(i)?=?temp
End?If
Next
Next
End?Sub
Private?Sub?Button1_Click(ByVal?sender?As?System.Object,?ByVal?e?As?System.EventArgs)?Handles?Button1.Click?'調(diào)用
Dim?arr()?As?Integer?=?{55,?22,?33,?11,?77,?88}
BubbleSort(arr)?'調(diào)用排序過程
Me.ListBox1.Items.Clear()
For?i?=?0?To?arr.GetUpperBound(0)?-?1?'顯示排序后結(jié)果
Me.ListBox1.Items.Add(arr(i).ToString)
Next
End?Sub
End?Class