引用:
作者: u8810329
Dim i As Integer
For i = 1 To 7
Print String(i, "★") & vbCrLf
Next
For i = 6 To 1 Step -1
Print String(i, "★") & vbCrLf
'String' 是類別型別，無法當成運算式使用。
所以你寫錯了ㄟ
ㄏㄏ
Next
End Sub
|
看來你連VB6有 String函數也不知道 , 你連RUN看看都沒試 ,
也可以去問問這兒的那些版主 , 看看我回覆的 指令是不是有正確畫出.
沒知識也不要緊, 也要有常識 ,沒常識也得常看電視,就算沒看電視, 也得虛心的請教
恐怕你是腦殘的小白. 你真是可悲!
你可以去查VB的MSDN , 教你一下: 先進VB後按F1.
或去 VB研究小站 查入門的String函數 ：
填入重覆字元
--------------------------------------------------------------------------------
●將一個字元重覆組成一個字串後輸出。
●用法：傳回字串 = String(數值, 字元)
--------------------------------------------------------------------------------
MyStr = String(N, MyChr)
MyStr = String(6, "瓜")
'結果MyStr = "瓜瓜瓜瓜瓜瓜"