Date: Thu, 27 Jan 2005 00:29:52 +0900
From: no@ann.co.jp
Subject: [pasml 80484] Re: 「Access2003」の「イベントプロシージヤ」
To: pasml@ann.co.jp
Message-Id: <200501261529.j0QFTqR17863@ns.pas2.jp>
X-Mail-Count: 80484
初心者でも安心なレンタルサーバー。200MBで263円から。
CGI・SSI・PHPが使えます。
【ロリポップ!】http://px.a8.net/svt/ejp?a8mat=O4GIY+AEHOAA+348+61C2R
--
お名前 : unknown 困りごと掲示板から
URL :
質問URL: http://pasokoma.jp/?num=232583&ope=v
ツリートップ: http://pasokoma.jp/cgi/tree.cgi?num=232583
--
しんさんは No.232424「「Access2003」の「イベントプロシージヤ」」で書きました。
>下記は抜粋したものですが、その中で
>「' フオームにイベントを組み込む」この部分を使用しなければ
>プログラムは正常に作動します。
>しかし
>「'フオームを描く」の中の
> .OnTimer = "=my()"
>の部分を削除して
>
>先ほどの
>「' フオームにイベントを組み込む」を生かすと正常に作動しません
>
>原因、対処方法をどなたか聞かせて下さい。
>お願いいたします。
参考程度です。自信無し。
Access2000では下記で時刻表示するようです。
'*****************************************問題の部分ここから******
' フオームにイベントを組み込む
' Me!を修正。コントロールの指定を変数で渡せなかったような気が、、、
frmEvent = "Private Sub Form_Timer()" & vbCrLf & _
" Me![時刻].Caption = Time" & vbCrLf & _
"End Sub"
Set myModule = myfrm.Module
myModule.InsertText frmEvent
myModule.InsertLines 3, vbTab & "Private pHour As Integer"
'******************************************問題の部分ここまで******
ただし、“pHour”にSetされるかは未検証です(汗
.OnTimer="=my()"
はうまく動作しない、、、むぅぅ。
--
== 掲示板URL: http://pasokoma.jp/ ==
配信の停止: http://pasokoma.jp/taikai.shtml
本メールマガジンへの返信はなさらないで下さい
== 投稿はパソコン困りごと掲示板でお願い致します ===