◆VB初心者質問スレ Part5
レス数が950を超えています。1000を超えると書き込みができなくなります。
0976デフォルトの名無しさん
NGNGPrivate mlngCount As Long
Private Sub Form_Load()
Timer1.Interval=1000
Timer1.Enabled=True
End Sub
Private Sub Timer1_Timer()
mlngCount=mlngCount+1
if mlngCount >= 26 Then Exit Sub
Debug.Print Chr$(64+mlngCount)
End Sub
レス数が950を超えています。1000を超えると書き込みができなくなります。