24h購物| | PChome| 登入
Hsien 的留言板
趴趴
留言主題:無主題
還有阿 。。

我要那個迴圈、for那三個的

老師今天新講的那些 = .. =
| 2007-12-14 23:14:56
趴趴
留言主題:無主題
下面那個是九九乘法的吼?

別刪掉嘿!有空再抄…
| 2007-12-14 23:13:36
阿顯
留言主題:無主題
Private Sub Command1_Click()

For i = 1 To 3 Step 1
For j = 1 To 9
Text1.Text = Text1.Text & i & " * " & j & "=" & i * j & vbTab
Next j
Next i
Text1.Text = Text1.Text & vbCrLf

For i = 4 To 6 Step 1
For j = 1 To 9
Text1.Text = Text1.Text & i & " * " & j & "=" & i * j & vbTab
Next j
Next i
Text1.Text = Text1.Text & vbCrLf

For i = 7 To 9 Step 1
For j = 1 To 9
Text1.Text = Text1.Text & i & " * " & j & "=" & i * j & vbTab
Next j
Next i
Text1.Text = Text1.Text & vbCrLf



End Sub

Private Sub Command2_Click()
End
End Sub



Private Sub Text1_Change()
For i = 1 To 9 Step 1
For j = 1 To 9
Print i; "*"; j; "="; i * j
Next j
Next i
End Sub
| 2007-12-14 09:08:43
趴趴
留言主題:無主題
吳尊好帥
吳尊好帥
吳尊好帥 .

原來你早已偷偷暗戀他了 !!!
| 2007-11-04 00:55:45
台長回應
你現在才知道哦一.一


不行哦 = =
2007-11-04 15:35:38
趴趴
留言主題:無主題
哈哈哈哈哈
好久沒來我的地盤了 = =

程式碼好討厭
不好玩不好玩
臭VB
| 2007-11-03 22:40:16
台長回應
.............................

ㄏㄏㄏ
還可以拉= =
加油芭
2007-11-03 22:44:02
000
留言主題:無主題
Dim ss, mm, hh As Integer
Dim flag As Integer

Private Sub Command1_Click()
If flag = 1 Then
Timer1.Enabled = True
flag = 0
Command1.Caption = "暫停"
Else
Timer1.Enabled = False
flag = 1
Command1.Caption = "開始"

End If
End Sub


Private Sub Form_Load()

flag = 1
Timer1.Enabled = False
ss = 0
mm = 0
hh = 0

End Sub


Private Sub Timer1_Timer()
ss = ss + 1
If ss >= 60 Then
mm = mm + 1
ss = 0
End If

If mm >= 60 Then
hh = hh + 1
mm = 0
End If

If hh >= 24 Then
hh = 0
mm = 0
End If
Label1.Caption = hh & ":" & mm & ":" & ss

End Sub
| 2007-10-19 09:31:06
000
留言主題:無主題
Private Sub Form_Load()

a = InputBox("")
a = Val(a)
Select Case a
Case Is < 30000
Print a * 0.06
Case 30000 To 80000
Print a * 0.08
Case 80000 To 150000
Print a * 0.01
Case Is > 150000
Print a * 0.3
End Select

End Sub
| 2007-10-19 09:08:53
阿顯
留言主題:無主題
Private Sub Form_Load()
s = 0

b = InputBox("輸入成績:")
b = Val(b)
a = 1
aa:
If a
| 2007-10-05 08:46:46
Music bear
留言主題:無主題
你好啊!!!
| 2007-08-21 10:00:16
台長回應
嗨~~^^
2007-08-21 19:07:55
笨蛋
留言主題:無主題
回訪 :)
﹉﹉﹉﹉
情人節
﹉﹉﹉
快樂快樂
﹉﹉﹉﹉
| 2007-08-19 12:09:13
台長回應
謝謝^^

情人節快樂 !!
2007-08-20 00:51:48
^如阿咩_☺
留言主題:無主題
簽 :)
| 2007-08-14 08:57:16
台長回應
謝謝妳唷

^^
2007-08-14 17:01:55
亦然
留言主題:無主題
哈哈~
多謝誇獎=ˇ=
| 2007-08-12 14:07:59
台長回應
呵呵

^^
2007-08-12 14:26:58
趴趴
留言主題:無主題
回訪 ,

ㄏㄚˊ臭光溜溜
一.一
| 2007-08-12 12:16:23
台長回應
...................


不臭= =
2007-08-12 14:27:08
亦然
留言主題:無主題
來訪。

先下手氣勢,後下手觀察=ˇ=
| 2007-08-12 00:33:16
台長回應
呵呵

酷噢
2007-08-12 05:29:48
戀薰-☆
留言主題:無主題
回訪??請問你是??
| 2007-08-11 22:08:47
台長回應
^^

路人甲一.一
2007-08-12 05:29:30
Music bear
留言主題:無主題
簽名噢~

簽名噢~
| 2007-08-10 17:20:47
台長回應
^^
2007-08-12 05:28:51

     較舊 >>
我要留言
是 (若未登入"個人新聞台帳號"則看不到回覆唷!)
* 請輸入識別碼:
請輸入圖片中算式的結果(可能為0) 
(有*為必填)
TOP