VB的LISTBOX的LIST屬性怎么進(jìn)行選擇排序和冒泡排序?
boss用doubl
VBA和VB有什么區(qū)別?
VBA是VB的子集,也可以說是VB的簡(jiǎn)化版。
1.VB應(yīng)用程序編譯后可以直接在系統(tǒng)下運(yùn)行,而VBA不能在offic
vb20個(gè)100以內(nèi)的隨機(jī)整數(shù)圍成一圈,找出每四個(gè)相鄰數(shù)之和中的最大值,并指出是哪四個(gè)相鄰的數(shù)?
Dimay(20)private子命令1_click()text1fori0to19ay(I)int(rnd*100)text1text1ay(I)nextiendprivate子命令2_click()隨機(jī)數(shù)并不總是相鄰的。先只列出最大的四個(gè)數(shù)字Text2Text3,用泡沫排序法排序fori19to1step-1forj0toi-1fay(j)ay(j1)然后myay(j1)ay(j1)ay(j)ay(j)myendifnextjnextitext2ay(19)。forx16to19text3text3ay(x)NextxEndsubprivatesubcommand3_Click()text1text2text3label1Endsubprivatesubcommand4_Click()Endsub