Android Question VBA String Function equivalent?

String(10, "D")

Sub MakeString(Num As Int, Chars As String) As String
    Dim s As StringBuilder
    s.Initialize
    For i = 1 To Num
        s.Append(Chars)
    Next
    Return s.ToString
End Sub

Sub DoString(Num as int,Character as String) as string
  ' 100 space
  Dim S As String = "                                                                                                   "
  'S= S & S & S & S & S & S & S & S    ' Make S * 8
  return s.substring2(0,Num).Replace(" ",Character)
End Sub