掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
高速文字列連結 (ID:85030)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
今現在はこうなっています。 With ProgressBar1 .Min = 0 .Max = lngSize strConve = Space$(lngSize) For i = 0 To lngSize Step 1 Mid$(strConve, i + 1, 1) = Chr$(bytArray(i)) .Value = i Label5.Caption = Format(i, "#,###,###") & "/" _ & Format(lngSize, "#,###,###") & "[" _ & Format(Int((i / lngSize) * 100), "@@@") & "%]" DoEvents Next i End With Debug.Print strConve
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.