MYSQL8以降ウィンドウ関数対応=>ランキング。

MYSQLでもランキングが使えるようになったとさ。
日本国内のレンタルサーバーは最新の技術というより
一歩遅れた技術で運営している理由はリスクを取らないために
そうしているのだろうなとヒシヒシと感じます。

### support mysql>8.0.2 ウィンドウ関数

```sql
select id,namae, rank() over(order by code_total asc)as code_rank from code_data;
```
### code_data
|id|namae|code_total|
|---|---|---|
|1|kaonashi|15|
|2|mononoke|75|
|3|asitaka|52|
|4|san|87|
|5|theta|99|

この人の言っていることの中に。

自分がわかっていて他人がそのことがわからない事を
受け入れるという事や理解できない事を
受け入れるということなど…
そういう事を受け入れないといけないと話しています。

要するに賢い人は他人が理解できないことが
わからないのです。同じようなレベルの世界にいると
それは困らないのですが、そうではない世界では
大変だということ。

直球で言われたこともあると話しています。
そんなひとを人として尊敬するということが出来るか?

最後はひと何だと。

いくら上場しても名声を得てもって事を話しているだなと
受け取りました。人それぞれ受け取り方が
違うかもしれませんが。

 

プログラマー35歳定年説は嘘だけど。

プログラマー35歳定年説は嘘だけど、35歳から初めて
プログラマーになろうとしている人は無謀に近いかもしれないので
オススメはしません。かなり賢い人ならOKだけどね。


あなたは今、38歳です。
今から職を辞めて次の職に就こうとしています。
あなたはどういう職を選びますか?

たぶん35歳以上になるといろいろと難しくなる。
なので今後のことを考えるだろう。

あの時の選択は間違っていなかったという思いになるのは
おそらく、地位や名声とかではなく楽しいとか面白いとか
という満足度なのかもしれないと、この頃思っています。

 

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 Sub
Private 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 Sub
Private Sub TextBox1_Change()
MsgBox TextBox1
End Sub

Private Sub CommandButton1_Click()

End Sub

Private Sub UserForm_Click()

End Sub

javascriptを勉強中

var a = 3;
var b = 10;
var obj = {
        hoge:function(a){
            a = a + a;
            return a;
        },
        a:a = a && 5,
        b:b = b || 3
    };
    
console.log(obj.hoge(2));
console.log(obj.a);
console.log(obj.b);

上記のCodeを動かすと仕事と表示されます(笑)、4,5,10と表示されます。
何故そうなったかを考えるとキリがないのでそういうものだと
思ったほうが良いかもしれないです。

説明するとhogeはオブジェクトです。あとは変数とIF文の省略系を
記述しているだけです、実際は=もいらないですが・・・。
わかりやすく自分なりに記載したつもりです。

javascriptライブラリってこういうのが何百行も記載して成り立っていますが
概念はこういう事です。自分は基本的に概念しか覚えないのです。
何故、そうしているか・・・自分が怠惰な人間だからです。