２月９日（土）～１１日（月）まで３連休です。 お仕事は溜まってますがお休みは３日もあるのでつい余裕かまして・・・ ８日金曜日の深夜は久しぶりにドラクエⅧで遊んでました。 主人公はもちろんフル装備です♪  ゼシカを先頭にしてるのですがゼシカも衣装替えさせてますｗ  全員レベル９９まで上げたのでバトルしても敵が弱すぎて退屈でしたｗ しかし没頭してやってたら土曜日の朝９時になってましたｗｗｗ 朝食と簡単に済ませホールへ・・・・・ 等価のＣ姫打つも回らず５Ｋで断念！！ １パチコーナーが出来てたので覗いたらＣ姫が居たので移動。 ２Ｋで当って５箱近く溜まりましたが・・・・ ３００回転で単・・・・さらに３００回転で単(ﾉｎ｀*)ｼｸｼｸ･･･ 全部呑まれる直前にモニター北菜ちゃんで昇菜さま無し１５Ｒで当り 何とか３箱まで復活したのでヤメ。  ５０００発換金したら３０００円でしたm(__)m 満タンに入れたのに１箱千円とは・・・・。 マイナス４Ｋで終了！！  負けましたが大当り回数は自己最高の４７回でした♪ 徹夜明けでパチに逝って体力使い果たし・・・・ つい横になって目覚めたら日曜の朝でしたｗｗｗ まずい・・・お仕事手をつけて無い；； しかし今日も逝ってきましたｗ １パチにアクエリオン発見したので１パチアクエリオン・・・。 しかし１０Ｋ投資しても当らず；； ５Ｋ投資したあたりから気持ちに余裕がなくなりました。 ６Ｋ投資・・・・６箱出さなきゃならないのか・・・・ ７Ｋ投資・・・・７箱・・・厳しいなぁ・・ ８Ｋ投資・・・・８箱・・・出るか？そんなに ９Ｋ投資・・・・萌えない １０Ｋ投資・・・１０箱出しても儲け無しか・・・。 ヤメっ！！ やっぱ強欲な私に１パチは合わないようです^^; チィ菜さんイベントに参加すべく等価のＣ姫に移動＾＾ ３Ｋでイキマゼ北菜実写＆昇菜様実写で１箱ＧＥＴするも 全部呑まれ追加投資で単発を繰り返し・・・・ トータルマイナス２４Ｋでギブアップしました（１０Ｋは１パチアクエリオン） う～む２連敗です。 なかなか調子が戻りません＞＜ 先日オクで落札したＤＶＤも届いた事だし・・・。 明日は逝かないでＤＶＤ観てよっと・・・。  ってゆーか仕事しろよ！ 【お知らせ】 皆様ご存知の「東北の峰不二子」ことチィ菜さんのところで ２月１９日のブログ１周年を記念したパチ大会開催中です♪ 私も参戦中ですｗｗｗ 皆様も奮ってご参加してね～Ｏ(≧∇≦)Ｏ イベントの詳細はここをクリック さて・・・・ここから下はパチには関係ないので 興味の無い方はスルーしてくらはい・・・。 挫折しそうです・・・・ってゆーか挫折ですm(__)m エクセルＶＢＡなのですが・・・ なんか単純なことなのかも？？でも分からん＞＜ Sub point() Dim po As String Dim co As String co = Range("c27").Value Select Case co Case Is >= "1000" po = "商品券" Case Is >= "800" po = "図書券" Case Is >= "500" po = "入浴剤" Case Is >= "200" po = "タオル" Case Else po = "正しいコードを入力してください。" End Select MsgBox po End Sub ---------------------------------------------------------------- Sub point() Dim po As String Dim co As Integer co = Range("c27").Value Select Case co Case Is >= 1000 po = "商品券" Case Is >= 800 po = "図書券" Case Is >= 500 po = "入浴剤" Case Is >= 200 po = "タオル" Case Else po = "正しいコードを入力してください。" End Select MsgBox po End Sub --------------------------------------------------------- Sub point() Dim po As String Select Case Range("c27").Value Case Is >= 1000 po = "商品券" Case Is >= 800 po = "図書券" Case Is >= 500 po = "入浴剤" Case Is >= 200 po = "タオル" Case Else po = "正しいコードを入力してください。" End Select MsgBox po End Sub 。。。。。。1番目のプロシージャはダメダメでした なんで？？？ 2番目はintegerなんだけど、１・３はString ３はうまく行きます・・この違いはなんだろう？ 変数に値を代入してるかしてないかの違いくらいなのにね～ う～ん(-_-;) １番目がダメダメな理由・・・・  誰かぁ～ヘルプミィ～！！！ 詳しそうなお兄様・・・かトーマ様・・・特によろしくぅぅうううっ！！ |
戻る