TOP > Up > Today

Re: 「Access2003」の「イベントプロシージヤ」


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 = &quot;=my()&quot;
>の部分を削除して
>
>先ほどの
>「'   フオームにイベントを組み込む」を生かすと正常に作動しません
>
>原因、対処方法をどなたか聞かせて下さい。
>お願いいたします。
参考程度です。自信無し。
Access2000では下記で時刻表示するようです。
'*****************************************問題の部分ここから******
' フオームにイベントを組み込む
' Me!を修正。コントロールの指定を変数で渡せなかったような気が、、、
frmEvent = &quot;Private Sub Form_Timer()&quot; &amp; vbCrLf &amp; _
&quot; Me![時刻].Caption = Time&quot; &amp; vbCrLf &amp; _
&quot;End Sub&quot;
 Set myModule = myfrm.Module
 myModule.InsertText frmEvent
 myModule.InsertLines 3, vbTab &amp; &quot;Private pHour As Integer&quot;
'******************************************問題の部分ここまで******
ただし、“pHour”にSetされるかは未検証です(汗
.OnTimer=&quot;=my()&quot;
はうまく動作しない、、、むぅぅ。
--
== 掲示板URL: http://pasokoma.jp/ ==
   配信の停止: http://pasokoma.jp/taikai.shtml
   本メールマガジンへの返信はなさらないで下さい
== 投稿はパソコン困りごと掲示板でお願い致します ===
    


TOP > Up > Today