VB问题中的新手SQL-MSAccess 2003
技术问答
233 人阅读
|
0 人回复
|
2023-09-12
|
|
大家好，有人可以帮我一个简单的问题。我可以通过单击按钮在VB的子目录中获得此SQL语句，这是我的新手。- t( C2 r6 N- Z Q% p
这是我输入的内容： }! b' _7 w5 X
Private Sub Command0_Click()
0 ]# v2 V6 A# t' U/ {; Z Dim rs As Recordset! g* A" G: M2 I: ~+ n! k: m
Dim sql As String
5 F& I `) S" v" C Dim db As Database: `( A c5 W8 R) T, Y
Set db = CurrentDb! o9 M6 i) j) k7 i+ C# h
sql = "SELECT * FROM Transactions"4 e0 l! Y+ w% v9 x# t
Set rs = db.OpenRecordset(sql)1 q- R m8 @! y7 P
Do Until rs.EOF; p" A4 f5 _/ O( q* c/ ?
rs.MoveNext
5 f$ O$ i3 M. B! E% ?+ ^ Loop
+ N3 _0 v8 R" g/ k1 T6 e9 u% p% S If Not rs.EOF Then2 A" Q0 H3 K0 b7 L! K) J( [
MsgBox "test"
/ o. {: y& f+ t$ B. U+ j' _& F5 B. f End If8 l5 \# C ~& l% d4 @
End Sub \) {8 G2 B( C, T0 |
好的，那我该如何填充呢？从本质上讲，我只是从此开始，所以我想知道如何获取这个简单的代码，并像查询一样运行它，以便打开结果记录集。5 I% Y5 m" E3 m
谢谢！: }& K; N4 T. E! Z- W* o9 j
7 ~8 r: K" `; Y' j9 k解决方案: |
|
|
|
|
|
|
|
|
|
