1樓：
新增一個command，一個text用於放你的文字（mutiline等於true以便多行顯示），一個list
private sub command1_click()
a = split(text1.text, """,""name"":""") 'vb用兩個引號表示一個引號
for b = 1 to ubound(a)
c = split(a(b), """,""uin"":")
d = split(c(1), "},{")
list1.list(b - 1) = c(0) & " " & d(0)
next b
end sub
以上**必須嚴格按照你給的格式向text提供資料才可以，而且沒有錯誤判斷
執行結果如下：
我de愛＆ 976741952
說/噯禰 799921438
陌絔 5686188
艾魯 40079765
龍勝 70242659
盛裝^修羅 147124126
友情 157926166
想飛的雨 158185329
煙雨軒 229089239
青山綠水 245673772
詯 犭艮緈諨 291956493
珂兒 328309681
啊★№☆利 335945569
物探菜鳥 371923608
哪位高手指點我一下VB語句啊
文字框的內容轉化要加個val函式，dim a b c a val textbox1 b val textbox2 c val textbox3 textbox4 a b c 注意b不能為0，如果有要求可以這樣寫 dim a b c a val textbox1 b val textbox2 c va...
高手來指點下這篇雅思作文怎麼寫
to what extent do you agree or disagree 遇到這種題目一定要兩邊都照顧，寫成5段式，開篇點題，反方觀點，正方觀點，正方觀點，結題 earlier這個比較抽象，可以說電腦的發明完全改變的世界，燈泡的發明點亮了世界，汽車的發明讓大家都方便 現在的發明比如什麼qq啊，...
魔獸高手進來指點，關於魔獸世界，高手來。
打多了就好了。不要總想贏 人和電腦也是完全不同的。被蹂躪越多 經驗就越多。各種套路都熟悉了 記憶肌肉形成 就會運用自如了。電腦和真人完全不一樣，電腦戰術單一，多打了之後有90 的勝率也不奇怪啊，我現在跟電腦玩不可能會輸的啊，但是和真人打，情況就不一樣了啊，多練練咯，just game嘛。你應該放下包...