如何将文本框中的内容转变为int

[janselin]

有四个文本框,分别为txtcodeB,txtcodeE,txtverB和TxtverE

现要把txtcodeB,txtcodeE两个文本框中键入的内容作为varchar类型输入存储过程
把txtverB和TxtverE两个文本框中键入的内容作为int类型输入存储过程.

存储过程为:
strsql = " exec Usp_BO_ExpandByParent '" & Trim(TxtCodeB) & "','" & Trim(TxtCodeE) & "',0,9999,'2000-01-01','2099-12-31', '2008-12-18',1, 0, '" & Trim(txtkhcode) & "','','','','','','','','','','','','','','','','','','','', 0, 3, 0, 0, 0,1, '' ,'tmpdata'"
g_ConnUFData.Execute strsql

其中红色部分已经成功
绿色部分0的位置就是txtverB的值
9999的位置就是txtverE的值

请问大家如何把0用代码表示为txtverB里面的值?
如何把9999用代码表示为txtverE里面的值?

[janselin]

顶

[fu0212]

看晕了

[janselin]

简单点说就是把文本框里面的内容转为int.然后在绿色的位置表示出来

[janselin]

简单点说就是把文本框里面的内容转为int.然后在绿色的位置表示出来

[Roock]

txtverB=Cint("0")
txtverE=Cint("9999")

[janselin]

0和9999只是我随便写出来的,实际可能为0-999999之间的任意数值

[sonic_andy]

和Trim(TxtCodeB)格式一样吧,不加引号就行了:

strsql = " exec  Usp_BO_ExpandByParent '" & Trim(TxtCodeB) & "','" & Trim(TxtCodeE) & "'," & txtverB & "," & txtverE & ",'2000-01-01','2099-12-31', '2008-12-18',1, 0, '" & Trim(txtkhcode) & "','','','','','','','','','','','','','','','','','','','', 0, 3, 0, 0, 0,1, ''  ,'tmpdata'" 
g_ConnUFData.Execute strsql 

[zuoxingyu]

strsql = " exec  Usp_BO_ExpandByParent '" & Trim(TxtCodeB) & "','" & Trim(TxtCodeE) & "',cint(trim(txtverB.text)),cint(trim(txtverE.text)),,'2000-01-01','2099-12-31', '2008-12-18',1, 0, '" & Trim(txtkhcode) & "','','','','','','','','','','','','','','','','','','','', 0, 3, 0, 0, 0,1, ''  ,'tmpdata'" 

CInt Integer -32,768 至 32,767，小数部分四舍五入。