jQuery独自プラグイン基本サンプル2
忘れやすい自分のためにメモとして残しときます。
(function($){
$.fn.smp = function (options) {
var config = {
text:"おいら"
};
var cfg = $.extend({}, config, options);
cfg.text = cfg.text + "のお金";
return $(this).html(cfg.text);
};
})(jQuery);
$("#hoge1").smp({text:"ぼく"});
$("#hoge2").smp();タグ
１, 2, cfg, config, extend, fn, function, hoge, html, jquery, options, return, smp, Text, this, var, おいら, お金, サンプル, ため, プラグイン, ぼく, メモ, 基本, 自分,
VBAオブジェクトを自動生成しイベントを付与する。
VBAオブジェクトを自動生成しイベントを付与する。
サンプルコードです。
ダウンロードはこちら
https://zip358.com/tool/sample.zip
Dim chg_class(0 To 5) As chg
Public Sub objset()
Dim obj_ctl As Control
Dim i As Integer
For i = LBound(chg_class) To UBound(chg_class)
Set obj_ctl = UserForm1.Controls.Add("Forms.TextBox.1", "Box" & i)
obj_ctl.Top = 10 + 20 * i
obj_ctl.Width = 200
obj_ctl.Height = 20
obj_ctl.Text = "ここを変更してみて、またはダブルクリック（" & i & "番）"
Set chg_class(i) = New chg
chg_class(i).set_evn obj_ctl, i
Set obj_ctl = Nothing
Next i
End SubPrivate WithEvents TextB As MSForms.TextBox
Private index_no As Integer
Public Sub set_evn(hoge_obj As MSForms.TextBox, hoge As Integer)
Set TextB = hoge_obj
index_no = hoge
End Sub
Private Sub TextB_Change()
MsgBox TextB.Text 'UserForm1("Box" & index_no)
End Sub
Private Sub TextB_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
MsgBox TextB.Text 'UserForm1("Box" & index_no)
End SubPrivate Sub TextBox1_Change()
MsgBox TextBox1
End Sub
Private Sub CommandButton1_Click()
End Sub
Private Sub UserForm_Click()
End Subタグ
0, １, 10, 20, 200, 358, 5, Add, amp, as, Box, chg, class, com, Control, Controls, ctl, Dim, For, Forms, Height, Integer, LBound, obj, objset, public, sample, set, Sub, Text, TextBox, To, tool, TOP, UBound, UserForm, VBA, Width, zip, イベント, オブジェクト, コード, ここ, こちら, サンプル, ダウンロード, 付与, 変更, 自動生成,
ドラゴン・タトゥー女：続編：蜘蛛の巣を払う女。
http://www.girl-in-spidersweb.jp/
ドラゴン・タトゥー女：続編：蜘蛛の巣を払う女を観に行きました。
重厚且つ繊細さを持つ映画、デビッド・フィンチャー総指揮、文句無しです。
やっぱりデビッド・フィンチャー監督は凄いな。
タグ
018, 16, 2, 31, 8, AmazonDVD, asin, Blu-ray, com, EZ, girl-in-spidersweb, http, jp, nbsp, qu, Tqhs-, youtube, コレクション, タトゥー, デビッド, ドラゴン, フィンチャー, 女, 映画, 監督, 続編, 総指揮, 繊細, 蜘蛛の巣,
春よ来い。
春よ来い。
春より出会いが来い？
昔、浜松の方でもお仕事していました。
ちょっと懐かしい感じですね、あの頃は出会いとか
そんな事も考えることもなく、仕事の毎日でした。
豊洲と浜松、どちらかと言えば浜松の方で働いていたころが
大変でした、いつも終電で帰って土日祝出勤で
仕事の奴隷のように働いていたのです。
逆に言えば、仕事が全然出来ていなかったので
こんな事になったんだと思います。
過去って美化されるといいます、たぶん正解です。
自分の記憶のなかの嫌な思い出もだいぶ美化されていますｗ
今はあの頃に戻り、もっと頑張れば良かったなと思っているですから・・・。
タグ
4, ９, com, DTI, ｗ, yDIMz, youtube, こと, ごろ, どちらか, なか, 事, 今, 仕事, 出勤, 土日, 大変, 奴隷, 思い出, 感じ, 方, 昔, 春, 正解, 毎日, 浜松, 祝, 終電, 美化, 自分, 記憶, 豊洲, 逆, 頃,
変な夢を見た。
変な夢を見た。
あの映画、マトリックスの世界とほぼ同じような夢を見た。
違いは人工知能があの映画では人間を摂取していたけれども、そこが宇宙人が
摂取していたという事に変わっていた。
人は永遠に仮想空間の中で生き続けるという話。
仮想空間の中で死んだ場合、脳内の記憶をリセットされ
新たな記憶を入れるだけで永遠に生きられるようになっている。
仮想空間から抜け出すことは不可能だ。
実際、AIはPCやネットワークの中から抜け出すことが不可能と原理は同じ。
となると人は仮想空間の中で生きているという説を
称える学者の言っていることも案外本当なのかもしれないと
思えた夢だった。
タグ
AI, nbsp, PC, こと, そこ, ネットワーク, マトリックス, リセット, 不可能, 世界, 中, 事, 人, 人工, 人間, 仮想, 原理, 場合, 変, 夢, 学者, 宇宙人, 実際, 摂取, 映画, 本当, 永遠, 知能, 空間, 脳内, 記憶, 話, 説, 違い,