検索結果

ExcelのVBAでマインスイーパーもどきを作っていますが、どうも上手くいきません。９が地雷で０が何もないと言うことです。以下、ソースです。 Sub mine() Dim minefield(11, 13) As Integer Dim i As Integer, a As Integer, b As Integer, x As Integer x = 0 Randomize For i = 1 To 20 a = Int(Rnd * 10) + 1 b = Int(Rnd * 12) + 1 If minefield(a, b) = 9 Then x = x + 1 i = i - 1 End If minefield(a, b) = 9 Next i MsgBox "地雷が" & x & "回重複" countMine minefield, 10, 12 showInt minefield, 10, 12 show minefield, 10, 12 End Sub Sub show(f() As Integer, h As Integer, w As Integer) 　Dim a As Integer, b As Integer For a = 1 To 10 For b = 1 To 12 If (f(a, b) = 9) Then CStr(f(a, b)) = "*" If (f(a, b) = 0) Then CStr(f(a, b)) = " " Next b Next a End Sub If (f(a, b) = 9) Then CStr(f(a, b)) = "*" If (f(a, b) = 0) Then CStr(f(a, b)) = " " の部分でコンパイル時に 「コンパイルエラー：修正候補　識別子」 とでます。ヘルプを見てもよくわかりませんでした。 テキストが長すぎるので途中は省きました。 よろしくお願いします。

ObjctiveCを用いてiPhoneApp開発の勉強をしています。 タイトルの通り、ナビゲーションバーのタイトルを2行で表示させたいのですがうまくできないので助言をいただきたいです。 こちらのサイトを参考に進めました。 （参考）http://www.yoheim.net/blog.php?q=20121203 こちらのコードをコピペするといろいろとエラーが出てしまうのですが、 まず一行目に表示するラベルのaddSubviewするところで、 [titleView addSubview:taskMessageLabel]; のように記述されていますが、まだtaskMessageLabelは作成されていません。 また、二行目に表示するラベルのtaskMessageLabelはUILabel *taskMessageLabelとすると思うのですが、それもされていません。 いろいろと手直しをし、以下のようにしたのですが、二行目のサブタイトルしか表示されませんでした。 どのようにすれば、きちんと二行でタイトルを表示することができるのでしょうか？ 回答お待ちしてます // ナビゲーションバーのtitleに表示する独自Viewを作成します。 UIView *titleView = [[UIView alloc] initWithFrame:CGRectMake(0, 0, 200, 40)]; titleView.backgroundColor = [UIColor clearColor]; titleView.opaque = NO; // ☆☆ポイントはここ！！ // 以下のように代入して、タイトルに独自Viewを表示します。 self.navigationItem.titleView = titleView; // 1行目に表示するラベルを作成して、 // 上記で作成した独自Viewに追加します。 UILabel *titleLabel = [[UILabel alloc] initWithFrame:CGRectMake(0, 0, 195, 20)]; titleLabel.font = [UIFont boldSystemFontOfSize:16.0f]; titleLabel.text = @"RSS"; titleLabel.textColor = [UIColor whiteColor]; titleLabel.textAlignment = NSTextAlignmentCenter; titleLabel.backgroundColor = [UIColor clearColor]; [titleView addSubview:titleLabel]; // 2行目に表示するラベルを作成して、 // 上記で作成した独自Viewに追加します。 UILabel *taskMessageLabel = [[UILabel alloc] initWithFrame:CGRectMake(0, 20, 195, 40)]; taskMessageLabel.font = [UIFont boldSystemFontOfSize:10.0f]; titleLabel.text = @"サブタイトル"; taskMessageLabel.textColor = [UIColor colorWithRed:104.0f/255.0f green:100.0f/255.0f blue:100.0f/255.0f alpha:1.0f]; taskMessageLabel.textAlignment = NSTextAlignmentCenter; taskMessageLabel.backgroundColor = [UIColor clearColor]; taskMessageLabel.adjustsFontSizeToFitWidth = YES; [titleView addSubview:taskMessageLabel];

金がたまるまでの仮自転車としてイオンバイクの折りたたみのスポーツバイクを買おうと思うんですけどどうでしょうか？ 16kmの通勤で利用します 本命はkhsのF20のドロップハンドルのやつです

http://proxy.f5.ymdb.yahoofs.jp/chiebukuro/a20/65/254/a206525423_1_320?jdkxNnPBoH7UuhOS こんなふうに、ほかの人物の写真を自然に合成する方法を教えてください！ ＧＩＭＰを使った方法でお願いします！

　 　アメリカの大学に通っていたのですが突然の家庭の事情により一時帰国することになりました。来年のスプリングセメスターには戻っきたいのですが、再度アメリカに入国する際に対して質問があります。F-1ビザでの入国になるのですが、入国時にI-20は必要になるのでしょうか。現在、受講していた全てのクラスドロップし、授業料を返金したため通っていた大学からのI-20は失効した状態です。アメリカに戻ってきてから新たに別の大学に願書をだし、I-20の取得をと考えているのですがそれは可能なのですか。よろしくお願いします。

