VB6を使用して、例えば「a(0)~a(7)」までの変数と「b(0)~b(7)」までの変数を宣言している時、a(0)~a(7)には元々数値が入っていて、それをb(0)~b(7)に並びを変えて数値を入れるのに簡単な方法はありますか?
例)
a(0)=0 a(1)=1 a(2)=2 ・・・ a(7)=7
b(0)=a(5) b(1)=a(3) b(2)=a(1) ・・・ b(7)=a(2)
などに置き換えたい場合です。
bに入れる数値のa()の並びは一定です。
aに入れるの数値は固定データです。
単純に一つずつ入れてもできるのですが、データが多くて時間がかかるので簡単な方法があれば教えてください。
No.2ベストアンサー
- 回答日時:
とりあえず規則性がないなら、何かしらの方法で一つずつ設定はしなければ仕方ないと思いますが、
Const acNum as string = "3,2,5,4,1,7,6"
dim acData() as string
dim alLoop as long
dim alHairetuNo as long
acData = split(acNum,",")
for alloop = 0 to ubound(acData)
alHairetuNo = cLng(acData(alLoop))
b(alloop) = a(alHairetuNo)
next
Erase acData
acNum の中にカンマ区切りで順番をいれておいて、それをSplitステートメントで配列 acDataの中に読み込みます。
で、あとはFor Next文でくるくる回すと。
こんな感じでどうでしょう?
回答ありがとうございます。
こんな方法があるんですね。
変数が多かったのでずらずら代入するプログラムはあとで見づらくなるかと思い、すっきりした方法を探していました。
おかげでだいぶ見やすいプログラムになりました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) Excel のユーザー定義関数でソルバーが動作しない 1 2022/09/05 19:51
- Excel(エクセル) エクセルのグラフに上下限値の横棒を表示させたい 5 2022/12/12 11:09
- その他(OS) Windowsで大量の画像サイズを半自動で変更する方法 6 2023/02/17 08:45
- 数学 モデルのパラメータの定義がいまいちわかりません。 3 2022/10/11 15:16
- Excel(エクセル) エクセルのフッタやヘッダーについて 3 2023/02/04 09:45
- C言語・C++・C# C言語プログラム変更 2 2022/12/21 15:03
- C言語・C++・C# C言語初心者 ポインタについて、お助けください、、 2 2023/03/15 23:50
- デスクトップパソコン 40年間の悩み キーボードにおいて初期値として漢字ローマ字変換に設定する方法 8 2023/05/08 14:50
- Visual Basic(VBA) EXCEL VBAで教えてください。 1 2022/12/22 04:20
- その他(Microsoft Office) エクセル 日付を数値に変換する方法 4 2023/03/24 12:05
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
ディレクトリ以下のファイル・...
-
リストビューの列ヘッダーの幅...
-
文字列を繰り返して表示する VBA
-
Functionの戻り値を配列にした...
-
VBA public変数はどのようなこ...
-
他のフォームから別のフォーム...
-
C言語のサフィックスについて
-
アクセスできない保護レベルエ...
-
チェックボックスを操作できな...
-
C#のループでtextboxに値を入れ...
-
VB.NETでのイベントの途中終了
-
レコードセットにnullの場合
-
ClickとChangeイベントの違いは...
-
【VB6.0】 あるフォームから他...
-
ExcelのVBAで文章にある複数の...
-
プログラムの素朴な質問です 分...
-
VB6のFriendについて
-
タイムアウトする仕組みを作りたい
-
【HTML、VBScript】HTAアプリケ...
-
一行飛ばしで合計
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
リストビューの列ヘッダーの幅...
-
構造体のコピー
-
共有フォルダの「共有のアクセ...
-
VB6で変数の配置転換
-
VB.netである関数を呼んで、そ...
-
文字列の中からある文字の個数...
-
ディレクトリ以下のファイル・...
-
VBAとVB6.0とC#の速度比較
-
tranlate関数で特定の文字を取...
-
C言語で10行10列の行列式の値を...
-
文字列を繰り返して表示する VBA
-
sublimit textっていうエディタ...
-
エクセルVBAでテキストボッ...
-
VBA public変数はどのようなこ...
-
VBAでcallで呼び出したsubを終...
-
他のフォームから別のフォーム...
-
Functionの戻り値を配列にした...
-
C#のループでtextboxに値を入れ...
-
チェックボックスを操作できな...
-
レコードセットにnullの場合
おすすめ情報