注:我嘗試使用concat()方法,連接方法,甚至試圖 只插入文本(這被證明可編輯),但沒有人擔任 我想了。我在想如果子字符串方法會工作,但我只有 子字符串如何工作的基本想法。當表單加載時以及當用戶輸入 4位數(OrderNo2.text)時,我希望字母「N」爲 插入文本框中,當點擊保存按鈕時,應將其加入,以便將它們一起保存爲 。如何插入字母「N」,後跟4位數字。該4位是由用戶在文本框輸入
請幫幫忙。由於
Private Sub btnAddOrder_Click(ByVal sender As System.Object, ByVal e
As System.EventArgs) Handles btnAddOrder.Click
isNewRow = True
Dim newRow As DataRow = dsOrders.Tables("Orders").NewRow
Try
If txtOrderNo2.Text.Length = 5 Then
newRow.Item("OrderNo") = txtOrderNo2.Text
If cbo_Product.SelectedIndex <> -1 Then
newRow.Item("Product") = cbo_Product.Text
newRow.Item("Price") = txtPrice2.Text
If txtQuantity.Text <> "" Then
newRow.Item("Quantity") = txtQuantity.Text
newRow.Item("CustomerNo") = txtCustomerNo2.Text
dsOrders.Tables("Orders").Rows.Add(newRow)
'determine row index of new row
rowIndex = dsOrders.Tables("Orders").Rows.Count - 1
'save changes back to the database
daOrders.Update(dsOrders, "Orders")
Else
MessageBox.Show("Please enter the quantity", "Missing Quantity", MessageBoxButtons.OK, MessageBoxIcon.Exclamation)
End If
Else
MessageBox.Show("Please choose the product", "Missing Price", MessageBoxButtons.OK, MessageBoxIcon.Exclamation)
End If
Else
MessageBox.Show("Order Number must be 5 digits long!", "Missing Order Number", MessageBoxButtons.OK, MessageBoxIcon.Exclamation)
End If
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
End Sub
如果N在文本框中,那麼它將是可編輯的。我建議你在TextBox左邊的標籤中輸入「N」,然後驗證文本爲4位數字,稍後再執行拼接。 – Jodrell
感謝您的回答。我不能這樣做,因爲它是訂單號,我正在檢查文本框中的字符串長度並將其保存回數據庫 – user804437
,你可以做'newRow.Item(「OrderNo」)= String.Format(「N {0}」,txtOrderNo2.Text)' – Jodrell