これの処理条件の３番目のやり方がわからないのです。 （※４０歳以上はハンデとして２０加える） http://blog-imgs-58.fc2.com/f/o/r/foro/IMG.jpg どなたか教えていただけないでしょうか。

インターネットの接続ができません。有線にしようとネット回線をパソコンのLANと書いてあるとこに挿したのですが繋がりません。どうしてなのでしょうか？ PC FMV-DESKPOWER L20C/F WindowsXPです。

実行ファイルを逆アセンブルして出てきたjmp（far）というのが良く分かりません。これはどういう動作なんですか？ 対応するオブジェクトコードはFF 25 20 F1 40 00となっています。

「LUMIX G9 PRO」を購入予定ですが、パンフォーカスに最適なレンズを教えて下さい。 ※パンフォーカス＝焦点距離と絞りとピント位置などの理屈はわかっておりますが、初心者ですので、「パンフォーカスを行いやすいレンズ」というものがあればご教授頂きたいと思い質問させて頂きました。 条件： ＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝ ※「パンフォーカス」で、「室内」（部屋全体・リビングなどテーブル・ソファーや背景に壁などのインテリア。学校の教室のような空間全体）などの「静物」を主に撮ります。 ※望遠が必要な風景や、スポーツなどの動くものなどは撮りません。 ※とりあえずお金の事は考えずにベストなものをアドバイスして下さい。 ※初心者です。 ※三脚使用。 ※高画質を優先 ※マイクロフォーサーズ用レンズ ※下記の参考サイト以外のレンズでも可です。 参考サイト： https://panasonic.jp/dc/lens.html ＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝ 以上の条件を自分なりに考えると、やはり、パナかパナライカの中からで、 室内がメインなので、「広角」か「超広角」の方が良い？と考えると。。。 LUMIX G VARIO 7-14mm / F4.0 ASPH. https://panasonic.jp/dc/lens/products/lumix_g_vario_7-14.html LEICA DG VARIO-ELMARIT 8-18mm / F2.8-4.0 ASPH. https://panasonic.jp/dc/lens/products/leica_dg_vario_elmarit_8-18.html LEICA DG VARIO-ELMARIT 12-60mm / F2.8-4.0 ASPH. / POWER O.I.S.（キットレンズ） https://panasonic.jp/dc/lens/products/leica_dg_vario_elmarit_12-60.html などや、 単焦点で大口径の LEICA DG SUMMILUX 12mm / F1.4 ASPH. https://panasonic.jp/dc/lens/products/leica_dg_summilux_12.html あるいは、 LEICA DG SUMMILUX 15mm / F1.7 ASPH. https://panasonic.jp/dc/lens/products/leica_dg_summilux_15.html LUMIX G 20mm / F1.7 II ASPH. https://panasonic.jp/dc/lens/products/lumix_g_20_2.html などになるのかな～？と漠然と思っておりますが、如何でしょうか？ お時間ある時にでもアドバイス頂ければ幸いです。 宜しくお願いしますm(_ _)m

先日この欄で教えていただいたのですが、 確認を忘れてしまい、うまくゆかないので再質問させていただきます。 複数列の複数行（例A列3行～F列20行）に関数式によるデータが入っています。 これを縦１列に配置替えしてテキストにoutputするということで次のVBAを教えてもらったのですが 途中で止まってしまいました。お知恵を貸してください。 Sub closs() Dim myRng As Range Dim i As Long Sheets("データシート").Select Set myRng = Range(ActiveCell, ActiveCell.End(xlDown).End(xlToRight)) Sheets("貼り付け").Select For i = 1 To myRng.Columns.Count 　Range("A1").Offset((myRng.Rows.Count) * (i - 1)).Resize(myRng.Rows.Count) _ 　　= myRng.Columns(i).Value Next End Sub ※例としてA列3行～F列20行を１グループとして縦１列に配列替えをしてテキストに出力する。 ※マウスによるカーソル位置をデータトップのA3またはそれより上の空欄において実行する。 ※グループの途中（例A21～F24）を空欄（関数式なし）として次のグループが存在し、グループか存在する場合同じ作業を繰り返し 別のテキストにoutputする。 ※列を増やしたい場合の対応もできるようにしておく。 よろしくお願いします。

