|
▼ふうか さん:
>neptuneさんすいません
>教えて頂いたサンプルを試したのですがブレイクしながら実行するのは問題ないのですが、通常で実行すると途中で止まってしまったので改めて加算部分だけで考えようと思い再投稿したのです。
>
>前に教えて頂いた物で「Staticは保持変数」「Callはプロシージャの呼び出し」ってのは理解できたんですが、私の使い方?考え方?が微妙だと思うのですが出来ませんでした。
>
>なので教えて頂いたサンプルでもまだ私なりに色々使って試させてもらってますが
>その他に方法があるのか?と思っての再投稿でした。
>
>なにぶん始めたばかりで本当に基礎構文を続けて書く位しか出来なく応用して使うのが全然出来なく重複した質問すいませんでした、もう少し自分で考えて分からない事が明確になった時に改めて投稿させて頂きます。
数字を繰り返すと言うならこんなのでも
Private Sub CommandButton1_Click()
'繰り返しの最大番号
Const clngRepetition As Long = 4
Static lngCount As Long
'繰り返す数字を作成
lngCount = lngCount Mod clngRepetition + 1
'TextBox1に代入
TextBox1.Text = lngCount
End Sub
|
|