today study 2005.03.03

 1. VB.NET

Codes：

        Dim vint_I As Integer

        vint_I = CType(Me.Edit1.Text, Integer)

        Me.Edit2.Text = vint_I.ToString

Result：

Me.Edit1.Text	Me.Edit2.Text
0.5	0
0.6	1
0.501	1

结论：使用Ctype把小于等于0.5的小数，转化为整数结果为0。

2. VB.NET

If elseif   elseif  else endif  问题

If Not String.Equals(.imb_Con.Text, String.Empty) Then  'If not empty

              .spr_Info_Lst_Sheet1.SetText(vint_I, 2, .imb_Con.Text)

               'ElseIf String.Equals(.imb_Con.Text, "ＴＸＲＦ工程検査枚数") Then

                '    .spr_Info_Lst_Sheet1.SetText(vint_I, 2, "ＴＸＲＦ工程検査枚数")

                'ElseIf String.Equals(.imb_Con.Text, "最低空きスロット数") Then

                '    .spr_Info_Lst_Sheet1.SetText(vint_I, 2, "最低空きスロット数")

  End If

说明：被注释掉的代码将永远不会执行。Elseif 是在上面的if条件之外的条件中检查的。

3.VB.NET

调用函数时，参数列表后边多家了一个逗号，居然没有错误。可能是在可选参数的情况下吧。

4. Excel

相邻两个单元个内输入1，2，将鼠标放到后一个的右下角，然后拖动即可。

5.关于.net内存回收

窗体中定义一个timer,在其他的类中包含这个form的实例，并使用addhandler方法给timer添加执行的代码。另外的代码调用这个类。当form=NOTHING之后，timer的代码依然被执行，然后异常发生“未将对象引用设置到对象的实例”。

 

5.Oracle Sql(Group by)

select 中的所有列必须全部列在group by 中，count（）除外。他会按照列出的列的顺序依次分组。

select

max(a.kotei_cd),--After grouped, the max value in it's group.

a.CHOKKEI,

a.line,

count(*) as XXX

from tmmc003 a

group by

a.CHOKKEI,

a.line

--HAVING COUNT(*)/5=5 or count(*)/5=2--It's right.

ORDER BY A.CHOKKEI DESC,

A.LINE DESC

--A.XXX DESC--It's wrong.