Sub TestProcedure(); Dim MyNumber As Integer; On Error GoTo 1 'Redisplay InputBox; 1: MyNumber = 0 'Initialize variable ...
確定! 回上一頁