SELECT - Basicsoftのうぃき

tegerDim f As IntegerFor x = 1 To 1000 w = Int(Rnd(6) + 1)Select Case wCase 1 a = a + 1 Case 2 b = b + 1 Case 3 c = c + 1 Case 4 d = d + 1 C

更新日：2019-04-13 09:40:54