1

助けが必要です。次の結果を表示するコンボボックスがあります

A123456|従業員A

次に、最初の 6 文字を取り、その結果をセルに配置したいので、次のコードを作成しました。

    Private Sub cmbSelectEmployee_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cmbSelectEmployee.SelectedIndexChanged

    Dim employeeInfo As String = cmbSelectEmployee.Text
    Dim employeeID = Microsoft.VisualBasic.Left(employeeInfo, 6)

    Globals.calCalculationSheet.Range("B36").Value = employeeID

End Sub

完璧に動作しますが、「|」の残りの 6 桁が 常に 6 とは限りません。5 の場合もあれば、10 の場合もあります。したがって、「|」の左側にすべての文字を表示する必要があります。

Split("|"c)) を使用しましたが、左の文字を変数に配置する方法がわかりませんでした。

4

2 に答える 2

0

これを試してください。

Private Sub cmbSelectEmployee_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cmbSelectEmployee.SelectedIndexChanged

    Dim employeeInfo As String = cmbSelectEmployee.Text
    Dim employeeID = employeeInfo.Split("|")(0)

    Globals.calCalculationSheet.Range("B36").Value = employeeID

End Sub
于 2013-07-09T03:29:50.270 に答える