Option Explicit
Public conn As New ADODB.Connection
Public Rs As New ADODB.Recordset
'Public Cnt As Integer '这个Cnt是用来表示数据库数据总量的，对链接过程无关
Public Sub connect()
'连接数据库的代码段
Set conn = New ADODB.Connection
Set Rs = New ADODB.Recordset
&nb ......
Public a As String
Private Sub Command1_Click()
a = Text1.Text
End Sub
例如 text1中输入 127.0.0.1 xxx.xxx.xxx.xxx
Private Sub Form_Load()
Adodc1.ConnectionString = "provider=sqloledb; data source=xxx.xxx.xxx.xxx;initial catalog=student1;user id=sa;password=sa;"
A ......
Set cn = New ADODB.Connection
cn.Open "provider=Microsoft.jet.OLEDB.4.0;data source=" & App.Path & "\member.mdb"
Set rs = New ADODB.Recordset
rs.Open "select * from attendance1 where 学号 like '" & Text9.Text & &q ......
1、随机生成1-100的十个数，并且将他们打印出来。代码如下：
Private Sub Form_Click()
Dim a(10) As Integer
Dim i As Integer
For i = 0 To 9
a(i) = Int(100 * Rnd(i)) + 1
Print a(i)
Next i
End Sub
这个时候输出的结果是正确的，但是For-Next使用DO-WHILE来代替的时候，输出的十个数全� ......
在vb的文件菜单有一个生成.exe的功能，但是这样生成的可执行文件必须要求使用者装有vb，并且再加载所需的控件等等，非常繁琐。
有没有功能可以实现就像平时我们购买和下载的软件，直接点击安装包就会把需要的东西全部安好。要不用户还得装vb，加载很多控件，再拷贝数据库图片等等。
希望大家给与意见，会尽快结贴给分。
......
我有个程序是用VB编的,只有可执行程序1,没有源代码,所以只能用VB另外再做一个程序2,现在我想把另外的程序2做成一个按钮,我想实现的是:
在打开原有程序1的某个页面时,一按这个按钮就可以将此页面的表格控件里的内容导入到EXCEL中,
请问大家如何实现啊?
这个难度比较大，应该说这样做效果不佳。
友情Up.............
......
最新文章 : vb