留言
阿三的創意空間園地
2會員
45內容數
這是我的創新與創意的發想地，素材來自於我對自然、人文、歷史、地理、時事的感想，與我所學習的器，所謂的"器"，我的"器"即是我學習而成能使用的資源與工具，將我的想法轉變成實際能應用的工具，將在這裡開始~
阿三的創意空間園地的其他內容
2024/10/31
Private Sub Command1_Click()
If Option3(0).Value = True Then
Text1.FontSize = 10
End If
If Option3(1).Value =
2024/10/31
Private Sub Command1_Click()
If Option3(0).Value = True Then
Text1.FontSize = 10
End If
If Option3(1).Value =
2024/10/19
Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
Const theScr
2024/10/19
Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
Const theScr
2024/10/13
Public Function mycir(r As Single) As Single
Const pi = 3.14
mycir = pi + r ^ 2
End Function
Private Sub Command1_Click()
Dim bj As Singl
2024/10/13
Public Function mycir(r As Single) As Single
Const pi = 3.14
mycir = pi + r ^ 2
End Function
Private Sub Command1_Click()
Dim bj As Singl