将字符串值转换为整数

Question

如何将字符串select max转换为整数，谢谢

Sub locking()
    Dim nomortrans As Integer
    Dim SQL As StrinG
    SQL = "select MAX(s_nomor_trans) from tblpos_trans_nomor"
    Proses.ExecuteNonQuery(SQL)
    frm_pos.LblNomorTransaksi.Text = SQL 
    frm_pos3.LblNomorTransaksi.Text = SQL 
End Sub