[表示 : 全て 最新50 1-99 101- 201- 301- 401- 501- 601- 2chのread.cgiへ]
Update time : 04/17 03:23 / Filesize : 157 KB / Number-of Response : 698
[このスレッドの書き込みを削除する]
[+板 最近立ったスレ&熱いスレ一覧 : +板 最近立ったスレ/記者別一覧] [類似スレッド一覧]


↑キャッシュ検索、類似スレ動作を修正しました、ご迷惑をお掛けしました

VB.NET質問スレ(Part38)



1 名前:デフォルトの名無しさん mailto:sage [2011/12/28(水) 23:43:48.38 ]
前スレ
VB.NET質問スレ(Part37)
toro.2ch.net/test/read.cgi/tech/1317448996/

2 名前:デフォルトの名無しさん mailto:sage [2011/12/29(木) 04:55:24.41 ]
公式
Visual Basic デベロッパー センター: 開発 | MSDN
msdn.microsoft.com/ja-jp/vbasic/ms789056
Visual Basic 2010 Express 日本語版 ダウンロード (無料)
www.microsoft.com/japan/msdn/vstudio/express/


入門・解説サイト
Visual Basic/C# - @IT
www.atmarkit.co.jp/channel/vbcs/vbcs.html
DOBON.NET プログラミング道 - .NET Tips
dobon.net/vb/dotnet/index.html
C# と VB.NET の入門サイト
jeanne.wankuma.com/

3 名前:デフォルトの名無しさん mailto:sage [2011/12/29(木) 07:03:11.71 ]
埼玉から三重に車で高速使わないで行くのはどんなルートで?

4 名前:デフォルトの名無しさん mailto:sage [2011/12/29(木) 18:17:00.20 ]
VB6使っていて.NET初心者なんですが、つまらない事と思いますが教えて下さい。

NotifyIconでタスクトレイに作ったアイコンからフォームを開いて、そのフォームがロストフォーカスしたら、自身をハイドさせたいと思っています。
空のフォームだとうまく行くのですが、コントロールを貼り付けると隠れてくれなくなります。
どうしたら良いものか、ご教示下さいませ。
宜しくお願いします。


5 名前:デフォルトの名無しさん mailto:sage [2011/12/29(木) 18:26:16.22 ]
リストボックスを2列にするには
マルチコーロムをTrueにしたあとなにおすれば

6 名前:デフォルトの名無しさん mailto:sage [2011/12/29(木) 19:30:18.54 ]
>>4
ボタンを1つ貼り付けてDeactivateでHideしたけど隠れるな・・・

>>5
MultiColumnのみでいいけど、単に折り返して表示にするだけやぞ

7 名前:デフォルトの名無しさん mailto:sage [2011/12/29(木) 19:49:44.58 ]
>6 さん
有り難うございます!
DeActivateというイベントがあるんですね、知りませんでした…。
会社出てしまい確認出来ませんが、明日試してみます。


8 名前:デフォルトの名無しさん mailto:sage [2011/12/30(金) 04:39:17.38 ]
DataTabelのDataColumnをつくるときに
DataColumnのStringとかInt32とかの型をしていしなかったばやいは
なんの型になるんだ?

9 名前:デフォルトの名無しさん mailto:sage [2011/12/30(金) 07:44:16.76 ]
列名のみ引数のAddだと、既定は文字列型って書いてあるな。

10 名前:デフォルトの名無しさん mailto:sage [2011/12/30(金) 07:55:28.85 ]
variantじゃないのはなぜ



11 名前:デフォルトの名無しさん mailto:sage [2011/12/30(金) 08:25:36.09 ]
動きが把握し易いからじゃね?
"Col1":Object,"Col2":Object,"Col3":Object:"Col1+Col2"
こんな感じに列を定義すると、Col3の値は以下の通り。
111,222 -> 333 : Int32
"111","222" / 111,"222" / "111",222 -> "111222" : String
慣れない内から代入時の型とか一々意識させられる事を考えれば、まあ妥当な対応かと。

