调用EXCEL 实现阿拉伯数字转中文
摘要:方法一: Private Sub Command1_Click()Dim xlapp As Object, n As Currency, temp As StringSet xlapp = CreateObject("Excel.Application")Randomizen = Int(Rnd ...
阅读全文
posted @ 2007-06-30 16:40
posted @ 2007-06-30 16:40
posted @ 2007-06-25 02:52
posted @ 2007-06-25 02:45
posted @ 2007-06-04 13:52