みっちょ(@RealMichyo) の回答履歴
- プログラミング初心者です
processingプログラミング作成をしています。 mouseファンクション(mouseClickedとか)やkeyファンクション(keyPressed)などのファンクションをつかったときに、クリックやkeyをたたいたら次々変わっていくみたいなプログラムを作成したいんですが、教えてください。 いまは画面を4等分にし、mouseClickedををつかったらランダムに選ばれたスペースを赤く塗り、もう一回mouseをクリックしたら、その赤く塗られたのは消えて、次のまたランダムに選ばれたスペースへと移動する。。それを何回もやるというプログラミングにしたいです。 sizeは600,600でそれぞれのrectは rect(0,0,300,300) rect(300,0,600,300) rect(0,600,300,300) rect(600,600,300,300) で区切ってます。ずっと時間かけてやってますが、これをどうやってrandomファンクションにし、それをランダムに選ばれたスペースをマウスクリックしたら赤く塗られるようにするかがもっていくかがどうしてもわかりません。 あと、もう一回クリックしたら前にクリックした場所が消えるというのもわかりません。 これが今までに書いたプログラムです。 いまはif elseをつかっています。 よろしくお願いします。 void setup() { size(600,600); strokeWeight(2); background(255); line(0,width/2,600,width/2); line(height/2,0,height/2,600); } void draw() { fill(255,0,0); } void mouseClicked() { if( mouseX <= width/2) { fill(255,0,0); rect(0,0,width/2,height/2); } else { rect(width/2,0,300,300); fill(255,0,0); } if (mouseX > height/2) { rect(0,width/2,height/2,height); fill(255,0,0); } else { rect(width/2,height/2,width,height); fill(255,0,0); } }
- 締切済み
- その他(プログラミング・開発)
- takomaru1201
- 回答数2
- Tclのパターン検索について
set find [string match $test $syntax] if { $find } { incr count_pattern } と記述して、$findが真にならないのですが、原因は何でしょうか? 先に set test hoge set syntax hoge としてあります。
- 締切済み
- その他(プログラミング・開発)
- rahmenmaru
- 回答数1
- プログラミング初心者です
processingプログラミング作成をしています。 mouseファンクション(mouseClickedとか)やkeyファンクション(keyPressed)などのファンクションをつかったときに、クリックやkeyをたたいたら次々変わっていくみたいなプログラムを作成したいんですが、教えてください。 いまは画面を4等分にし、mouseClickedををつかったらランダムに選ばれたスペースを赤く塗り、もう一回mouseをクリックしたら、その赤く塗られたのは消えて、次のまたランダムに選ばれたスペースへと移動する。。それを何回もやるというプログラミングにしたいです。 sizeは600,600でそれぞれのrectは rect(0,0,300,300) rect(300,0,600,300) rect(0,600,300,300) rect(600,600,300,300) で区切ってます。ずっと時間かけてやってますが、これをどうやってrandomファンクションにし、それをランダムに選ばれたスペースをマウスクリックしたら赤く塗られるようにするかがもっていくかがどうしてもわかりません。 あと、もう一回クリックしたら前にクリックした場所が消えるというのもわかりません。 これが今までに書いたプログラムです。 いまはif elseをつかっています。 よろしくお願いします。 void setup() { size(600,600); strokeWeight(2); background(255); line(0,width/2,600,width/2); line(height/2,0,height/2,600); } void draw() { fill(255,0,0); } void mouseClicked() { if( mouseX <= width/2) { fill(255,0,0); rect(0,0,width/2,height/2); } else { rect(width/2,0,300,300); fill(255,0,0); } if (mouseX > height/2) { rect(0,width/2,height/2,height); fill(255,0,0); } else { rect(width/2,height/2,width,height); fill(255,0,0); } }
- 締切済み
- その他(プログラミング・開発)
- takomaru1201
- 回答数2
- 表を検索するVBAについての質問です。
表をVBAを使用して検索する時の質問です。 私はVBAは初心者です。業務上で面倒な作業をVBAを使用して簡略化しようとしています。 色々と試してみたのですが、エラーばかり出て上手くいきませんので、どなたかご教授頂ければと思います。 Sheet1に記載されている文字列を使用して、Sheet2から検索をしてその行にあるB列の値を取得するプログラムを組んでいます。 (Excel2007、2003) ■Sheet1 A列 ABC ■Sheet2 A列 B列 CBA 387 FHA 989 ABA 3746 ABC 4859 RKT 57 EHS 485 と言う感じになります。 以下の質問者と同じような質問になるのですが、 その回答を元にプログラムを組んでもエラーばかり出てしまいました。 http://www.japankonw.info/know/2010/2/163063.html 宜しくお願いします。
- ベストアンサー
- その他(プログラミング・開発)
- gori200088
- 回答数2
- 知っていたようで知らないことです
空白とタブとスペースは何がちがうのでしょうか?今まで、なんとなくやっていましたが、実は違いがわかりませんでした。どう使い分けるべきなのか、扱い方はどう異なるのか教えてくれませんか?
- ベストアンサー
- その他(プログラミング・開発)
- noname#182748
- 回答数8
- リストボックスの複数データをセルに転記する
よろしくお願いします。 複数表示させたリストの2番目のリストを抜いて 1、3、4、5番目のリストを、 シートAの、C6からF6に転記する With ListBox1 .ColumnCount = 5 .ColumnWidths = "150;0;150;0;0" ↑ .RowSource = "シートA!C6:F" & Worksheets("シートA").Cells(Rows.Count, 5).End(xlUp).Row End With
- ベストアンサー
- その他(プログラミング・開発)
- 1211M
- 回答数2
- リストボックスの複数データをセルに転記する
よろしくお願いします。 複数表示させたリストの2番目のリストを抜いて 1、3、4、5番目のリストを、 シートAの、C6からF6に転記する With ListBox1 .ColumnCount = 5 .ColumnWidths = "150;0;150;0;0" ↑ .RowSource = "シートA!C6:F" & Worksheets("シートA").Cells(Rows.Count, 5).End(xlUp).Row End With
- ベストアンサー
- その他(プログラミング・開発)
- 1211M
- 回答数2