Access技巧接龍

Jach

好，頂一下！

jiuzhensi

我很想上傳軟件，不知從哪傳，我是新手。

huangqinyong

產(chǎn)生隨機(jī)號(hào)碼的模塊：

Private Sub Form_Open(Cancel As Integer)

    Dim lonIntNum As Variant
   
    lonIntNum = Fix(8999999999# * Rnd()) + 1000000000
   
    Me.文本框 = lonIntNum
   

End Sub

einstein_supeng

我也來一段(不用子窗體,用LISTBOX隨即查詢):

PRIVATE SUB RUNSQL()

DIM SQL AS STRING

SQL=ME.TEXT0

ME.LIST1.COLUMNHEADS=TRUE

ME.LIST1.COLUMNCOUNT=255

ME.LIST1.ROWSOURCE=SQL

END SUB

見笑了

plmm1999

以下是引用竹笛在2005-1-27 20:14:00的發(fā)言：
哇，這么多好技巧，我也弄了一些，在：http://www.accessoft.com/Article_Special.asp?SpecialID=1

謝謝分享!這里有太多好東東,我只是初學(xué)者,希望能很快加入你們行列.

[em23][em23]

GAOYUAN_1971

鏈接有問題

ferockpan

支持�。。。。。。。。。�

捉貓鼠

頂起來再說，謝謝

lqiyik

see

lqiyik

高手多多