自分をカエル

色んな意味でカエルンは浮気性
そんな自分を見つめなおす為の書き物
βακα..._〆(゚▽゚*) wright by kaerun


テーマ:

何徹(何日徹夜)したことある?
ブログネタ:何徹(何日徹夜)したことある? 参加中


徹(とおる)や徹(てつ)がどうした?

って
タイトルですが(笑)

残念ながら、私は男には余り興味がありません。
(もちろん連れ以外ですけどガーン)

カエルン(kaerun)@男はやっぱり女好きですガーン
(゚Д゚υ≡υ゚Д゚)ァタフタ

妻に張ったおされそうですが(^_^;)


ではネタ話
お題は【何徹(連続徹夜)】の話

今の私の業種は…
昔は
「徹夜、当たり前プンプン
 納期重視ショック!
って感じだったのですが…

最近は徹夜は、よっぽどの事が起きない限りしません(^_^;)

って言うか
仕事場所が認めない所が多いですし
徹夜をしなければいけない状況を作る事が駄目っすガーン

また、徹夜したからとしても
人間の能力は半減以下
注意力が散漫
っと
長い時間拘束されてる割には成果も不十分です。

とっ
偉そうな事を書いてますが
今までの連続徹夜数は
私は…74時間連続ってのが最高記録ですかね?

いわば三夜連続 徹夜が私の限界でした

2日目には、ぼ~っとする時間が長くなり
イライラしてきますガーン


最近は駄目ですが
昔は良く徹夜してましたねぇ~(^_^;)

仕事やプライベートで
と馬鹿みたいに起きてました。

自慢出来る事では無いのですが…
夜はめっぽう強い方ですのでニコニコ

ただ…年には勝てませんねガーン
今は1日が限界です
とはいえ
40時間は起きてられますけどね(笑)

AD
いいね!した人  |  コメント(2)  |  リブログ(0)
同じテーマ 「ネタ2009」 の記事

テーマ:

何歳まで仕事したい?
ブログネタ:何歳まで仕事したい? 参加中


正直…
仕事はしたくないカエルン(kaerun)です

なので
明日まで(笑)


でも
実際は…65歳まで仕事はしないと駄目かなガーン

住宅ローンがあるからねニコニコ
ただ
本業、バイトとの二足のわらじは
40歳くらいまでにしたいかな(^_^;)

っとなると
あと五年かぁ~


四十歳になって、モデルってのは
特に今のバイト先の服屋ではあり得ないっすガーン

まっ
顔を出さなければ良いんですが

外でパンツマンになり
生着替えってガーン
(35歳でもあり得ないでしょうけど(笑))

てな訳で
そんなしがらみがなければ
正直…明日にでも
仕事は辞めたいと切におもいますが


それが実現するには
やはり…宝くじやtotoビッグなどで
億単位のお金が入らないと実現しないでしょうねニコニコ


しょ~むない事を考えず
一歩ずつ、1日ずつ
がんばるかなぁ~(笑)

AD
いいね!した人  |  コメント(1)  |  リブログ(0)

テーマ:
私のメモとして使用する。

CSVファイル形式
↓↓↓↓↓適当なCSVファイルとして保存(今回はtest.csvとする。
)↓↓↓↓↓
1,"aiueo","改行を含む文字
123 
あいうえお","0",1235,12456,11111,"全角ダブルコーテーションを
含むCSV”
”全角”",500,13456,"1",0
2,"9876","改行を含む文字列2
123 
かきくけこ","0",1235,12456,11111,"全角”ダブルコーテーション
を含むCSV”
”全角”",500,13456,"1",0
↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑
↑↑↑↑↑↑

'CSV読込(全角ダブルコーテーション+改行コード対応)のサンプル
Private Sub CommandButton1_Click()
Dim iFno%
Dim j%
Dim iCnt%

Dim strPath$
Dim strBuf1$
Dim strCsv$
Dim strTmp$
Dim strWork1() As String
Dim strWork() As String

On Error GoTo err_Trap

'VBなら下記
'strPath = App.Path & "\test.csv"

'VBAなら下記
strPath = ThisWorkbook.Path & "\test.csv"

iFno = FreeFile
ReDim strWork1(0)
ReDim strWork(0)
j = 0

'ADODB.StreamにてCSVファイルを読み込み
With CreateObject("ADODB.Stream")
.Charset = "Shift_JIS"
.LineSeparator = -1 'CR=13, LF=10, CRLF=-1
.Open
.LoadFromFile strPath

Do Until .EOS

strBuf1 = .ReadText(-2) '-2=行単位読み込み、-1=
一括読み込み、自然数=文字単位読み込み

