4 lines
129 B
VB.net
4 lines
129 B
VB.net
|
Public Function StrRepeat(sText As String, n As Integer) As String
|
||
|
|
StrRepeat = Replace(String(n, "*"), "*", sText)
|
||
|
|
End Function
|