VB RecordSet问题
StrSQL="SELECT Max(SaleTicketNo) as salesticketno from tabSaleList WHERE saledate=2010-4-14"
Set SaleRS = SaleMDB.OpenRecordset(StrSQL, dbReadOnly)
如果查询出来没有值 在调试的时候看见SaleRS("salesticketno")的结果是Null 我加上判断条件
If Not SaleRS.EOF Then
If SaleRS("salesticketno") = Null Then
TicketedNo = "000001"
Else
TicketedNo = SaleRS("salesticketno")
End If
End If
为什么 If SaleRS("salesticketno") = Null 这个条件是不成立的啊? 那应该怎么判断啊?
忘记说了 我的数据库是用的ACCESS
高手 分全给你了
相关问答：
我想把word另存为xml之后，用vb读取这个xml的内容，请问如何实现？
dim f as integer
dim b() as byte
dim s as string
dim L as long
f=freefile()
open "abc.xml" for binary access read as #f
......
Private Sub Command1_Click()
Dim MyString() As String
Open "a.xml" For Binary As #1 ' 打开刚创建的文件。
ReDim MyString(LOF(1) - 1)
Put #1, , MyRecord ' 读入所有字符到变量中 ......
现在有个xml文件是<?xml version="1.0"?>
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
xm ......
form1中有text1-8， 和command1
text8中为程序代码（生成窗体为form2（已做好））
单击command1后将text2中的代码生成EXE到d:\ 并且text1-7分别对应
产品名 公司名 合法版权 合法商标 文件描述 注释 标题
......
我想用VB做一个OCX（纯菜鸟，临时需要用VB做点东西，特来请教），A用户（IP：192.168.0.1）与B用户（IP：192.168.0.2）进行点对点的发送接收消息
要求采用OCX方式，比如A用户知道B用户IP，我直接传参（B的IP）至OCX ......
