- ベストアンサー
ラベル、テキストコントロールの回転について
- みんなの回答 (1)
- 専門家の回答
質問者が選んだベストアンサー
Access2000のみで考えてみました。 例として、下記VBAは『日本人の体力2000』という文字をExcelの90度回転のように表示します。ラベルの幅や高さは調整して下さい。テキストボックスでも同じようにできました。(当然、ラベル0にこの文字をセットしておいても可能です。) 日本語の縦書きフォント(先頭が『@』)があるフォントなら表現できると思います。(MS明朝とかMSゴシックは当然OKです) 文字に半角文字が混ざっているとまずいので全角に変換しています。この辺が苦しいところです。 もっと簡単な方法がありそう? とりあえず、ご参考に。 Private Sub Form_Open(Cancel As Integer) Const moji = "日本人の体力2000" '表示したい文字 Dim L As Integer 'カウンタ With ラベル0 '文字を逆順にする .Caption = "" For L = Len(moji) To 1 Step -1 .Caption = .Caption & Mid(StrConv(moji, vbWide), L, 1) ’半角文字は全角にしてしまう!! Next '縦書きフォントにする。「@」付きフォントがあるフォントに限るが・・・ If Left(.FontName, 1) <> "@" Then .FontName = "@" & .FontName End If End With End Sub
関連するQ&A
- ラベルコントロールの回転
Access2000(または2002)のラベルコントロールを自由に回転させたいのですが、なにか良い方法はないでしょうか。もしないのなら、VBAでプロパティを自由に設定出来る、ラベルコントロールの替わりになるコントロール(OCXなど)はないでしょうか。シェアウェアでもかまいません。 縦書きで@付きフォントを使用すれば、右向きにはなるのですが・・・。最悪、左向きだけでもかまいません。 よろしくお願いします。 環境:Windows2000(SP2)、Access2000(または2002)
- 締切済み
- その他(データベース)
- Access VBA コントロール 削除
Access の VBA にて、フォームに設置しているラベルやテキストボックスといったコントロールを削除するコードを作成したいのですが、どのように記述すればよろしいでしょうか?
- ベストアンサー
- Visual Basic
- ラベルに「コントロールソース」を設定することは不可能でしょうか?
単票形式のフォームのレコードソースに紐付くコントロールソースを ラベルに設定したいのですができません。 ハイパーリンクをテキストボックスではなく ラベル上に表示したいです。 テキストボックスのプロパティには「コントロールソース」があるのですが ラベルに「コントロールソース」はありません。 設定することは不可能でしょうか? VBAでも可能なら教えてください。 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- 複数コントロールテキストの同一セルへの入力
はじめまして。 エクセルVBAについて質問させて頂きます。 ユーザーフォームにラベル・テキストボックスそれぞれ1~6があって ラベルのキャプションとテキストボックスのテキストをセル同一セルに 入力したくて With UserForm1 Range("A1") = .Label1.Caption & .TextBox1.Text & .Label2.Caption & .TextBox2.Text _ & .Label3.Caption & .TextBox3.Text & .Label4.Caption & .TextBox4.Text _ & .Label5.Caption & .TextBox5.Text & .Label6.Caption & .TextBox6.Text End With と、このように記述したのでが、これをもっと簡潔に書く方法はございませんでしょうか? ご教授よろしくお願いします。
- ベストアンサー
- Visual Basic
- Access コントロールとはActiveXコントロールの略?
Accessでフォームに配置するテキストボックスやラベルをコントロールといいますが、これはActiveXコントロールの略なのでしょうか?
- 締切済み
- オフィス系ソフト
- TreeViewコントロールで改行
AccessでVBAやってます。 TreeViewコントロールのラベルに改行を入れたいのですが、 ラベル編集中にEnterを押すと決定しちゃいますよね。 どうやればいいのでしょうか? というか出来ないのでしょうか? 分かる方よろしくお願いします。
- 締切済み
- Visual Basic
- BOCのINPUT MANでラベルのコントロールはできないですか?(VB6)
VB6でINPUT MANを使っているのですが、 ラベルのコントロールは使用できないのでしょうか? テキストボックスやマスクは機能が充実しており、標準のものよりも大変使いやすいです。 ですが、ラベルに関しては、標準のものを使用しているので大変、使い勝手が悪いです。 縦位置が中央に寄らないなど... INPUT MANでラベルのコントロールってないのでしょうか? (見る限りないようですし、ラベルはINPUTでないから駄目でしょうか?) もう一つなのですが、 自分は、テキストボックスを使用不可(ENABLE=FALSE)にした時に、 テキストボックス内の文字がくすんで(黒文字→灰色文字になる) のが嫌なので、外にフレームを張り、フレームに対して、ENABLEを制御しています。 INPUT MANのテキストボックスでも、 ENABLE=FALSE(フォーカスが当たらない状態)で文字はそのままの状態はできないのでしょうか? LOCKEDでコントロールも有効かと思いますが、フォーカスが当たらない方がいいです。 →ラベルの使いにくさの応用で代用できるかと思いまして...
- ベストアンサー
- Visual Basic
- アクセスのテキストボックスコントロールの色を変える
アクセス2007を使用しています。 アクセスのフォームにテキストボックスコントロールがあまりにも多く、変更したかどうかを書類と突き合わせるのがとても大変です。 変更したテキストボックスコントロールに色を付けたりすることはできませんか?もし出来るとしたらどのようにやるのでしょうか?
- ベストアンサー
- その他MS Office製品
- エクセルのデータラベル
エクセルの棒グラフについて教えてください。 横軸は「数量」 縦軸は「年度」で 各年度の項目が3つに分かれています。 単純に棒グラフにした場合、 データラベルを「値」にすると、 データラベルの表示は当然「数量」がそのまま表示されますね。 それを、各年度の各項目の割合の%表示にすることはできますか? ラベルをわざわざ書き直さなくても 変更する方法があれば、教えてください。 よろしくお願いいたします。
- 締切済み
- オフィス系ソフト
- ラベルでの移動でテキストの受け渡し
ラベル1にあるボタン(複数)からインスタンス名key_textという名前の テキストボックスにボタンそれぞれの意味をもつテキストを表示させています。(表示といってもキャンバスの外なので実際には見えません) 例えばラベル1からラベル2に移動し、キャンバス外に隠していたkey_textを表示させたいのですがどうすればいいのでしょう? 同じ方法でラベル1で隠していた変数扱いのテキストボックスを ラベル2で表示させることはできました。 他にもhtml tagを使用した変数扱いのテキストボックスも同様に ラベル1で隠しラベル2の移動で表示。 ともにラベル1、ラベル2での表示内用は同じものです。 たまたまkey_textとインスタンス名をつけているものだけできないので 困っています。試しにこのテキストボックスの変数名にkey_textと名前をつけ試してみると_leve0と表示されてしまい。ボタンから受け渡しているテキスト内容を表示できませんでした。 なぜできないのかわからなくなってしまったのでご教授ください。 環境 flash mx2004 , mac os10.4
- 締切済み
- Flash
お礼
回答ありがとうございます。 縦書きフォントはあります。 したがって、 ラベルのHeightとWidthを入れ替えて、縦書きのプロパティ(Vertical)を"Ture"にして、フォントを縦書きフォント(@付き)にすれば出来そうです。 半角も問題なさそうです。 どうもありがとうございました。 では。