00问答网
所有问题
当前搜索:
用VB做查找语句
VB查找
出符合条件的,并就和
语句
怎么写
答:
VB查找
100以内被7除余2并且被11除余3的数 for i=1 to 100 if i mod 7=2 and i mod 11=3 then print i next i
VB
6.0编程题目 文本
查找
/替换
答:
Private Sub Command1_Click()Dim i As Single For i = 1 To Len(Text1.Text) - Len(Text2.Text) '之所以是两个的想减,因为如果大于了长度,mid会错 If Mid(Text1.Text, i, Len(Text2.Text)) = Text2.Text Then Text1.SelStart = i - 1 Text1.SelLength = Len(Text2.Text...
vb
select 多条件
查询语句
该怎么实现
答:
Private Sub cmdSearchGuest_Click() '快速
查询
Dim sql As String Dim cBranchID As String Dim cBranchName As String Dim cBranchTel As String sql = "SELECT 客户编号,客户名称,联系地址,联系电话,邮箱,创建日期,备注 FROM 客户信息 where 1=1"If txtSearchGuestNo.Text <> "" Then sql...
我想知道
vb
如何获取字符串中某个字符之后的所有字符
答:
我想知道
vb
如何获取字符串中某个字符之后的所有字符 回 Variant (Long),指定一字符串在另一字符串中最先出现的位置。 本示例
使用
InStr 函数来
查找
某字符串在另一个字符串中首次出现的位置。Dim SearchString, Searc Searc...
VBA怎样取到
查找
到的单元格位置
答:
查找
用Range对象的Find方法,返回Rang对象,然后再取Range对象的Row属性或Column属性返回行或列。Set C=Range("A1:E10").Find("abc"),If Not C Is Nothing then,R=C.Row '返回Cl=C.Column '返回列。在其桌面应用程序中执行通用的自动化(OLE)任务的编程语言。主要能用来扩展Windows的应用程序...
vb
.net 中
如何使用
SQL
语句查询
数据库中的数据
答:
1、首先打开Visual Studio 2008代码窗口,添加引用。2、输入以下代码:Public conn1 As SqlConnection = New SqlConnection 。3、声明关键字 Public;(因为是全局变量,所以用Public 来声明)。4、如果SQL 数据库就在本机,则用以下代码连接。5、如果代码太长,影响可读性,可以用空格加"_"后,回车...
vb
中用sql
语句查询
数据库
答:
"SELECT sno,sco FROM sco WHERE sno='"& text1.text & "'"因为现在不弄
VB6
了,所以具体怎么连接的代码我忘了,大概就是如果得到的结果RecordSet是空的,即Bof And Eof,则用户名错误,否则如果规定了用户名不可重复,就有且仅有1条记录,再比较其中的sco与Text2.Text是否相等,是则正确通过,...
纯小白
用VB
写
查询
电话的程序,并列多条if then
语句
,想弄msgbox弹窗怎么写...
答:
as boolean '定义变量 passed = false'初始化 if t1.text =xx then t2.text=号码1 t3.text=号码2 passed = true '设置标记 end if if t1.text =yy then t2.text=号码3 t3.text=号码4 passed = true '设置标记 end if '最后判断 if not passed then msgbox "全部都不满足"...
vb
中我是用adodc控件连接sql数据库如何用sql
语句
实现
查询
功能?
答:
1.
使用
使用 instr([列名称],"字符串")>0 判断有‘字符串1’的行 2.使用 instr([列名称],"字符串")函数判断字符串起始位置 两个字符串的 函数值 差再减去len(字符串1)为90就是了
怎样
用vb
调用sql server的
查询语句
然后将查询结果显示到文本框中...
答:
db.open "数据库链接串"str1="select * from stu_info where stu_id='"& txt1.text & " 'rs.open str1,db,1 if rs.recordcount<=0 then msgbox "没有记录!"rs.close exit sub endif txt2.text=rs.fields("stu_name").value rs.close db.close 试试吧,里面的一些可能要修改一下...
1
2
3
4
5
6
7
8
9
10
涓嬩竴椤
灏鹃〉
其他人还搜
查找表结构用什么语句
查找语句
sql语句查找重复项
VB常用语句
经典SQL查询语句大全
数据库连接查询语句
SQL查询语句的结果是一个
VB循环语句
VB6 语句执行