VB 麻煩把A矩陣改成下三角型顯示,B上三角型顯示
VB 麻煩把A矩陣改成下三角型顯示,B上三角型顯示
Private Sub Command1_Click()
Dim a(4, 4) As Integer
Dim i As Integer, j As Integer
For i = 1 To 4
For j = 1 To 4
a(i, j) = Int(Rnd * 41 + 30)
Print a(i, j);
Next j
Print
Next i
Print
Dim b(4, 4) As Integer
For i = 1 To 4
For j = 1 To 4
b(i, j) = Int(Rnd * 34 + 101)
Print b(i, j);
Next j
Print
Next i
Private Sub Command1_Click()
Dim a(4, 4) As Integer
Dim i As Integer, j As Integer
For i = 1 To 4
For j = 1 To 4
a(i, j) = Int(Rnd * 41 + 30)
Print a(i, j);
Next j
Next i
Dim b(4, 4) As Integer
For i = 1 To 4
For j = 1 To 4
b(i, j) = Int(Rnd * 34 + 101)
Print b(i, j);
Next j
Next i
其他人氣：389 ℃時間：2020-03-19 17:11:59
優(yōu)質解答
Private Sub Command1_Click()Dim a(4,4) As IntegerDim i As Integer,j As IntegerFor i = 1 To 4For j = i To 4a(i,j) = Int(Rnd * 41 + 30)Print a(i,j);Next jPrintNext iPrintDim b(4,4) As IntegerFor i = 1 T...
我來回答
類似推薦
猜你喜歡
- 1不等式2cosx>1的解集
- 2照樣子寫詞語 氣喘吁吁 __
- 3小學語文詞語解釋第五課中的硬說如何解釋
- 4如果甲乙兩數的最大公因數為144,他們的最小公倍數是36,這兩個數是幾?
- 5測定某液態(tài)鹵代烴RX（R是烷烴基,X是某鹵素原子）相對分子質量的放法
- 6在括號里填上帶 美 的詞語 雄壯的美麗 叫 （ ） 清秀美麗叫（?。【旅篮玫拿溃ǎ ∪A貴美麗叫（）
- 7All students have to face their own problems when they are growing up.
- 8滑動摩擦力總是阻礙物體運動
- 9incident,accident,event,affair 和 business的用法區(qū)別?
- 10衛(wèi)星在離月球較遠的圓軌道上運行時,與月球距離為h1,離較近的距離為h2,月球半徑為r,求衛(wèi)星在距離h1,h2軌道上運行的動能之比
- 11有一次數學比賽,王平和小方做題比是3:2,王平比小方多做2題,王平和小方各做多少道題?
- 12If you are stressd out and angry you should eat more( )