Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

3505 / 9994

←次へ　｜　前へ→


	【9749】Re:新規作成フォームにOnMouseDownプロシジャを発生させる

たくゾ～ - 07/8/13(月) 12:00 -


	引用なし

	パスワード

▼小僧さん：

たびたびすみません。
たくゾ～です。

>> ３）新規フォームの詳細で、マウスボタンを押した場所に、ラベルを移動する
>についてはご自身で工夫されてみて下さい。
>　　　　.InsertLines 6, "Msgbox ""座標X："" & x & ""　座標Y："" & y "
>　　　　.InsertLines 7, ""

お教えいただきましたコードを、

.InsertLines 6, "Me.L001.Left = X"
.InsertLines 7, "Me.L001.Top = Y"

としまして、画面上は動く事を確認したのですが、
終了して、再度フォームを開くと、元の位置になってしまいます。

フォームのＳａｖｅをしても保存されません。
デザインビューで開き直してから　値を代入するとエラーになります。

移動したラベルを　固定したいのですが良い方法はございますでしょうか。

948 hits

▼

【9742】フォームを新規作成し、フォーム詳細のOnMouseDownにイベントプロシージャを... たくゾ～ 07/8/8(水) 22:53