[ExcelVBA] String関数

>Blog Top Page >[ExcelVBA] Top Page >[ExcelVBA] 関数一覧

■構文
String(number, character)

■説明
指定した文字を指定した回数繰り返します。
第一引数：繰り返す回数を指定します。
第二引数：繰り返す文字を指定します。

■サンプルコード

view plainprint?

1. Option Explicit  
2.   
3. Sub SampleCode()  
4.     Dim i As Integer  
5.     For i = 0 To 5  
6.         Debug.Print "(" & i & ")" & String(i, "★") & String(5 - i, "☆")  
7.     Next  
8. End Sub  

Option Explicit

Sub SampleCode()
    Dim i As Integer
    For i = 0 To 5
        Debug.Print "(" & i & ")" & String(i, "★") & String(5 - i, "☆")
    Next
End Sub

>Blog Top Page >[ExcelVBA] Top Page >[ExcelVBA] 関数一覧