• ベストアンサー

ステータスバーコントロールのテキスト

ステータスバーのスタイルを sbrNormal にして各パネルに表示させるテキストを 実行時にコードで変更しようとしています。 ところで、パネルのtextプロパティ(若しくは、Caption)が無いのですが、どのプロパティで変更するのでしょうか。 スタイルを sbrSimple に設定すれば、SimpleTextプロパティで変更できるのですが、それでは困っちゃいます。

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

  • ベストアンサー
  • todo36
  • ベストアンサー率58% (728/1234)
回答No.1

PanelsコレクションでTextを変更でします。 statusbar1.Panels(1).Text = "変更"

xiaolong_goo
質問者

お礼

有り難うございます。 いきなりプロパティではなく、コレクションがあったんですね。 よくわかりました。

関連するQ&A

  • C# TEXTが空白であるLABELは何処に???

    C# でLABELツールを使います LABELのTEXTには色々な文字列を表示しますが初期値は空白です そこでLAEBLプロパティのTEXT領域の内容(Label1とあります)を削除して実行▲(少し角度が違う)した後、停止■します コード⇒デザイナー でFormを再表示すると、あら不思議Form上にLABELがありません 実行中にプログラムで文字をラベルに書いてもキチンと表示されますのでForm上には必ずあります でもデザイナーで見ることが出来ないのでLABELの位置さえ変更出来なくなってしまいました 如何すれば私の大切なLABELと再会出来るのでしょうか??? 教えてください、ワンワンわぁわぁ~わぁ~ん~!!!

  • テキストボックスの背景色変更時に影ができてしまう

    テキストボックス選択時に背景色をJavaScriptで変更したく、下記のように書きました。 <input type="text" value="テキストボックスです" onfocus="this.style.backgroundColor='#cccccc'" onblur="this.style.backgroundColor='#ffffff'"> これをWindowsXP+IE6で実行したところ、背景色の処理はうまくいくのですが、画面のプロパティのテーマがデフォルトのWindowsXPの場合、元は影のないテキストボックスなのですが、背景色変更時に影つきのテキストボックスになってしまいます。 テーマがWindowsクラシックだと元々影つきなので変化しません。 背景色変更時に影つきにならないようにできませんでしょうか? それともこれはIE6のバグなのでしょうか?

  • テキストを正しく表示して見てもらうには

    何度も同じようなことを聞いてすみません。 (1) OS付属のテキストエディタ(つまり、Macintosh OS 9のSimpleText、Macintosh OSXのテキストエディット、Windowsのメモ帳)のどれかを使っているがどれを使っているのか分からない相手にテキストファイルを渡し、それをOS付属のテキストエディタで正しく表示して読んでもらいたい場合は、 (a)改行コードがCRであるテキストファイル (b)改行コードがCR+LFであるテキストファイル の2つを作ってその両方を渡し、Macintoshを使っているのであればOS 9でもOSXでも(a)を、Windowsを使っているのであれば(b)を、それぞれOS付属のテキストエディタで開いてみてもらうように別途伝えておけば、正しく表示して読んでもらえるでしょうか。 (2) OS付属のテキストエディタ(つまり、Macintosh OS 9のSimpleText、Macintosh OSXのテキストエディット、Windowsのメモ帳)のどれかを使っているがどれを使っているのか分からない相手にテキストファイルを渡し、それをOS付属のテキストエディタで正しく表示して読んでもらいたい場合は、(1)が最も簡単な方法でしょうか。これ以上に簡単な方法があるでしょうか。

    • ベストアンサー
    • Mac
  • [VB2010]関数・代入が順序正しく行われない

    [VB2010]関数・代入が順序正しく行われない VisualStudio 2010のVBを使用しております。 下記のようなコードを打ったとき一部のコードが実行されず(飛ばされている?)、困っています。 (Label1はPanel1上にある,Label1.text="null") Label1.Text = "text" Panel1.Visible = true Dim client As New Net.WebClient() 'あとから使う If NetworkInformation.NetworkInterface.GetIsNetworkAvailable Then Threading.Thread.Sleep(2000) Label1.Text = "ネットワーク接続 - 有効" End If このコードを実行すれば、まずLabel1.Textが"text"になるはずですが これがスキップされ(Label1が何故か表示されていない) Panel1が可視状態になり、If文が実行されます。 Visual Basic 2008 Expressを使用していた時からこのような症状はありましたが、 なぜこのような状態になるのかわかりません。 どのようにすれば正しく動作するようになりますでしょうか。 ご回答よろしくお願いします。

  • DTPicker テキストクリアの方法

    初めまして。VB6.0でプログラムを作成中です。 例えば、テキストボックスに[321]が表示されていたとしてクリアにするには、text1.text = "" でできます。 DTPicker カレンダーコントロールで 同様に2009/4/3 が表示されていた場合、テキスト部をクリアにする方法を探しています。 DTPickerのプロパティにtextやcaptionがなくどのようにしたら良いのか分かりません。 ご存知の方、教えて頂けますか? 宜しく御願いいたします。

  • SimpleTextでテキストに色設定ができるのですか?

    SimpleTextでhtmlを編集していた時、ソースをコピーしてきたら、テキストに色がついてました。でも、メニューバーの中には、テキストの色を設定する項目がみあたりません。知ってる方、教えてください。

    • ベストアンサー
    • Mac
  • MuseScore3 テキストの枠について

    MuseScore 3.0 を使っています。 楽譜中に曲の流れの区切りにテキストを入れたいと思っています。 例えば、Intro とか A、B、Ending のようにです。 これをコードの表記と区別するために四角い枠で表現したく思います。 MuseScore の使い方についてこの内容を検索したところ、『 テキスト → テキストスタイル 』で出たメニューで『フレーム』を選択とありました。 しかし、現バージョンではそれと同じメニューがありません。 試行錯誤して見つけたのが、段テキストを設定して、それを選択し、『フォーマット → スタイル → テキストスタイル → フレーム』と選択してフレームを設定するというものですが、したつもりでも表示は何も変わりません。 どうすると段テキストに角枠を設定できるか教えていただけませんでしょうか。

  • VB初心者です

    計算結果が"7"の時に限り、「当たり!」と表示される、ちょっと意味不明な計算機を作っています。 現在、下記のように書いてますが、何故かうまくいきません。(当たりが表示されない 何故でしょうか?お助けください。。m(_ _)m Private Sub Command1_Click() Label1.Caption = Str(Val(Text1.Text) + Val(Text2.Text)) Label3.Caption = "+" Label4.Visible = False '画像を隠す。 'いずれかの数字が「7」のとき、メッセージを表示する。 If Label1.Caption = "7" Then Label4.Visible = True End If End Sub Private Sub Command2_Click() End End Sub Private Sub Command3_Click() Label1.Caption = Str(Val(Text1.Text) * Val(Text2.Text)) Label3.Caption = "*" End Sub Private Sub Command4_Click() Label1.Caption = Str(Val(Text1.Text) - Val(Text2.Text)) Label3.Caption = "-" End Sub Private Sub Command5_Click() Label1.Caption = Str(Val(Text1.Text) / Val(Text2.Text)) Label3.Caption = "/" End Sub

  • テキストの表示について

    テキストの表示についてですが、 テキスト枠を2行分とり、その中で表示し切れない文字列は"..."で 表示されるようにしたいのですが、うまくできません。 <div class="textEllipsis" style="height: 38px; width: 660; text-overflow: ellipsis overflow: hidden;">  <table class="BorderNone">   <tr>    <td>     <bean:write name="data" property="cbTrialRefPeer.title" ignore="true"/>    </td>   </tr>  </table> </div> 1行でならうまくいくのですが、 2行だと"..."ではなく文字列が切れて表示されてしまいます。 何かよい方法はないですか。

    • ベストアンサー
    • HTML
  • デザイナ上にも値が表示され、独自の処理も組み込みたい

    VB2005で独自の制限を持つコントロールを作ろうと思っています。 Imports System.ComponentModel Public Class Component1   Inherits TextBox   Private _text As Double   Public Overrides Property Text() As String     Get       Return _text     End Get     Set(ByVal value As String)       If IsNumeric(value) Then         _text = value       End If     End Set   End Property End Class やりたい事は数値しか入力を許さず、一定のプロパティ指定によって カンマ区切りだとか小数部表示、桁数制限などが出来るようにしたい のです。 上記のようなコードで動作は出来るようなのですが、デザイナ上の プロパティウィンドウからTextを変更した時、デザイナ上に貼り付け られているテキストボックスの中に、指定されたTextが表示されません。 MyBase.Textを利用するとText()が何度も走行してしまうようですし、 取得するときに、Textプロパティに設定されている値を加工した結果を 返したい為、MyBase.Textの利用が宜しくないようです。 (例えば表示上は「1,234」となっているが、取得時には「1234」として 取得される、 設定時に「1234」と指定したが、実際に設定される値は「1,234」など) 先のような理由の為か、Getの方に Return String.Format("{0:#,##0}", Single.Parse(MyBase.Text)) のようなことをするとInvalidOperationExceptionが発生してしまいます。 どうするとデザイナ上にも値が表示され、先のようなカスタム処理を加えることが可能でしょうか? 宜しくお願い致します。