2011-01-01から1年間の記事一覧

こたつネコ

何だかんだ言っても、やっぱりこたつですよね。 ・・・以前にもこんな事があったような・・・こたつネコ くつろいでるねぇ。

クリスマスツリーって何だ?

うまいのか? ツリーの準備をしていたら、案の定チャーさんがやってきた。 とりあえず、ニオイを嗅いでカミカミしてみる。 飾り付けをすると・・・ なんじゃこりゃ? なんじゃこりゃ?? とりあえず、ネコパンチしてみる。

冬はやっぱりこたつだね

ん? いやいや、ここもぬくぬくですよ。 ネコはあったかい所を知ってるんですねー

フォルダ名称を取得

'ファイルのフルパスから取得 Dim FullPath As String = "C:\test1\test2\test3\test4\test5\test6\test7\test8\sample.text" Dim FolderName As String = FullPath.Split("\")(FullPath.Split("\").Count - 2) Console.WriteLine(FolderName) 'test8 'フォ…

ネコの巣発見!

何かいるー 出てきたー

クッションとカバーの間にいる

クッションカバーが何やらモゾモゾ動いている。 (カバーはクッションの上から掛けているだけ) 変なところが好きだねぇ。 目がまん丸ですな。

ボールねこ

前足が隠れてる。 横から見るとこんな感じ。 折りたたまれてるのがバレちゃうね。

テキストファイル書き出し

Imports System.IO Imports System.Text '--- Dim tDir As String = Path.GetDirectoryName(FL(0)) Dim files As String() = Directory.GetFiles(tDir, "*", SearchOption.AllDirectories) Dim outfilePath As String = tDir & "\out.txt" Dim enc As Encodi…

ワンコキタ━━━━(゚∀゚)━━━━ !!!!!

我が家に初めてワンコがやってきた。 会社の先輩の子のチワワちゃん。 体重は2kg弱だそうで、チワワの中でも体が小さいらしい。 オサレな首輪ですな。 知らない人が来たので、コタツの中で警戒するチャイ。 その中にワンコ投入! 鼻で挨拶した後、数秒固まり…

今日も元気だ指がうまい

ほれほれ おぅ ちょっとかじらせれ 塩味ですな うまい よい子はマネしないでね

胸毛

モッフモフですな。

珍客来訪

いるもんですなー。 我が家は都会でも田舎でもないところなんですが・・・ ちょっとビックリ。 ちなみにチャイは気が付かなかったそうです。残念。

クロス寝

上向き 下向き

画像(RasterItem)の本来の大きさを取得

BoundingBoxを使用 Dim RasterItem As Illustrator.RasterItem Dim rHeight As Single = RasterItem.BoundingBox(1) Dim rWidth As Single = RasterItem.BoundingBox(2)

このじゃらしは好きみたい

うおー

興味なし

それ 飽きたー

マズル

鼻と口辺りをマズルって言うんだって。 この辺大好き。

すまん寝(型崩れ)

くるねこ大和さんのブログで以前拝見した「すまん寝」。ほほえましい。 息できるのかなぁ・・・なんて思ってたら、ウチのもやってました。 本家のネコさんはビシーとまっすぐなんだけど、 ウチのはちょっと斜めってますな。 まぁ、キャワウィーからいっか。

○○ねこ 第三弾!

カーペットねこ!

カゴねこ

実はゴミ箱なんです。 ゴミ袋を交換するちょっとした間に入ったようです。

紙袋ネコ

何か入ってるー ネコいたー

ご要望にお応えして

ネコ写真うp! 首輪をピンクにしてみたよ! 似合うかしら?

破線

Dim sDash(1) As Object sDash = New Object() {6.0, 3.0} With Line .Filled = False .Stroked = True .StrokeColor = LineColor("B") .StrokeWidth = 2 .StrokeDashes = sDash End With

エリアテキスト

表示したり、しなかったり・・・ TextType の位置を変えてテスト。 Dim IllApp As New Illustrator.Application Dim NewDoc As Illustrator.Document = IllApp.ActiveDocument Dim TextItem1 As Illustrator.TextArtItem Dim Str As String Dim rowCount As …

パスアイテムが含まれるアイテムタイプを取得

For Each pItem In IllDoc.PathItems Console.WriteLine(TypeName(pItem.Parent)) 'GroupItem 'Layer Next

トイレが壊れた・・・

水を流すと「ピュルゥーピュゥー」って音がする。 数年前にも、うまく水が流れなくなった事があった。 その時はTOTOに電話をして部品(ボールタップのダイヤフラム)を送ってもらった。 まあ、今回もそいつが原因だろう。(ダイヤフラムが薄いので耐久性が低…

お盆ですねー

相変わらずマッタリしてまっせ。

まったり

暑いよねー

イタズラ発見

おっさんは見てたぞー

ネコ草大好き

スゴイ勢いで食べるよ。 顔うまってるし。