C# と VB.NET の質問掲示板

ASP.NET、C++/CLI、Java 何でもどうぞ

C# と VB.NET の入門サイト

昇順

[トピック内 5 記事 (1 - 5 表示)]  << 0 >>

■95108 / inTopicNo.1)  昇順
  
□投稿者/ ユーセレクト (2回)-(2020/06/23(Tue) 20:22:01)

分類:[.NET 全般] 

VB初心者です。
昇順でループ処理を下記のコードでやりたいのですがアドバイスお願いいたします。
Dim x AS Integer
x = 1
Dim y AS Integer
y = 2
Dim z AS Integer
z = 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)
引用返信 編集キー/
■95109 / inTopicNo.2)  Re[1]: 昇順
□投稿者/ 774RR (796回)-(2020/06/24(Wed) 07:23:05)
# 詳しく見てないけど
要素が x y z の3個から4個へ、あるいは5個6個100000000個に増えたら、
現コードでは破綻するのわかってるよね?
要するにこの手のソート処理は個別変数ですることはまずなくて、配列やリストでするもので、
だったら処理系が最初から用意しているソートルーチンを呼ぶのが手っ取り早いし、
学習目的であっても「***ソート」なアルゴリズムを実装するのが普通っす。

引用返信 編集キー/
■95112 / inTopicNo.3)  Re[1]: 昇順
□投稿者/ furu (56回)-(2020/06/24(Wed) 09:44:19)
No95108 (ユーセレクト さん) に返信
いろいろ問題ありますが
大きな点を2つ

> 昇順で
降順になってます。

> ループ処理を
ループがありません。
引用返信 編集キー/
■95126 / inTopicNo.4)  Re[2]: 昇順
□投稿者/ ユーセレクト (3回)-(2020/06/24(Wed) 19:58:13)
VB初心者です。
昇順で下記のコードでループ処理を行いたいのですがどこで
行えばいいですか?

Dim x AS Integer
x = 1
Dim y AS Integer
y = 2
Dim z AS Integer
z = 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)
引用返信 編集キー/
■95130 / inTopicNo.5)  Re[3]: 昇順
□投稿者/ 774RR (797回)-(2020/06/24(Wed) 21:30:11)
https://teratail.com/questions/272324
でも似たようなことしている人がいるけど質疑応答以前の段階だね

ループでソートがしたいのなら配列等、ループに適した構造を用意しないと困難なわけよ。
引用返信 編集キー/

このトピックをツリーで一括表示


トピック内ページ移動 / << 0 >>

このトピックに書きこむ