向combobox中添加字符串，如果发现已经存在就不再添加了，不知道怎么做循环，请教
补充下
if i = 0 then
VB code:
Option Explicit
Private Sub Command1_Click()
Dim i As Long
Dim S As String
S = "12345" '需要增加的项
For i = 0 ......
我是一名VB初学者，现在需要将一个表的数据添加到另一个表上。我想通过将一个表的相关数据赋到另一个表上来完成，我用了如下语句：
Data1.Recordset.Fields "学号"=data2.Recordset.Fields "学号"结果系统提示是错误的
请哪位高手帮忙看一下，应该怎么写这语句
Data1.Recordset.Fields("学 ......
我需要用VB连接Oracle并下载bloｂ字段，
我用以下连接方式，程序始终不能识别ｂｌｏｂ字段，
connStr = "Provider=msdaora;Persist Security Info=False;User ID=" & _
uid & ";Password=" & pwd & ";Data ......
请教高手：在asp.net页面中，将下面的vb语句转化为c#代码。
<%
if request("id")="0" then response.write "请填写完整！"
if request("id")="1" then response.write "用户名或密码错误！"
if request("id")="3 ......
这是一个时常能用到的方法,解高手解答,最好附上源码,谢谢!!
'假设有一个字段,多列字段的情况照者修改即可
MDB_ZD = InputBox("请输入数据库中欲存号码的字段名")
'假设文本文件有一列数据,循环取得存入数组 JGHaoMa(i)
'执行下面的过程,要引用ado
Sub Xr_ACCESS() '写入数据库
& ......
Private Function LShift(lValue, iShiftBits)
If iShiftBits = 0 Then
LShift = lValue
Exit Function
ElseIf iShiftBits = 31 Then
If lValue And 1 Then
LShift = &H80000000
Else
LShift = 0
End If
Exit Function
ElseIf iShiftBits < 0 Or iShiftBits > 31 Then
Err. ......
最新文章 :