Access電子鐘,時(shí)鐘,髮佈源碼

可能這裡大多數(shù)人都不知道我,其實(shí)在這裡很久瞭,一直都是潛水,學(xué)到不少東西,今天模仿鄭老大做瞭一箇點(diǎn)子鐘,誰喜歡就拿去用吧
另外,麻煩哪位高手幫我做一下不規(guī)則窗體~(去掉粉紅色部分)~~這些截麵都是我自己做的,不涉及版權(quán)問題~~~  
9A0SzvhO.bmp
vo7N7g88.rar

tmtony
界麵很不錯(cuò),不過,使用圖片實(shí)現(xiàn),還可優(yōu)化一下, 或者也可使用字體來實(shí)現(xiàn)lcd效果.

Trynew
不錯(cuò)，優(yōu)化瞭一下：
Private Sub DtTime()
    Dim i As Integer, strDate As String
    strDate = Format(Now(), "yyyymmddwhhmmss", vbMonday)
    For i = 0 To 14
        Me("Date" & i).PictureData = Me("Num" & Mid(strDate, i + 1, 1)).PictureData
    Next
End Sub 

改進(jìn)後的下載：pmCEW1db.rar


kty
這箇方法我開始也想過,就是不知道控件名可以這麼寫~~厲害,厲害~~我還想問一下,有關(guān)於不規(guī)則窗體詳細(xì)點(diǎn)的資料嗎?

cjls2000
要是我有10箇LB標(biāo)籤 統(tǒng)一全都.caption="dddd" 應(yīng)該怎麼寫呢

stephen@stephen
非常好看的界麵.在這裡想請(qǐng)教一二:FORM界麵怎麼纔能不讓使用者移動(dòng)

sgrshh29
最方便的辦法就是把控製框去掉，就無法拖動(dòng)瞭。

(界麵_窗體_子窗體-相關(guān)文章技巧鏈接)：
切換麵闆動(dòng)態(tài)時(shí)鐘的副作用
Access自動(dòng)時(shí)鐘及數(shù)字自增變色