'Chr(&H8167) = 全角ダブルコート
'Chr(&H8168) = 全角ダブルコート
strBuf1 = Replace(strBuf1, Chr(&H8167), "@ダブル
@")
strBuf1 = Replace(strBuf1, Chr(&H8168), "@ダブル
@")

'Chr(34) = ダブルコート
'Chr(44) = シングルコート
If Right(strBuf1, 1) <> Chr(34) Then
ReDim Preserve strWork1(iCnt)
strWork1(iCnt) = strBuf1
iCnt = iCnt + 1
Else
If Len(Trim(strWork1(0))) > 0 Then
For i = 0 To UBound(strWork1)
strCsv = strCsv & strWork1(i) & vbCr
Lf
Next i
strCsv = strCsv & strBuf1
Else
strCsv = strBuf1
End If

ReDim Preserve strWork(j)
strWork(j) = strCsv
j = j + 1
iCnt = 0
ReDim strWork1(0)
End If
Loop
.Close
End With

'特に下記は意味はないがHTML形式の改行コード
'改行文字を
へ置き換える。
For i = 0 To UBound(strWork)
strWork(i) = Replace(strWork(i), vbCrLf, "
")
Next i
Debug.Print "STOP"

err_Trap:
MsgBox Err.Description, vbExclamation
Err.Clear
End Sub
AD
いいね!した人  |  コメント(3)  |  リブログ(0)

テーマ:

ども
カエルン(kaerun)@更新頻度をあげアップです

先週
噂…を実体験しました(^O^)

噂とは!?


それは…



【小学校の蛇口を捻ると、お茶が出る】

と言う噂


先週のこと
長女の通う小学校で

何やら文化祭っぽい物がありまして

家族サービスの一環で
小学校の文化祭っぽいのに参加しました(^_^;)


二年~六年生までのクラス毎に

お化け屋敷やらスライム作りやら、何かをチャレンジする物など
出し物を出して、校内を歩き回ってる時に
ふと見つけたガーン

【お茶】の二文字


興味津々に…その蛇口をひねり
手ですくって飲んでみたらショック!


ぬるま湯でしたが!!お茶でしたニコニコ


かなり驚きました( ̄▽ ̄;)



だって

蛇口をひねるとお茶が出るんですよ?

私の小学校時代、中学校時代を思い出しても・・・


やかんにお茶はあっても

蛇口からお茶なんて・・・あり得ませんでした。

私はもっぱら、水道水か冷水機があったくらいでしたから



それがお茶

しかも

【本日は緑茶です。】との事w



それを驚いてると

妻は、普通に

「えっお茶が出るのは普通やん」

と言ってました。


しかも

帰宅後、長女に聞いてみると・・・


「お茶は普通に出るよ、でっパパはコップ無いのに何で飲んだの?」

と聞いてたので


私は

「手ですくって飲んだ」って言いましたけどねw


さすがお茶の町だけあって

蛇口からお茶は、ちょっぴり驚きでした(*^_^*)


あっ

お茶は全ての水道の蛇口から出るのでは無く

決められた場所の蛇口からしかお茶は出ないみたいです。


全ての水道がお茶だったら・・・

もっと驚きでしたが

それは、予算的に厳しいですからね

たぶん


最後に

その飲んだお茶は、ちょっぴり味が薄かったです。

ほんのりお茶の味って事も付け足しておきます。


ではでは

3連休2日目で、ちょっぴり外は寒いですが

今日も頑張って行きましょうかねぇ~♪

いいね!した人  |  コメント(2)  |  リブログ(0)

テーマ:

ひとつだけ楽器がプロ級に弾けるようになるとしたら、どの楽器?
ブログネタ:ひとつだけ楽器がプロ級に弾けるようになるとしたら、どの楽器? 参加中



ども
カエルン(kaerun)です

今日もバイトだ!!(^O^)
外でお着替えだぁ~!!です

ちょっぴりと言うか
かんなり寒いんすけどガーン

外でパンツマン
恥ずかしさよりも、寒さには勝てません(^_^;)

でも
写真は良い感じに仕上がってるんで
ディアブロス yahooショッピング店までお立ち寄り下さいねんべーっだ!

っとCMをした所で

ネタの話


一つ楽器がプロ級になれるなら

今なら迷わず

私は【二胡】かなぁ~

あの
中国系の音楽に必ず思い浮かびそうな
あの音で奏でたいニコニコ

一番、私が癒されそうな気がするので

今はそれかな?



次にとなると…
サックスかなぁ~(^O^)

サックスを吹いて
ジャズってみるのも良いかも(笑)


ちなみに
小さい時は…トランペットが吹きたかったかなガーン


それは何故か!?

キカイダーゼロワンの影響ですが(^_^;)

年代が古いっすね(笑)


じゃ
バイトをがんばるかなぁ~っとチョキ

いいね!した人  |  コメント(2)  |  リブログ(0)

AD

ブログをはじめる

たくさんの芸能人・有名人が
書いているAmebaブログを
無料で簡単にはじめることができます。

公式トップブロガーへ応募

多くの方にご紹介したいブログを
執筆する方を「公式トップブロガー」
として認定しております。

芸能人・有名人ブログを開設

Amebaブログでは、芸能人・有名人ブログを
ご希望される著名人の方/事務所様を
随時募集しております。