急用，问问高手！如何用函数输入8个字符"a"?

Question

我知道输入8个空格可以用，space(8),但是如果我要8个连在一起的"a"呢？应该用什么函数完成？求教。

Answer 1

Dim a As String
a = String(8, "a")

Answer 2

Dim a As String
a = String(8, "a")

Answer 3

来晚了。
蹭分吧。 
String 可以的，建议楼主看看 MSDN 在 Space 里的 参见 链接里是有 String() 的。

Answer 4

Dim a As String
a = String(8, "a")

Answer 5

我的代码如下：
Private Sub Form_Load()   '第1种方法
   Dim a As String
   a = String(8, "a")
   MsgBox a
   
   '第2种方法
   Dim b As String
   b = RepChar(8, "a")
   MsgBox b
   
End SubFunction RepChar(n As Integer, s As String) As String
   RepChar = ""
   For i = 1 To n
      RepChar = RepChar & s
   Next i
End Function

Answer 6

Dim abyte1(7) As Byte, str1 As String
    Dim i As Long
    For i = 0 To 7
        abyte1(i) = Asc("a")
    Next
    str1 = StrConv(abyte1, vbUnicode)
    'str1为8个"a"组成字符串

Answer 7

VBToy(简单即美) 的答案最简单直接