java 忘備集 01

■Int パース 1: final int dec = 254;final String bin = Integer.toBinaryString(dec);System.out.println(bin); 2: String hoge = "1";int num = Integer.parseInt(hoge);System.out.println(num); ---------- ■String パース int num = 1; String str = S…

すっきりわかるjava p.116 switch

public class Switch118 { public static void main(String[] args) { System.out.println("あなたの運勢は・・・"); // 1 ~ 4 の乱数 int fortune = new java.util.Random().nextInt(4) + 1; switch (fortune) { case 1: System.out.println("大吉"); brea…

すっきりわかる java P.94 問題 

public class Q094 { public static void main(String[] args) { System.out.println("ようこそ占いの館へ"); System.out.println("あなたの名前を入力してください"); // 文字列 を keyboard 入力で取得 String name = new java.util.Scanner(System.in).ne…

C言語 拡張表記 01 \b

・\b カーソルを1つ手前に戻す。--------- 例: #include <stdio.h> #include <stdio.h> #include <time.h> /*--- 一定時間の処理停止 ---*/int sleep(unsigned long x) { clock_t c1 = clock(), c2; /*--- clock型 オブジェクト ---*/ do { /*--- エラー処理 ---*/ if *1 == (clock_t</time.h></stdio.h></stdio.h>…

第3回 WordPress カスタマイザー 作成方法 _01

ボンジュール。 今回は、WordPressのオリジナルテーマを作成したら、多分多くの人がやりたくなることを作っていきたいと思います。 オリジナルテーマを作成したら、そのテーマを販売したり、無料で配布したり、仕事で使ったりと、色んな選択肢があります。 …

PHP 残数管理 師匠からの教え SQLぶっ叩け

ど〜もです! GW最高ですね。 GWが1年間続いて、お金が月30万くらい入ってくれば。。。 最高ですね。 引き寄せよ法則ーーー>働け!!!GW!GW!GW! !!--------- fuck -------------!! っていう事で、 今日は、僕のプログラミングのお師匠さんのお言葉で、教…

C言語 勝手に学び舎 開校 第2回 なんと・・・・ おみくじ ^-^  です。

開発環境 Windows用 C言語ツールWindows用 C言語ツール ダウンロード ↓ https://forest.watch.impress.co.jp/library/software/gakucgengo/ Mac: C言語コンパイル方法(X-code)グーグルで 「x-code C言語 コンパイル方法」と検索すると出てきます。 /*----…

JavaScript 勝手に学び舎 開校 第2回 なんと・・・・ おみくじ ^-^  です。

こんにちは。どうもです。 学び舎の第二回は、ま~つかい古された、おみくじをやりたいと思います。 完成形URL http://tokotoko6667777.hippy.jp/omikuzi-blog/ 今回の大事な要点は、 自分で、確率を決める。 これは、改めて自分でコーディングしてみて、奥…

楽天 作業 fa??k バナー追加作業

Sub add() Dim i As Long For i = 2 To Cells(Rows.Count, 2).End(xlUp).Row Cells(i, 24).Value = Cells(i, 24).Value & "<p style=""margin:25px 0 25px 0px;""><img src=""https://image.rakuten.co.jp/gift-concierge/cabinet/b-nn/recycling.jpg"" width=""418"" height=""236""></p>" Cells(i, 25).Value = Cells(i, …

PHP 管理カレンダー weekly-manager.php ソース システム部分完成しました。

・完成の日付はバレンタインにさせて頂きました。。。。。 コード

(プログラミグの学び舎 01 VBA)楽天ECサイトへのCSV商品登録。

・初めましてtossyです。 来年からプログラミングも義務化されるということで、僕も、何か感化されまして、プログラミング学習中の方や、プログラミングをこれから勉強する方は、または業務を短縮して良い世界を作りたい方へ、少しでも役に立てればと思い、…

PHP 管理カレンダー weekly-manager.php ソース

↑ 現在の作業画面です。 ソースコード ---------------

Ajax 基本

kanri-top.php ------- // ボタン <li class="target" id="button01"><a href="" class="navi">メニュー</a></li> // 呼び出す箇所 <div id="sample01"></div> <script src="https://ajax.googleapis.com/ajax/libs/jquery/1.12.4/jquery.min.js"></script> <script type="text/javascript"> $(function(){ $('#button01').click(functio…

PHP MySQL JOIN

// plan_tableのid に ユーザーが選択した、user_f01テーブルの$plan_loom_type で、 pan_table の中身を表示する。 $re=$s->query("SELECT * from plan_table join user_f01 on plan_table.id = $plan_loom_type;");

VBA イベントWorksheet_Change 数値入力判別チェック フィルドラッグ対応

Private Sub Worksheet_Change(ByVal Target As Range) ' イベント 値が変わったら フィルドラッグ対応 '範囲が1と複数を分岐させて、複数のtarget = コピペや フィルドラッグなどには foreach で回す Dim c As Object If Target.Column = 8 Then ' H列 If …

VBA イベントWorksheet_Change 数値入力判別チェック

'シートモジュールに記述 シートモジュール出し方 シートタブの上で「右クリック」→「コードの表示」に記述 Private Sub Worksheet_Change(ByVal Target As Range) ' イベント 値が変わったら If Target.Column = 8 Then ' H列 If Target.Value = "" Then Ta…

VBA 作業済み チェック 判定

VBA

Sub colorCheck() ' ・値が入っていなかったら 塗りつぶしなし ・入っていたら 「黄色」 Dim i As Long For i = 2 To Cells(Rows.Count, 1).End(xlUp).Row If Range("H" & i).Value = "" Then Range("B" & i).Interior.ColorIndex = 0 ' 塗りつぶしなし Else…

PHP mysql ユーザー画面 sabmit.php

VBA 文字列 チェック 色を付ける

VBA

Sub color() 'D列に 文字列 男の子 => 隣のC列を「青」 女の子だったら 「赤」 Dim i As Long For i = 2 To Cells(Rows.Count, 1).End(xlUp).Row If Range("D" & i).Value = "男の子" Then Range("C" & i).Interior.ColorIndex = 5 '青 ElseIf Range("D" & i…

PHP clone 日付オブジェクト 作成

/*------- 当月のクローンオブジェクト 作成 ---------*/ /*---- 当月 タイトル表示 -----*/$dt = clone $thisMonth;$yy_m = $dt->format('Y年m月'); /*---- 翌月 タイトル表示 -----*/$dt = clone $thisMonth;$next_t = $dt->modify('+1 month')->format('Y…

PHP mysql 日付検索 $_GET

PHP

/*----------- パラメータを GET する ---------------*/ if(isset($_GET["t"])) { $ymd = basename($_GET["t"]); // URL パラメーター t 以降の日付の数値が入る $year = substr($ymd, 0,4); $month = substr($ymd,4, 2); $day = substr($ymd,6, 2); $disp_…

PHP mysql 日付分割 フォーマット(Ymd)$_GET パラメータ

PHP

/*----------- パラメータを GET する ---------------*/ if(isset($_GET["t"])) { $ymd = basename($_GET["t"]); // パラメーター t 以降の日付の数値が入る $year = substr($ymd, 0,4); $month = substr($ymd,4, 2); $day = substr($ymd,6, 2); $disp_ymd …

php html if文 埋め込み テンプレ : をつける

PHP

<p class="f-01-box"> <span>お部屋のタイプ</span> <span>シングル</span> <span>ダブル</span> <span>ツイン</span> <span>和室</span> <span>お部屋のタイプが選択され…</span></p>

paiza 入力値 取得 メモ

// 自分の得意な言語で // Let's チャレンジ!! // 標準入力からの入力値を変数に代入します$single_line_input = trim(fgets(STDIN)); $second_line_input = trim(fgets(STDIN)); // 取得した入力値を半角スペースで分解します$array = explode(" ", $sing…

jQuery タブメニュー メモ

HTML ---------- <div class="container"> <div class="inner"> <div class="ChangeElem_Btn_Content"> <button class="ChangeElem_Btn">厳選ご当地</button> <button class="ChangeElem_Btn">カタログギフト</button> <button class="ChangeElem_Btn">スイーツ・食品</button> <button class="ChangeElem_Btn">アレルギー対応食品</button> </div></div></div>

VBA 空のセルがあったら その 行を削除 メモ

Sub kuuhaku_sakuzyo() Dim i As Long For i = 2 To Cells(Rows.Count, 4).End(xlUp).Row If Cells(i, 4) = "" Then 'セルが空なら Range(i & ":" & i).Delete '行を削除 End If Next i End Sub

jQUery 画像 拡大 メモ

HTML ---------- <div> <img src="img/g-housoushi-03-thumb.jpg" alt="" class="thumbnail-3"> <span class="noshi-title">01 水玉(赤色系)</span> <div id="largeImg-3"><img width="800" src="img/g-housoushi-03.jpg"></div> </div> ----------- CSS .thumbnail-3 {width:80%;} #largeImg-3 {display: none;} .l…

VBA 特定の文字列の下に空白行を入れる

Sub add() Dim rNum As Long For rNum = Cells(Rows.Count, 5).End(xlUp).Row To 1 Step -1If Cells(rNum, 5).Value = "挨拶状希望" Then Rows(rNum + 1).InsertNext rNum End Sub

VBA 空白行の削除 メモ

Sub Delete_Rows_w_Blank() Dim GYO As Long Dim KuhakuGyo As Range Dim r As Long ' A列をみて表の最終行を取得する ------ ※1 GYO = Cells(Rows.Count, 1).End(xlUp).Row '2行目から最終行までB列のセルをチェックします With ActiveSheet For r = 2 To G…

VBA  置換 最終行までループ メモ

Sub cut() Dim i As Long Dim str As String For i = 2 To Cells(Rows.Count, 5).End(xlUp).Row Cells(i, 5).Value = Replace(Cells(i, 5).Value, "▼挨拶状(仏事用)の種類をお選びください", "▼挨拶状の種類をお選びください") Next i End Sub ------------…