12 名前:デフォルトの名無しさん mailto:sage [2011/12/30(金) 19:33:24.96 ]
環境設定を変更したら
いったんアプリを終了して
また再起動しないと
設定変更が反映されないソフトから脱却するにはどうすれば

13 名前:デフォルトの名無しさん mailto:sage [2011/12/30(金) 21:35:37.98 ]
>>12
まず他人が読んで何を言ってるのか理解できるように書こう。

14 名前:デフォルトの名無しさん mailto:sage [2011/12/30(金) 22:40:08.63 ]
unixだとsignal送ったりするんだが、windowsだから何かmessageを送るんじゃね?

15 名前:デフォルトの名無しさん mailto:sage [2011/12/30(金) 23:24:18.43 ]
Windowsサービスだと似たような通知機構があるけど、
この場合、GUIプロセスの話だろうなあ。
適時、My.MySettings.Default.Reloadを呼び出す感じになるのだろうか。

16 名前:デフォルトの名無しさん mailto:sage [2011/12/31(土) 05:06:25.78 ]
これでエラー出るのなんとかならんの
Dim S1, S2, S3 As String = ""


17 名前:デフォルトの名無しさん mailto:sage [2011/12/31(土) 09:05:41.49 ]
言語仕様だしなあ。纏めて型指定するなら初期値指定は諦めるしか。
Dim S1$, S2$, S3$ = ""
Dim S1%, S2%, S3$ = ""
VB2010で試してみたけど型宣言文字でも駄目だな。
というか違う型でも何故かエラーだw

18 名前:デフォルトの名無しさん mailto:sage [2011/12/31(土) 12:36:31.31 ]
Dim S1, S2, S3 As New String("")
で一応出来ないことはないけど、わざわざ書き方変えてまでやるほどじゃないかな

19 名前:デフォルトの名無しさん mailto:sage [2011/12/31(土) 22:35:28.46 ]
クリスマスから今日まで-100000
なので
パチンコ台を改造するVB.NETコードきぼんぬ

20 名前:デフォルトの名無しさん mailto:sage [2012/01/01(日) 02:54:28.63 ]
Dimって.NETで仕様が変えられた命令だしなぁ



21 名前:デフォルトの名無しさん [2012/01/01(日) 19:13:59.70 ]
そもそも命令じゃないから

22 名前:デフォルトの名無しさん mailto:sage [2012/01/01(日) 19:36:32.69 ]
実行ファイルのあるディレクトリでなく
\bin\Debug
にStartUpPathがなっちゃう
不思議
デバッグ時じゃなくても

23 名前:デフォルトの名無しさん mailto:sage [2012/01/01(日) 20:10:44.23 ]
デバッグ時かどうかは関係ないかと

24 名前:デフォルトの名無しさん mailto:sage [2012/01/01(日) 23:08:02.63 ]
>>22
そこに実行ファイルがあるからな。

25 名前:デフォルトの名無しさん mailto:sage [2012/01/05(木) 13:35:54.08 ]
そこに山があるから、登るんだ。

26 名前:デフォルトの名無しさん mailto:sage [2012/01/05(木) 20:54:16.52 ]
ウィンドウのなかにフォームがいっぱいあるアプリをつくるにはどーすれば
nyannyan3.minidns.net/up/2012_01_05a-A4-002.png


27 名前:デフォルトの名無しさん mailto:sage [2012/01/05(木) 20:56:19.59 ]
MDIだけど
今時流行らん時代遅れのUI

28 名前:デフォルトの名無しさん mailto:sage [2012/01/05(木) 21:13:45.62 ]
急にアイデアがわいたけど
子フォームたくさん
はやめて、
メインのForm1から
Form2.Show
Form3.Show
...........
FormN.Show (N→limit∞)
として、
WindowsのタスクバーにわForm1のバーしか表示されないようにするにはどぅーすれば

