vb6.0からvb.netにコンバートした後のGetItemStringの修正

■vb6.0からvb.netにコンバートした後のGetItemStringの修正

Dim aaa As Intger

vb6.0からコンバートされた直後

If Trim(zynh_cmb.Text) = VB6.GetItemString(zynh_cmb, 0) Then

aaa = 0

End If

早い処理に書き直した

If Trim(zynh_cmb.Text) = zynh_cmb.Items(0).ToString Then

aaa = 0

End If