![](/img/trans.png)
[英]How to search record in database using gridview and two textboxes..using vb.net?
[英]How to check if all GridView Textboxes are filled using vb.Net
因此,我的文本框位於gridview的模板字段中。 我希望頁面加載6個固定的文本框。 我想通了那部分。 如果所有6個文本框都被填滿,那么我想在選擇下拉值時添加新行。 然后,下拉值將在新行出現時進行填充。 我該怎么做? 我知道基本的設置,但是我只需要一些代碼來檢查所有文本框是否都已填充。
For Each row As GridViewRow In gvReq.Rows
Dim Index As Integer = row.RowIndex
Dim ReqText As TextBox = CType(gvReq.Rows(Index).FindControl("txtReqText"), TextBox)
Dim chkReq As CheckBox = CType(gvReq.Rows(Index).FindControl("chkReq"), CheckBox)
If ReqText.Text = "" Then
ReqText.Text = reader("RequireExceptText").ToString
chkReq.Checked = True
If Regex.IsMatch(ReqText.Text, "_") Then
Dim message As String = "The selected Requirement contains some blanks to fill."
Dim sb As New System.Text.StringBuilder()
sb.Append("<script type = 'text/javascript'>")
sb.Append("window.onload=function(){")
sb.Append("alert('")
sb.Append(message)
sb.Append("')};")
sb.Append("</script>")
ClientScript.RegisterClientScriptBlock(Me.GetType(), "alert", sb.ToString())
ReqText.Focus()
End If
Exit For
Else
Dim dtCurrentTable As DataTable = DirectCast(ViewState("CurrentTable"), DataTable)
For Each row2 As GridViewRow In gvReq.Rows
If dtCurrentTable.Rows.Count >= 6 Then
If ReqText.Text <> "" Then
AddNewRow()
End If
End If
Exit For
Next
End If
Next
我找到了解決它的方法。 很棒!
Dim LastReqText As TextBox = DirectCast(gvReq.Rows(gvReq.Rows.Count - 1).FindControl("txtReqText"), TextBox)
If LastReqText.Text <> "" Then
AddNewRow()
End If
For i As Integer = 0 To gvReq.Rows.Count - 1
Dim ReqText As TextBox = DirectCast(gvReq.Rows(i).FindControl("txtReqText"), TextBox)
Dim chkReq As CheckBox = CType(gvReq.Rows(i).FindControl("chkReq"), CheckBox)
If ReqText.Text = "" Then
ReqText.Text = reader("RequireExceptText").ToString
chkReq.Checked = True
If Regex.IsMatch(ReqText.Text, "_") Then
Dim message As String = "The selected Requirement contains some blanks to fill."
Dim sb As New System.Text.StringBuilder()
sb.Append("<script type = 'text/javascript'>")
sb.Append("window.onload=function(){")
sb.Append("alert('")
sb.Append(message)
sb.Append("')};")
sb.Append("</script>")
ClientScript.RegisterClientScriptBlock(Me.GetType(), "alert", sb.ToString())
ReqText.Focus()
End If
Exit For
End If
Next
聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.