VBレスキュー(花ちゃん)の Visual Basic 6.0用掲示板

タイトル： Re: 計算結果を表示

投稿日： 2008/02/05(Tue) 18:21

投稿者： 花ちゃん

> Private Sub Form_Click()
> Dim i As Single
> Dim q1 As Single
> Dim q As Single
>
> Do While i <= 1000
> q1 = q + 1
この場合、q1 はいくつになっていますか？

> Text1.Text = "q1"

q1 は文字列ですか？　　変数ですか？

> q1 = q

ここで、q1 はいくつになりますか？

>
> i = i + 1
> Loop
> End Sub

F8 キーを押して1行づつ実行して、計算の結果がどうなるか確認して見て下さい。

一度下記を試して見て下さい。
Private Sub Command1_Click()
   Dim Total As Integer
   Dim i     As Long
   For i = 1 To 10
      Total = Total + i
      Debug.Print Total
   Next i
End Sub

- 関連一覧ツリー （

をクリックするとツリー全体を一括表示します）

計算結果を表示

mae

No.11334

Re: 計算結果を表示 - 花ちゃん 08/02/05-18:21 No.11335
- Re^2: 計算結果を表示 - mae 08/02/05-20:10 No.11338
  - Re^3: 計算結果を表示 - しんご 08/02/06-01:12 No.11340
    - Re^4: 計算結果を表示 - mae 08/02/08-23:11 No.11367

タイトル	： Re: 計算結果を表示
投稿日	： 2008/02/05(Tue) 18:21
投稿者	：花ちゃん

古いスレッドにレスはつけられません。