オススメ商品ズ

Amazon

  • 鋼の錬金術師(12) 初回限定特装版(\600)
  • コミックスペシャルカレンダー2006 鋼の錬金術師(\2,000)
  • テイルズ オブ ジ アビス 特典 10周年記念ファンディスク テイルズ オブ ファンダム 外伝DVD付(\6,069/\1,071OFF)
  • 機動戦士ガンダムSEED 連合VS.Z.A.F.T 特典 プレイヤーズリファレンスブック付き(\6,069/\1,071OFF)


    • ネットでできる友達の輪     		Click Here!
    日本ファンド
    最短３時間でご融資可能かメールでお答えします。

    スイートボートブログ管理人のブログ     		Click Here!
    月額125円からのレンタルサーバ 　
    Click Here!
    ★可愛いレンタルサーバLOLIPOP!     		Click Here!
    バイクの無料出張買取なら バイク王
    ■掲示板に戻る■ 全部 1- 101- 201- 301- 401- 501- 601- 701- 801- 901- 最新50


    レス数が1000を超えています。残念ながら全部は表示しません。
    どんなくだらねぇ質問にもマジレスするスレPart16

    114 ：名無しさん(ザコ)：2008/03/31(月) 12:37:56 ID:HYbGB9lQ0
    直すならこうかな。
    初めのループ内でアイテム名を取得した直後に削除しちゃうと、
    アイテムの番号がズレるんだろう。

    For i = 1 To カウント数
    　アイテム名 = Item(未装備,i)
    　Set 配列A[i] アイテム名
    Next
    For i = 1 To カウント数
    　RemoveItem 配列A[i]
    Next
    #アイテム番号１番からn番までのアイテム名を格納
    #アイテム名を格納したらそのアイテムを一時的に削除

    Return

    Item再入手:
    For i = 1 To カウント数
    　Item 配列A[i]
    Next
    #配列Aに格納されたアイテムを全て再入手
    Return

    221KB
    掲示板に戻る 全部 前100 次100 最新50

    0ch BBS 2005-06-05