重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
Dim R08 As Nullable(Of Double)
十多年的五寨网站建设经验,针对设计、前端、开发、售后、文案、推广等六对一服务,响应快,48小时及时工作处理。营销型网站的优势是能够根据用户设备显示端的尺寸不同,自动调整五寨建站的显示方式,使网站能够适用不同显示终端,在浏览器中调整网站的宽度,无论在任何一种浏览器上浏览网站,都能展现优雅布局与设计,从而大程度地提升浏览体验。成都创新互联从事“五寨网站设计”,“五寨网站推广”以来,每个客户项目都认真落实执行。
If InStr(1, Mid(fileLines(2), 1, InStr(1, fileLines(2), ")")), st(p)) 0 Then
R08 = 0
Else
R08 = Nothing
End If
你用哪个控件?Adodc ? Adodb ?
Adodc举例:
Adodc1.recordset.fields("xuexi")=0
Adodc1.refresh
Adodb举例:
dim rs as Adodb.recordset
'这里是SQL查询语句
rs.fields("xuexi")=0
'最后关闭就OK了
你可以直接判断text的值吗,例如
If Text1.text = "" Then '输入值为空
...
Elseif text1.text = "0" Then '输入值为“0”
...
End If
我也是新手,多多指教
声明变量并没有赋值的话,就是空值即=Nothing。数值看做零,字符串看做空串。对象看做什么也没有……
Dim abc(2) As Integer
abc = {0, 1, 2}
'或者
Dim abcd() As Integer
ReDim abcd(9)
For i As Integer = 0 To abcd.Length - 1
abcd(i) = i
Next
也可声明为字符串数组