29 名前:デフォルトの名無しさん mailto:sage [2012/01/05(木) 22:09:14.44 ]
ショウインタスクバーをフォルるだけ。

30 名前:デフォルトの名無しさん mailto:sage [2012/01/05(木) 22:30:48.32 ]
最近のはやりはなんなのさ?




31 名前:デフォルトの名無しさん mailto:sage [2012/01/05(木) 22:59:45.19 ]
タブ

32 名前:デフォルトの名無しさん mailto:sage [2012/01/06(金) 00:10:47.31 ]
WinFormsのTabControlは微妙なんだよな
VB6は大っキライだけど、その点はSSTaBのがデザインも
操作もしやすかった

33 名前:デフォルトの名無しさん mailto:sage [2012/01/06(金) 00:14:11.32 ]
>>32
それはたぶん、TabPageをコンテナとして使わないといけないと思い込んでるだけ。

34 名前:デフォルトの名無しさん mailto:sage [2012/01/07(土) 02:12:54.11 ]
フォームに線を引くコントロールが見当たらないんだけど?

35 名前:デフォルトの名無しさん mailto:sage [2012/01/07(土) 02:25:59.44 ]
PowerPacksかラベル

36 名前:デフォルトの名無しさん mailto:sage [2012/01/07(土) 07:19:12.70 ]
Encodingの指定に書くときの
UTF8かUTF-8かutf8かutf-8かいつもわすれちゃうんだけど

37 名前:デフォルトの名無しさん mailto:sage [2012/01/07(土) 07:37:33.32 ]
ハイフン無しは論外だけど、大文字小文字の区別はされない。
XMLファイルなら書く必要すらないし。

38 名前:デフォルトの名無しさん mailto:sage [2012/01/07(土) 08:45:50.41 ]
Encoding.UTF8
って書くからなあ…


39 名前:デフォルトの名無しさん mailto:sage [2012/01/08(日) 18:51:22.90 ]
nyannyan3.minidns.net/up/2012_01_08a-VBNETico.png
Form1のアイコンじゃなくてexe自体のアイコンをアプリ実行時に変更するにわ?

40 名前:デフォルトの名無しさん mailto:sage [2012/01/08(日) 18:59:51.48 ]
exeファイルのアイコン変更はAPIの範疇になるな。
msdn.microsoft.com/en-us/library/ms648008(VS.85).aspx
「Updating Resources」辺りを.NETで実装すればよろし。



41 名前:デフォルトの名無しさん mailto:sage [2012/01/08(日) 19:24:26.07 ]
LINQは勉強しなくても一生なんとかなるかしら

42 名前:デフォルトの名無しさん mailto:sage [2012/01/08(日) 20:16:41.10 ]
自分で同じルーチン作ればやらんでもいいんじゃないのか・・・

43 名前:デフォルトの名無しさん mailto:sage [2012/01/08(日) 20:30:06.24 ]
LINQは高階関数とか拡張メソッドとかが分かってれば基本部分はすぐに分かる。
それこそ1日もかからない位なので、休日に適当な文書読んでね。

44 名前:デフォルトの名無しさん mailto:sage [2012/01/08(日) 21:50:34.48 ]
Button1,Button2,Button3
のあるForm1で
Form1_Activate
のイベントプロシージャ
のところに
Button3.Focus
と書いても
アプリ起動直後にButton3にフォーカスが行かないのは仕様なのかい

45 名前:デフォルトの名無しさん mailto:sage [2012/01/08(日) 22:03:11.32 ]
うん

46 名前:デフォルトの名無しさん mailto:sage [2012/01/08(日) 22:13:12.19 ]
ContainerControl.ActiveControl プロパティ
ttp://msdn.microsoft.com/ja-jp/library/system.windows.forms.containercontrol.activecontrol.aspx

47 名前:デフォルトの名無しさん mailto:sage [2012/01/09(月) 02:06:50.19 ]
Shownイベントにでも記述してはどうでしょうか

