公式化

2005-04-12 10:00:33酷仔♫° 瘋　

xx

留言 0 收藏 0 推薦 0

Private Sub Form_Activate()
For i = 0 To 4
Randomize
x = Int(Rnd * 12) + 1
Print x;
p(i).Picture = LoadPicture("d:cardd" + Trim(Str(x)) + ".gif")

Next

End Sub

你可能感興趣的文章

2024子曰盃第十屆文藝創作寫作活動評鑑審核通過名單

2024子曰盃第十屆文藝創作寫作活動《A級2級》評鑑審核通過名單 A級–2 通過名單王韋庭 &

19 小時前

1964.8，「瑤姬」多了一個新名號：「玉娥」。

1964.8，「瑤姬」多了一個新名號：「玉娥」。延續此篇：https://mypaper.pchome.com.tw/bu9650/post/1381439187 &

11 小時前

【醫療保健】《思覺失調症》

【醫療保健】《思覺失調症》一、《思覺失調症》概述？「思覺失調症」（英文 Schizophreni

19 小時前

中學英文練習與校園管理系統：智能學校的學習新趨勢

隨著科技的進步，現代學校的教學與管理方式也逐漸進化，從傳統的紙筆作業轉變為數碼化學習與智能管理系統的應用。特別是在中學階段，

18 小時前

別強調自己是受害人

真正受害人，不想被人知，否則所受的傷害更大，當初，別人扔掉我，靠自己意志站立起來，更談不上輔助幫忙通常，強調自己是受害人

2024-11-27

公式化

xx