1. 程式人生 > >李曉瑞 廊坊師範學院資訊科技提高班十五期

李曉瑞 廊坊師範學院資訊科技提高班十五期

今天驗完專案,師父就我們的疑問進行了解答,突然豁然開朗,師父就是不一樣,和“姜”一樣,哈哈哈

1.雙引號,單引號

 txtSQL = "select * from student_Info where student_ID = '" & Trim(txtSID.Text) & "'"

我們來理解一下這段程式碼,為什麼會有單引號和雙引號的存在呢?

(1)我們都知道,雙引號的存在是因為便於VB能夠識別

(2)單引號呢,是為了資料庫能夠識別

這麼寫是什麼意思呢?

我們一步一步來看

①明確需求:查詢資料庫,將所查詢資料賦給文字框

②按照需求編程式碼

③新增讓資料庫和VB識別的符號

我們來看一下這個演變過程:

txtSQL = "select * from student_Info where student_ID = '" & Trim(txtSID.Text) & "'"


第一部分
txtSQL = select * from student_Info where student_ID =    
此句是從資料庫中查詢資料,為使VB能夠識別,需在查詢資料庫的語句兩側加“”

即成
txtSQL = "select * from student_Info where student_ID = "

trim(txtSID.Text)在VB中能夠被遍歷,但資料庫無法識別,而在資料庫中,‘’可以被識別,故在其兩側加‘’
即:
txtSQL = "select * from student_Info where student_ID = " &‘Trim(txtSID.Text)’,

&起到連線字串的作用

然而,單引號無法被VB識別,故,‘’也需要用“”括起來,變成字串被VB識別
即:
txtSQL = "select * from student_Info where student_ID = " &“‘ ”& Trim(txtSID.Text) &“’”,

第一個&後面的“‘”可以和前面的合併到一起

故最終效果是
txtSQL = "select * from student_Info where student_ID = '" & Trim(txtSID.Text) & "'"

2.歎號   !   的用法

Private Sub comboSID_Click()
    Dim mrcc As ADODB.Recordset
    Dim txtSQL As String
    Dim MsgText As String
    
    txtSQL = "select * from student_Info where student_ID = '" & comboSID.Text & "'"
    Set mrcc = ExecuteSQL(txtSQL, MsgText)
    txtName.Text = mrcc!student_Name
    mrcc.Close
    
End Sub

在很多部落格裡面看到了關於這個知識點的解讀,但還是不太明白,師父今天指點後,真是明白了不少。

我們看一下,這段程式碼的意思:從students表中student_ID所在列查詢資訊,所查資訊賦給comboSID.Text文字框

執行查詢

將所查student_ID對應的student_Name賦給txtName.Text文字框

這樣我們就更好理解  ! 了,歎號在這裡起到的作用,就是student表,在該表中,為文字框匹配所需要的資料