48 名前:デフォルトの名無しさん mailto:sage [2012/01/09(月) 19:20:41.78 ]
1/100で当りを引くプログラムはこれでいいのかしら。

Dim cRandom As New System.Random
Dim iR As Integer
iR = cRandom.Next(1, 100 + 1)


49 名前:デフォルトの名無しさん mailto:sage [2012/01/09(月) 19:22:05.60 ]
Randomは毎回newするもんじゃないぞ

50 名前:デフォルトの名無しさん mailto:sage [2012/01/09(月) 20:10:27.00 ]
それだと1〜101になるな。+1は蛇足。



51 名前:デフォルトの名無しさん mailto:sage [2012/01/09(月) 20:18:14.86 ]
>>50 なんないよ

52 名前:50 mailto:sage [2012/01/09(月) 21:41:19.25 ]
   ∧∧
   /⌒ヽ) うどんで吊ってくる……
  i三 ∪
 ○三 |
  (/~∪
  三三
 三三
三三三

53 名前:デフォルトの名無しさん mailto:sage [2012/01/10(火) 21:51:58.08 ]
Process.Start("ハローワールド.exe",いんすう)
ハローワールドアプリのウィンドウを
いんすうによって
最小ウィンドウ、最大ウィンドウ、ノーマルウィンドウ
に制御することできたっけ?

54 名前:デフォルトの名無しさん mailto:sage [2012/01/10(火) 22:06:26.63 ]
い、引数

55 名前:デフォルトの名無しさん mailto:sage [2012/01/10(火) 22:33:45.23 ]
マジっぽいから困る

56 名前:デフォルトの名無しさん mailto:sage [2012/01/10(火) 22:44:34.46 ]
jeanne.wankuma.com/tips/vb.net/process/startinfo.html

57 名前:重水素 mailto:sage [2012/01/11(水) 13:24:37.05 ]
Visual Basic 2010に於いて、データベースアプリの作成に取り組んでいます。

Bindingsourceを基本に組んでいるのですが(一部はSQLを使ってます)、頭の中で流れをイメージで
きていないため、構築で困ってる点があります。

■状況
1.humanテーブルには個人のマスタが入ってます
2.rirekiテーブルには各個人の様々な履歴が入っています
3.Bindingsourceの名前はA.Bindingsourceとします

1.のフォームを作り、1.のIDに基づくデータを起動時にA.Bindingsourceに取り込んでDataGridに
表示していますが、色々な理由があって、以下の処理をしたいのです。

1.今表示しているhumanのIDに基づく表示をしたあと、ボタンを押してDatagridに表示中のデータを消去
2.ある計算結果をそこへ挿入
3.フォームを閉じる時に、A.Bindingsourceの内容をデータベースに反映(消去を反映し追加を反映)

3.はTableadapter.updateall(me.morimori)でできるので問題にならないと思うのですが、反映した時に、
me.morimoriに入っている消去前のデータは消え、2.のデータが入るのでしょうか?

また、ここが本題なのですが、1.と2.の流れはどのように書いたら良いでしょうか?
当方、AccessでのDAOしか経験がないため、なかなかに難しくて悩んでます。

58 名前:デフォルトの名無しさん mailto:sage [2012/01/11(水) 13:41:47.29 ]
>>26
>>27
Access使いゆえに、MDIはとても馴染みがあるのですが、Single Windowのタブ管理ですか。。。

例えば、images.six.betanews.com/screenshots/1043809773-1.jpg のような感じで
管理するようなアプリの場合

1.左側のペインはどういうコントロールで実現しているのか?
2.右側のペインはどういうコントロールで実現しているのか?

が気になります。Visual Basic 2010だとSplitContainerを配置して、それぞれの中にそれぞれPanel
をいくつもつくって、小さくして切り替えて表示みたいな感じなんですかね?

ウィザードもどきは自作したのですが、そんな感じで作ったのですが、みなさんどうしてらっしゃるのかなと。
それとも、SplitContainerの中にTabコントロールを入れてるとか?

59 名前:58 mailto:sage [2012/01/11(水) 13:55:37.52 ]
>>27>>31
タブじゃないけれど、形をつくってみたのですが、こんな感じ
www.rupan.net/uploader/download/1326257480.jpg

右下のペインの中にいくつものパネルコントロール配置して、左のリストビュー的な何か(ここをどうしたらいいものか)
のアクションによって切り替える。

タブだとこの場合うまくない(タブの耳の部分が消せればいいのですが)

60 名前:デフォルトの名無しさん mailto:sage [2012/01/11(水) 14:00:32.74 ]
>>59
やりたいことはわからないけどたぶんこれの応用でできると思う。
dobon.net/vb/dotnet/form/formwithinform.html



61 名前:デフォルトの名無しさん mailto:sage [2012/01/11(水) 14:02:46.61 ]
>>59
そのパネルは何に使うの?

>>60
それやるぐらいならMDIの方がいいかと

62 名前:デフォルトの名無しさん mailto:sage [2012/01/11(水) 14:13:41.69 ]
>>61>>60
このパネルは左側のリストビューのアイコンをクリックした時に表示する項目類を、項目ごと
にパネルに納めるものです。

普段はvisibleをfalseにしていますが、右のリストビューのアイコンに応じてtrueにするという
やり方です。自分の頭脳ではこれくらいしか、切り替え方法を思いつきませんでした。

なので、みなさんこういうSDIなプログラムで内容切り替えや、例えばウィザードのようなもの
ってなんか旨い方法あるのかなぁと。

※今まではこういうのをAccessの流れもあって、MDIで作ってました。

※左側のペインのリストビュー的なもの(これは本当はどんなコントロールなのか・・・)には
1.設定
2.マスタ登録
3.マスタ更新

なんて具合にいくつものアイコンが縦に並んでいてボタンみたいにしたいですね。どうしたら
よいのかはわからないのですが。

なんか、綺麗な方法ってあるんですかね?自分で作っていて、すごく力技というかゴリ押し
で作ってる感がすごくしていて・・・

63 名前:58 mailto:sage [2012/01/11(水) 14:15:38.69 ]
ちなみに、右側はsplitcontainerの中にさらに縦のsplitcontainer入れてます。

こういうUIの作り方ってやっぱり、汚いやり方になりますか?

Accessのようにサブフォーム(>>60の手法はちょっとアレゲなんですが)が便利
でこういう3ペインも楽チンに作れたのですが。

64 名前:デフォルトの名無しさん mailto:sage [2012/01/11(水) 14:19:51.02 ]
>>63
作れるよ
だって右下のペイン内にフォームを開けばいいんだから
超楽チンに作れるよ

65 名前:デフォルトの名無しさん mailto:sage [2012/01/11(水) 14:23:03.43 ]
>>64
すると、フチなしでアンカー右下ペインにぴったしにハマってくれると。

フォーム単位での項目表示切り替えだと綺麗に管理できそうですが。

66 名前:デフォルトの名無しさん mailto:sage [2012/01/11(水) 14:27:11.00 ]
>>65
うん。その通り。
飲み込みが早いすな。

67 名前:デフォルトの名無しさん mailto:sage [2012/01/11(水) 16:36:36.85 ]
>>66
ちょっとやってみます。

これなら、パネルコントロールのあれやこれやでやるより、スマートに管理できるかも。

68 名前:デフォルトの名無しさん mailto:sage [2012/01/11(水) 17:47:22.71 ]
>>67
かもじゃなく確実にできます。

69 名前:デフォルトの名無しさん mailto:sage [2012/01/11(水) 20:32:07.03 ]
別にSplitContainer重ねるのが悪いとは思わんが?
普通に5つ6つ重ねるし
プログラミングに綺麗も汚いもない。要は目的が果たせればいい
今動いてるプログラムが良いプログラムだから

70 名前:デフォルトの名無しさん mailto:sage [2012/01/11(水) 22:17:50.43 ]
>>68
ありがとうございます

>>69
なるほど
どうしても慣れない開発環境だと、このやり方でいいのかなと迷うこと山の如しだったのですが、頑張って完成させて見たいと思います。

こういう問題を解決してくれるような虎の巻があったらいいんですけれど。

それでは、また



71 名前:デフォルトの名無しさん mailto:sage [2012/01/13(金) 06:10:55.82 ]
If "メンマ" = "シナチク" Then
MsgBox("True")
Else
MsgBox("False")
End If
なぜかトルーじゃなくファルスが帰ってきちゃうんだけど

72 名前:デフォルトの名無しさん mailto:sage [2012/01/13(金) 06:53:49.27 ]
死ね

73 名前:デフォルトの名無しさん mailto:sage [2012/01/13(金) 07:28:13.92 ]
72が貧乏になるように呪いをかけた

74 名前:デフォルトの名無しさん mailto:sage [2012/01/13(金) 07:28:57.87 ]
72を毎日しねしねと思うことにした

75 名前:デフォルトの名無しさん mailto:sage [2012/01/13(金) 07:44:45.46 ]
>>71
ja.wikipedia.org/wiki/%E3%83%95%E3%82%A1%E3%83%AB%E3%82%B9_(%E6%80%A7)
よかったじゃん。

76 名前:デフォルトの名無しさん mailto:sage [2012/01/13(金) 07:53:12.03 ]
めんまであの花ねたかと思ってしまった俺乙

77 名前:デフォルトの名無しさん mailto:sage [2012/01/13(金) 09:54:06.17 ]
おねてぃ

78 名前:デフォルトの名無しさん mailto:sage [2012/01/13(金) 10:46:18.24 ]
winformで拡大縮小表示機能を持った画面を作れる、.net framework互換ライブラリはありませんか?
WPFをwinformの文法で使えるようにラッピングするライブラリでも良いです。

79 名前:デフォルトの名無しさん mailto:sage [2012/01/13(金) 14:22:26.38 ]
ElementHostじゃだめなんでせう?

80 名前:デフォルトの名無しさん mailto:sage [2012/01/13(金) 14:27:12.17 ]
コントロールのプロパティやメソッドに互換性がないとダメです…



81 名前:デフォルトの名無しさん mailto:sage [2012/01/13(金) 16:48:07.54 ]
すごいつまらん質問ですまんが、
bit落とした白黒2色bitmap吐き出すには、
自力でヘッダとかつけて吐き出すしかない?


82 名前:デフォルトの名無しさん mailto:sage [2012/01/13(金) 21:04:45.14 ]
自分のアプリから他のアプリを
ProcessでKillしちゃうと他のアプリのForm Closingイベントとかわ起こらないんでしょ?
起こるように他人を閉じるにはどおすれば

83 名前:デフォルトの名無しさん mailto:sage [2012/01/13(金) 21:06:16.33 ]
>>81
WPFで一発

84 名前:デフォルトの名無しさん mailto:sage [2012/01/13(金) 22:14:39.20 ]
こないだからこの気違いは何なの?

85 名前:デフォルトの名無しさん mailto:sage [2012/01/14(土) 00:04:39.19 ]
>>81
Format1bppIndexedのイメージを保存したら勝手になるだろ。

86 名前:デフォルトの名無しさん mailto:sage [2012/01/14(土) 08:14:55.57 ]
ボタンに&をただたんに表示には?
アンダーバーが付いちゃう

87 名前:デフォルトの名無しさん mailto:sage [2012/01/14(土) 08:24:14.70 ]
&&

88 名前:デフォルトの名無しさん mailto:sage [2012/01/14(土) 22:52:57.06 ]
UseMnemonicプロパティをFalseにするんだ

89 名前:デフォルトの名無しさん mailto:sage [2012/01/14(土) 23:36:56.48 ]
SendInputって.netのメソッドなんですか?

90 名前:デフォルトの名無しさん mailto:sage [2012/01/14(土) 23:39:07.31 ]
>>82
CloseMainWindow



91 名前:デフォルトの名無しさん mailto:sage [2012/01/15(日) 00:29:16.55 ]
>>89
EnvDTE.CommandWindowインターフェースのメソッドだな。

92 名前:デフォルトの名無しさん [2012/01/15(日) 12:50:01.94 ]
webbrowserコントロールで表示されている文字列のみを取得するにはどうすればいいでしょうか
仮にwww.google.co.jpだとすると、

検索 画像 動画 地図 ニュース ショッピング Gmail もっと見る ▼翻訳
書籍
Scholar
ブログ
・・・

といった感じです。
htmlソースから取得する方法しか無いでしょうか。

93 名前:デフォルトの名無しさん mailto:sage [2012/01/15(日) 13:18:07.95 ]
ウィンナーってのがあるだろ

94 名前:デフォルトの名無しさん [2012/01/15(日) 17:39:56.22 ]
>>93
ありがとうございます!
レスを参考にさせていただき、エクセルvbaからクエリで取得するという方法に至りました
本当にありがとうございました

95 名前:デフォルトの名無しさん mailto:sage [2012/01/15(日) 17:41:50.84 ]
んな回りくどいことしなくてもDOMのOuterTextで取れるぞ

96 名前:デフォルトの名無しさん [2012/01/15(日) 18:15:25.26 ]
ありがとうございました・・・
この四時間の苦労は一体

97 名前:デフォルトの名無しさん mailto:sage [2012/01/16(月) 11:26:50.38 ]
文字列(たとえば住所)のマスキングについて質問です。
全角、半角文字を任意の全角、半角文字(あ,A)に置換したいのですが
一番簡単な方法は何でしょうか?
マスキングしたデータは元に戻せなくて良いのですが
1文字ずつ全角、半角文字を判定しながら置換するしかないですか?

98 名前:デフォルトの名無しさん mailto:sage [2012/01/16(月) 20:20:24.94 ]
適当な住所を例に、これを、こうしたいと書いてくれ。

99 名前:デフォルトの名無しさん mailto:sage [2012/01/17(火) 02:01:51.64 ]
ガチ初心者です。考えすぎて頭が爆発しそうです。
麻雀のシミュレーションソフトを作ろうと試行錯誤しています。
Dim hai(135) As String
hai(0) = "萬1"
hai(1) = "萬1"
hai(2) = "萬1"
hai(3) = "萬1"
hai(4) = "萬2"
・・略・・
hai(135) = "中"
というような配列を作っています。
手牌はDim tehai1, tehai2, tehai3, tehai4, tehai5, tehai6, tehai7, tehai8, tehai9, tehai10, tehai11, tehai12, tehai13 As Stringという風においてあります。
この136個の中からランダムに手牌に13個持ってきてなおかつ1種類の牌につき4つまでしかでないという様に設定するにはどうすれば良いでしょうか。
最終的にtehai1に持ってきた牌を設置してあるボタンtehaib1にテキスト状態で表示させたいです。
Randomize()を使うのでしょうか?

100 名前:デフォルトの名無しさん mailto:sage [2012/01/17(火) 03:00:01.23 ]
もうひとつシャッフル用の配列(ランダムに並んだ状態の配列)を作って先頭から取り出せばいいだけ。
Fisher?Yates法でシャッフルすればいいよ。








[ 続きを読む ] / [ 携帯版 ]

次100 最新50 [ このスレをブックマーク! 携帯に送る ] 2chのread.cgiへ
[+板 最近立ったスレ&熱いスレ一覧 : +板 最近立ったスレ/記者別一覧]( ´∀`)<157KB

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef