vb.net - 运行此代码时为什么我的文本框中没有显示任何内容的任何原因?
问题描述
与组合框配合良好,并在 excel 的第一列中显示什么,但在 excel 的第 2 列中的文本框中没有显示任何内容...
我的特定于组合框的代码:
Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox1.SelectedIndexChanged
Dim iStartedRow As Integer
Dim ITotalRows As Integer
ITotalRows = ExcelApp.ActiveWorkbook.Sheets(1).Range("a1").Currentregion.Rows.Count
For iStartedRow = 2 To ITotalRows
If Me.ComboBox1.Text = COVIDWorksheet.Cells(iStartedRow, 1).text Then
Me.TextBox1.Text = COVIDWorksheet.Cells(iStartedRow, 2).text
End If
Next
End Sub