2楼正解 不过复制的代码不对号我帮你改改吧Label.Text = dataSet.Tables[0].Rows[0]["id"];
Label.Text = dataSet.Tables[0].Rows[i]["字段名"];
Public con As ADODB。Connection, Str As String, Ado As ADODB。Recordset, sql As StringPublic i As Integer, conn As StringPublic Sub ado_Open()Set con = New ADODB。
Connectionconn = "Access"If conn = "SQL" Then Str = "Driver={SQL SERVER};SERVER= ;Uid=SA;Pwd=;Database=tempdb"If conn = "Access" Then Str = "Driver={Microsoft Access Driver (*。
mdb)};DBQ=" & App。Path & "\ b;pwd=;ReadOnly=True"con。Open StrEnd SubPublic Sub Newado()Set Ado = New ADODB。RecordsetAdo。
CursorLocation = adUseClientAdo。Open sql, con, adOpenDynamic, adLockBatchOptimisticEnd SubPrivate Sub CommandButton1_Click()ado_Opensql = "select * from tmp"NewadoIf Ado。
Fields(0) = "admin" Then Label1。Caption = "管理员"End Sub答案补充'不好意思,。NET的数据库连接是这样的Public Sub Ado_Open()con = New ADODB。ConnectionStr = "Driver={Microsoft Access Driver (*。
mdb)};DBQ=" & System。IO。Directory。GetCurrentDirectory & "\ b;pwd=;ReadOnly=False"con。Open(Str)End SubPublic Sub NewAdo()Adodc = New ADODB。
RecordsetAdodc。CursorLocation = UseClientAdodc。Open(sql, con, OpenDynamic, LockBatchOptimistic)End Sub。
答：listbox有单选或者复选 单选情况下：SelectedIndex SelectedItem SelectedValue这几个属性取值 复选情况下：GetSe...详情>>
答：我建议你去--天下网吧联盟 这里面都是网吧业主和网管交流的论坛，你可以自己注册一个用户进去看看，你可以和他们交流也可以寻求他们的帮助，我想没有你解决不了的问题，...详情>>
答：格式化文本区域的段落标记，用于规定文本和层的属性和位置等。比如： 新浪网 用来规定 新浪网 这三个字居中显示。 文本中心(CENTER)、左(LEFT)或右(R...详情>>
