0

More than 5 years have passed since last update.

@ohisama@github

vbsの作法その8

Posted at 2018-11-17

概要

vbsの作法、調べてみた。
fizzbuzzやってみた。

写真

サンプルコード

Dim i
Dim str
str = ""
For i = 1 To 100
    If i Mod 15 = 0 Then
        str = str & "FizzBuzz "
    ElseIf i Mod 3 = 0 Then
        str = str &  "Fizz "
    ElseIf i Mod 5 = 0 Then
        str = str &  "Buzz "
    Else
        str = str & CStr(i) & " "
    End If
Next
msgbox str

以上。

0

Register as a new user and use Qiita more conveniently

You get articles that match your needs
You can efficiently read back useful information
You can use dark theme

What you can do with signing up

0