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.