• ベストアンサー

テキストボックスについて(VB6 SP5)

VB初心者です。教えてください。 テキストボックスを使用不可にするときに、ENABLE=FALSE にするのですが、フォアカラーがグレーになってしまいます。 又、LOCKED=TUREにするとフォアカラーは黒(設定色)なのですがカーソルが飛んでしまいます。(変更は出来ませんが) テキストボックスが使用不可状態で、カーソルが飛ばずに フォアカラーが黒(設定色)のままの状態にする事はできるのでしょうか? 使用不可の状態では、フォアカラーは変更せず、カーソルが飛ばずに、バックカラーだけ変更したいのですが...

質問者が選んだベストアンサー

  • ベストアンサー
  • maruru01
  • ベストアンサー率51% (1179/2272)
回答No.2

こんにちは。maruru01です。 No.1の人の補足程度ですが、 この方法で出来ます。(確認済み) さらに、フレームのBorderStyleプロパティを「なし」にして、Captionプロパティを「""」にすれば、フレームの存在を意識しないように出来ます。

Ref16570
質問者

お礼

ありがとうございます。 御回答のようにやってみたら、違和感無く問題が解決できました。

その他の回答 (1)

  • taknt
  • ベストアンサー率19% (1556/7783)
回答No.1

フレームをはり、その上にテキストボックスをはります。 それで、フレームをイネーブルにすれば、テキストボックスも入力不可になったような・・・。 以前、Delphiで用いてた手法です。

Ref16570
質問者

お礼

先ほど実践してみたら出来ました。 ありがとうございます。 こう言うものなのか、裏技なのか微妙です。