●店舗兼住宅の解体費用を知りたいのですが、、、 1.土地面積≒95坪（近隣商業地域） 2.前面６Ｍ公道、右側１Ｍ私道、左側と奥側は隣地 3.建物はおよそ以下のような混構造です。 　 １Ｆ　店舗・・・　鉄骨90坪（20坪程度が木造） ２Ｆ　店舗部分・・・鉄骨+鉄筋45坪 　　　住居部分・・・鉄骨+鉄筋45坪（20坪程度が木造） ３Ｆ　店舗部分・・・鉄骨+鉄筋45坪 　　　住居部分・・・木造15坪 ※アスベスト：吹き付けの使用はない。 50年程前の20坪の木造に、昭和40年～50年頃にかけて数回にわたり増築をしています。 （建物の図面がなく、建物登記もありません。構造的情報は父親の記憶のみ） 現在、建物の傷みがひどく雨漏りや外壁・内壁にヒビが見られること、増改築のせいで日照や段差など暮らしづらくなってること、ちかぢか近所にある橋の架け替え工事（工期２年）が始まり振動等で生活に支障があること、、等から、解体することを親に勧めています。ちなみに、前面道路は県の緊急避難路に指定されています。 解体後は、小さな木造住宅へ変更して両親に安全な住まいで暮らして欲しいと考えています。　　

http://www.amazon.co.jp/%E6%98%A0%E5%83%8F%E7%94%A8%E3%83%96%E3%83%AB%E3%83%BC%E3%83%AC%E3%82%A4%E3%83%87%E3%82%A3%E3%82%B9%E3%82%AF-%E3%81%8F%E3%82%8A%E8%BF%94%E3%81%97%E9%8C%B2%E7%94%BB%E7%94%A8-%E3%83%8F%E3%83%BC%E3%83%89%E3%82%B3%E3%83%BC%E3%83%88-%E3%83%AF%E3%82%A4%E3%83%89%E3%83%9B%E3%83%AF%E3%82%A4%E3%83%88%E3%83%97%E3%83%AA%E3%83%B3%E3%82%BF%E3%83%96%E3%83%AB-BV-E130S20W/dp/B0086SCVP0/ref=sr_1_3?s=computers&ie=UTF8&qid=1404517746&sr=1-3&keywords=20%E6%9E%9A BD-RE　20枚で、送料含めて、これより安い物ありますか。 もしあるようでしたら教えて下さい。 （ブルーレイレコーダーで使える物に限ります）

続投させていただきます。すみません。 10月19日まで通っていた学校のI-20期間(1年)が終了し 12月1日に往復チケットで一時帰国します。 あと4年有効のF1ビザを持っているので3ヶ月以内に 違う学校にまた留学しようと思っています。 日本にいるうちに新しい学校を探してI-20を取得し 戻ってこようと思っているのですが、 万が一なかなか学校がきまらないまま 復路航空券の日が来てしまった場合、 I-20なしで再入国することは可能でしょうか？ アメリカからの往復航空券のため、帰りの航空券の提示ができないので 観光で入国することはできませんよね？ もし可能な場合、アメリカに戻ってから学校を決め I-20を発行してもらって 学業に就くことはできますでしょうか？

あるプログラムで、TIMERというサブルーチンを作りました。適当に数値を変えてうまく行った値を採用したのですが、実際に処理時間が何秒かかるのかが分りません。 TIMER MOVLW 0x40 ;この40が採用した値です MOVWF WC1 LOOPT DECFSZ WC2,F　;WC2はあらかじめCLRされてます GOTO LOOPT DECFSZ WC1,F RETURN 見難くてすいません（TIMER、LOOPTがラベルです） 使用ハードはPIC16F84Aでクロック周波数は20[MHz]です。 たしか通常は一つの命令にクロック4周期分だった気がするので、最初の二行で8/20M[s]なのは分るんですが、LOOPTのDECFSZとかは４周期分じゃなかったような気がして、混乱してしまいました・・・。 知りたいのはRETURNで戻るまで（メインルーチンに戻るまで）です。 わかる方ご教示願います。

リフォーム工事で、築40年のRC三階建て住宅（歯科医院を併設・息子さん夫婦と同居・1F医院・2F依頼者の住宅・3F息子さん家族）で 現在給湯に関して、20年前より電気温水器を使用しており、今回エコキュートを進めようかと思っています。 世帯構成は、依頼者夫婦と弟さん、息子家族で計7人。 20年前の電気温水器と現在のエコキュートで、どのようにメリットがあるかの説明をどのようにしたら良いか、どなたか経験者の方で アドバイスいただけないでしょうか。 ポイントは、イニシャルコストとランニングコスト（電気代） 設備の取り替え費用・メンテナンス費用等。 また現在電気温水器のタンクをIFに設置しており、二階三階の浴室のシャワーが使えないとのこと。 これはエコキュートでも中間に圧力ポンプを設置すれは解決すると思うのですが。 よろしくお願いいたします。

