□投稿者/ ユーセレクト (2回)-(2020/06/23(Tue) 20:22:01)
|
分類:[.NET 全般]
VB初心者です。
昇順でループ処理を下記のコードでやりたいのですがアドバイスお願いいたします。
Dim ｘ AS Integer
ｘ ＝ 1
Dim ｙ AS Integer
ｙ ＝ 2
Dim ｚ AS Integer
ｚ ＝ 3
Dim a AS Integer
Dim b AS Integer
Dim c AS Integer
If x<y then
a = y
b = x
else
a = x
b = y
If a<z then
Listbox.Item.Add(z)
c = a
else
Listbox.Item.Add(a)
c = z
If b>c Then
Listbox.Item.Add(b)
Listbox.Item.Add(c)
else
Listbox.Item.Add(c)
Listbox.Item.Add(b)
|
|