関連するQ&A

  • BOCのINPUT MANでラベルのコントロールはできないですか?(VB6)

    VB6でINPUT MANを使っているのですが、 ラベルのコントロールは使用できないのでしょうか? テキストボックスやマスクは機能が充実しており、標準のものよりも大変使いやすいです。 ですが、ラベルに関しては、標準のものを使用しているので大変、使い勝手が悪いです。 縦位置が中央に寄らないなど... INPUT MANでラベルのコントロールってないのでしょうか? (見る限りないようですし、ラベルはINPUTでないから駄目でしょうか?) もう一つなのですが、 自分は、テキストボックスを使用不可(ENABLE=FALSE)にした時に、 テキストボックス内の文字がくすんで(黒文字→灰色文字になる) のが嫌なので、外にフレームを張り、フレームに対して、ENABLEを制御しています。 INPUT MANのテキストボックスでも、 ENABLE=FALSE(フォーカスが当たらない状態)で文字はそのままの状態はできないのでしょうか? LOCKEDでコントロールも有効かと思いますが、フォーカスが当たらない方がいいです。 →ラベルの使いにくさの応用で代用できるかと思いまして...

  • ループを使ってテキストボックスにマスクをかける

    以前質問した「テキストボックスの名前に変数をつける」の 続きです。 取得した数をループを使ってテキストボックスに 挿入するのは、下記の方法で出来たのですが、 For 回数 = 1 To 挿入回数 Controls("Text" & カウンタ).Text = 取得した数 カウンタ = カウンタ + 1 Next これと同様に、ループを使って 挿入したテキストボックスにマスクをかける (テキストボックスに入力不可状態にする) 方法はあるのでしょうか? Lockedとか使ってみてもダメでした。

  • コンボボックス 1文字入力できてしまう VBA

    お世話になっております。 Excel2003を使用しております。 コマンドボタンを押したときにコンボボックスをいじられては困るので、 コンボボックスの設定を Me.ComboBox1.Locked = True にしているのですが、 1文字入力できてしまい、 自動的にリストの内部を探してしまいます。 これを防ぐ方法(入力も選択もできないようにする方法)はありませんか? Enable=False にするしかないでしょうか?

  • 【Excel VBA】ユーザーフォーム テキストボックスの有効・無効について

    Excel2003を使用しています。 ユーザーフォームにテキストボックスを11個とコマンドボタンを2個配置しています。 TextBox9に“0000”(文字列です)が入力されたら、TextBox10を有効に、それ以外は無効に設定したく、TextBox10のEnabledプロパティをFalse、LockedプロパティをTrueにして、コードを下記のように書いたのですが、うまくいきません。どこか、間違っているでしょうか? コードは該当部分だけ、載せています。よろしくお願いします。 -------------------------------------------------- If TextBox9.Text = "0000" Then TextBox10.Enabled = True TextBox10.Locked = False TextBox10.BackStyle = fmBackStyleOpaque Else TextBox10.Enabled = False TextBox10.Locked = True TextBox10.BackStyle = fmBackStyleTransparent End If

  • Excel VBA テキストボックスの入力を使用不可にした場合

    Excel VBA テキストボックスの入力のプロパティのEnabledをFalseにする使用不可になるのですが、グレーで薄くなってしまい見にくいのですが、何か良い方法はないでしょうか? 黒文字にしたいのですが・・・。 よろしくお願い致します。

  • テキストボックスやリストボックスの書式設定

    フォームのテキストボックスやリストボックスの書式 設定をVBAでしようと思っているのですが、 複数のオブジェクトの設定を一括して同じ設定にする 方法はありませんか? 今はひとつひとつ↓のように設定してます。 With Me.性別 .TabStop = False 'タブストップ .BorderStyle = 0 '境界線スタイル .SpecialEffect = 0 '立体表示 .Locked = True '編集ロック End With

  • テキストボックス内のカーソル

    使用ソフト:Access2000 使用OS:Windows2000 WindowsXP チェックボックスを押すと、該当するテキストボックスに カーソルを移動するようにしています。 If IsNull(txt処理日) Then txt処理日 = Date End if txt処理日.SetFocus この場合、テキストボックス内に(今日なら、18/03/06)と入り、 すべての数字が選択状態になります。 これを、カーソルが右端に(今日なら、6の右端に)点滅している 状態にするにはどのように変更すればよろしいのでしょうか。

  • フォーム上のテキストボックスの値を変更させない方法って?

    アクセス2000を使っています。 フォーム上にテキストボックスを作成して、テーブル の値を表示しています。 VBAでこのテキストボックスの値が1の時は, me!txt.enabled=true(テキストボックスが開く) 0の時は、me!txt.enabled=false(テキストボックスがグレーアウト)というようにさせたいのです。さらにこのテキストボックスの値を変更できないようにしたいのですが方法はありますか? 要は、表示だけさせたいのです。 プロパティで値ロックするとenableが利かなくなります。 よろしくお願いいたします

  • Word2003のテキストボックス間の移動について

    よろしくお願いいたします。 現在WindowsXP/Word2003 で書類を作成しています。 その中で、テキストボックスを数箇所使用しているのですが、ボックス内の文章を編集しているとき(枠外が斜め線になり、中でカーソルが点滅している状態)、矢印キーでテキストボックス内の文字・行を移動しようとすると、何故か他のテキストボックスに移動してしまいます。これでは文章のちょっとした訂正を行おうとするたび、マウスで移動しなくてはならなくなり大変な時間のロスです。 この設定(?)を解除する方法はありますでしょうか?朝までに書類を作成しなくてはならないので大変困っています。 例) ・テキストボックスA(縦書き)・テキストボックスB(横書き)のふたつがある。 ・テキストボックスB内の文章を編集中、たとえば「あいうえお」の「お」の後ろ部分にカーソルがあり、1文字カーソルをずらそうと左矢印を押したらテキストボックスAにカーソルが移動してしまう。 ・テキストボックスA内ではカーソルによる文字・行間移動は可能。

  • vb.net grapecityのコンボボックス

    grapecityのコンボボックスを使用しています。 コンボボックスの背景色に画像を設定し、文字の前景色には黒を設定しています。 そこで、コンボボックスの値を変更した時、選択された値がセットされるのですが、 この時(active状態の時)、文字の色が白になってしまいます。 画面の別のところをクリックすると(値の確定?)黒色に変わります。 選択されたときに、文字色を黒色にするにはどうすればよいでしょうか? 選択後、カーソルを移動させる方法でもかまいません。 最近vb.netをはじめたばかりなので、コーディング方法を教えていただければ うれしいです。よろしくお願いします。

専門家に質問してみよう