教えてください。 10時以降の出勤、16時前の退勤をした場合に"○"を表示させる方法が分かりません。ちなみに、このようなシートを作成中です。 Ｃ　　　　Ｄ　　　　Ｅ　　　　Ｆ　　　　　Ｇ　　　　Ｈ　　　　Ｉ 出勤 　退勤 　計算用 　計算用 　　休憩 　　　計 　　計 11:16 　20:29 　11:30 　20:00 　　　1:00　　7:30 　　7.5 　Ｊ　　　Ｋ　　　　Ｌ　　　　Ｍ 休出 　深夜 　休暇 　ペナルティ 　7.0 　　0　　　　 Ｃ=出勤　　　Ｄ=退勤　　　Ｅ=ＣをCEILINGしたもの Ｆ=ＤをFLOORしたもの　　　Ｇ=休憩1：00が入力されている Ｈ=Ｆ-Ｅ-Ｇの式　　　　　　Ｉ=Ｈ*24の式 Ｊ=手入力　　　　　　　　　Ｋ=22時以降の深夜残業を計算する式 Ｌ=有給等手入力　　　　　　Ｍ=？？？？ 【このＭ列に入る式がわかりません】 先にも言いました、【10時以降の出勤または16時前の退勤】が該当したら"○"と表示させたいのですが、どなたか教えてください！！ よろしくお願い致します。

以下の２つのテーブルがあります T_個人情報　T_履歴情報 それぞれのフィールドは以下になります T_個人情報 【ID】オートナンバー、【個人番号】テキスト、【氏名】テキスト…【チェック20】yes/no T_履歴情報 …、【個人番号】テキスト、【オーダー番号】テキスト、【ポイント】テキスト… ※各テーブルの【個人番号】はリレーション F_処理フォーム フォームAにて【テキスト01】非連結、【テキスト02】非連結、【コマンド01】コマンドボタン ＜実現したい事＞ F_処理フォームにてT_個人情報のチェック20がONの該当者のみに以下の処理 【コマンド01】クリック→【テキスト01】に入力したデータを【オーダー番号】に 【テキスト02】に入力したデータを【ポイント】に、それぞれ追加したい。 例） T_個人情報 　001,123456,テスト次郎,…,yes 　002,123457,テスト三郎,…,yes F_処理フォーム 　テキスト01：55555　テキスト02：1000　コマンドボタン T_履歴情報 　…,123456,1111,200 　…,123456,2222,500 　…,123456,1133,800 　…,123457,1233,100 　　↓　　　↓ 　…,123456,55555,1000 　…,123456,1111,200 　…,123456,2222,500 　…,123456,1133,800 　…,123457,55555,1000 　…,123457,1233,100 よろしくお願いします

関数がわからなくて困っています。 基本は8:30～17:30 残業（早出含む）とされる時間帯 　5:00～7:30／17:30～19:30　この時間帯は1.0時間刻み 　（退社が18:00だと残業は0） 　7:30～8:30／19:30～24:00　この時間帯は0.5時間刻み 　（退社が20:00だと残業は2.5） 休憩は1:00（12:00～13:00） 以上の条件でＣ列―出社時刻、Ｄ列―退社時刻、 　　　　　　Ｅ列―勤務時間、Ｆ列―残業時間 で表を作った場合、Ｆ列の残業時間を出す式がわかりません。 （Ｅ列の勤務時間もですね。自分で考えたのはアヤシイ） E/F列は、例えば1時間30分なら1.5と出てくるようにします。 7:30出社で20:00退社の場合、勤務時間は8.0、残業時間は3.5となる ようにしたいのです。 時間の計算が苦手で・・・。どなたか教えてください。

ＬＰ－Ｍ５５００Ｆの自動両面印刷機構についてですが、ＡＤＦに２０ページある両面原稿をセットすれば自動的に両面を読みとって両面印刷できるのでしょうか？ （ブラザーのＡ４対応機種ですが、MFC-8820JNは偶数ページと奇数ページをメモリーしてからの両面印刷になるそうなのでＡ３機種ですがＬＰ－Ｍ５５００Ｆもそうなのか疑問なので教えて下さい。） また、この原稿を１０部作成したいときには枚数を１０枚とセットすれば１０セットコピーしてくれるのでしょうか？（これもMFC-8820JNは部数設定ができないそうなのでＬＰ－Ｍ５５００Ｆもそうなのか疑問なので教えて下さい。） その際、１ページから２０ページ毎にソートして印刷してくれるのでしょうか？ この機種の購入を考えています。使っている方教えて下さい。

こんんちは。 実は、皮膚科でもらった薬なのですが、何に効くのか分からなくなってしまいました。 二つとも飲み薬ですが、薬の名前は商品名でしか分かりません。どなたかご存知の方、教えて下さい！ (1) コタロー 「黄連解毒湯」・・・カプセル (2) 山之内 「SP（あるいは５７？）Ｆ２０」・・・錠剤 よろしくお願い致します。