うぃずのプロフィール
- ベストアンサー数
- 344
- ベストアンサー率
- 69%
- お礼率
- 0%
- 登録日2005/02/15
- Webサイト http://wiz-code.net/
- Labelの文字をスクロールする際にちらつきが・・・
お世話になります。 フォームにあるラベルに文字を表示し、その文字をスクロールするプログラムを作成しました。 スクロールはできるのですが、スクロールする際に文字がちらついて(早い点滅のような感じ)しまいます。 どのようにすれば、ちらつきを無くすることができますか? よろしくお願いします。 (VB2008にて作成) Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Me.Label1.Text = "文字のスクロール" 'タイマーのインターバルで文字の進む速度が決まります Timer1.Interval = 5 Timer1.Start() End Sub Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick Dim objG As Graphics objG = Label1.CreateGraphics() 'ここで一旦クリアしないと真っ黒になります objG.Clear(Label1.BackColor) '左端を決めて、文字を描画する objG.DrawString(Label1.Text, Label1.Font, New SolidBrush(Label1.ForeColor), iLeft, 0) '左端をずらす iLeft += 1 If iLeft > Label1.Width Then '右端までいったら戻す iLeft = 0 End If objG.Dispose() End Sub
- ベストアンサー
- Visual Basic
- bo281
- 回答数1
- コントロールの表示されるテキストを変えたい
ContextMenuStripで Menu1 Menu2 ・・・・Menu10 と10個のメニューがあります。(コントロールは1つです。) これらの表示されるテキストを一括で変えたいのですがうまくできません。普通のテキストボックスなら出来たのですが・・・。 Me.Controls の部分があやしいようにも思うのですが・・・。 よろしくお願いします 言語は VB.NET2008EE 試してみたソースは下記です。 For c As Integer = 1 To 10 Con_Name = "Menu" & c For Each con In Me.Controls If con.Name = Con_Name Then con.text = "test" End If Next Next
- ベストアンサー
- Visual Basic
- keniti_246
- 回答数2
- Paintイベントが実行できません。。。
Paintイベントが実行できません。。。 こんにちは、いつも勉強させていただいております。 質問させていただきます。どうぞよろしくお願いいたします。 新年早々とんちんかんな質問でしたら申し訳ございません^^; 開発環境Vista+VB2008になります。 デバッグ開始(再生ボタン)後、Label_E_2.Invalidate()からの Label_E_2.Paintイベントがしょっちゅう実行できなくなるので、 一時停止ボタンを押してみると毎回、別のイベント(Label_E_1.Paint)中の 決まった行が緑色になり、 「このスレッドによって現在の関数が実行された後、次に実行されるステートメントです。」 と表示されます(←理解できておりませんorz) For Each コントロール In Panel1.Controls If InStr(コントロール.name, "_E_") Then コントロール.Image = My.Resources.Btn_E_OFF End If ↑この行でございます Next 毎回この行でPaintイベントが止まっているようなイメージを受けております。 「コントロール」という変数の使い方がまずいのでしょうか。。。? もしかすると解放作業か何か必要になるのかな?などと試行錯誤いたしております。 以前別のプログラムで同じようなコードを作成したときは問題なかったのですが。。。 Googleで検索などいたしましても出てこず、悩んでおります。 どのような現象なのかだけでもアドバイスいただくことができれば嬉しいです。 もしお詳しい方がいらっしゃいましたら,アドバイスいただきたく どうぞよろしくお願いいたします。
- ベストアンサー
- Visual Basic
- MKT_
- 回答数1
- 【C#】ラベルのダブルクリックについて
初めて質問させていただきます。C#初心者です。よろしくお願いします。 開発環境はMicrosoft Visual C# 2008です。 現在、UserControl1を作成して、label1にはテキストを入れています。 ・label1をクリックすると、パネル(panel1)の背景色を変更。 ・label1をダブルクリックすると、他のラベル(atai_text)にlabel1内のテキストを代入。 ↑上記2つの処理をしたいのですが、クリックの方は処理できているのですが、ダブルクリックは反応せず、どのように作成すればよいかがわかりません。 <UserControl1.csの一部> private void label1_Click(object sender, EventArgs e) { if (this.label1.BackColor == Color.Pink) { this.panel1.BackColor = Color.FromArgb(0xFF, 0xFF, 0x80); } else { this.panel1.BackColor = Color.Pink; } } private void label1_DoubleClick(object sender, EventArgs e) { this.atai_text.Text = this.label1.Text; } どなたかご教授よろしくお願いします。
- ベストアンサー
- その他(プログラミング・開発)
- sss-aoring
- 回答数1
- エクセルマクロのプログラムについて
イラストロジックというゲームのプログラミングをエクセルマクロでしているんですが、絵を読み取って問題を作成するプログラムを作りたいんです。何か参考にできるプログラムもしくはヒントなどわかる方いらしたら教えて下さい。
- ベストアンサー
- Visual Basic
- HOTMASK
- 回答数1