Access総合相談所 其の21 【桐にしとけ】
at BSOFT
[
2ch
|
▼Menu
]
■コピペモード
□
スレを通常表示
□
オプションモード
□このスレッドのURL
■項目テキスト
609:名無しさん@そうだ選挙にいこう 09/07/14 00:43:17 >>598 ぶっちゃけ、コードが欲しいんだろ? Private Sub コマンド0_Click() Dim Ctrl As Control Dim i As Long With CurrentProject.AllReports For i = 0 To .Count - 1 DoCmd.OpenReport .Item(i).Name, acViewDesign, , , acHidden For Each Ctrl In Reports(.Item(i).Name).Controls If Ctrl.ControlType = acLabel Then If Ctrl.Caption = "ABC" Then '比較対照(ABC)はテキストボックスにしておくとよい Ctrl.Caption = "XYZ" '代入対象(XYZ)はテキストボックスにしておくとよい End If End If Next Ctrl DoCmd.Close acReport, .Item(i).Name, acSaveYes Next i End With End Sub こんな感じか? 610:名無しさん@そうだ選挙にいこう 09/07/14 09:54:17 win2000 ACC2000 アクセス起動時にアプリケーションを全画面表示したいのですが、どのようなコードを書けばよいでしょうか フォームやテーブルの最大表示は出来るのですが、アクセス自体を全画面表示に出来ません
次ページ
最新レス表示
スレッドの検索
類似スレ一覧
話題のニュース
おまかせリスト
▼オプションを表示
レスジャンプ
mixiチェック!
Twitterに投稿
オプション
しおりを挟む
スレッドに書込
スレッドの一覧
暇つぶし2ch
4945日前に更新/205 KB
担当:undef