Private Sub btnAssignMetric_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnAssignMetric.Click
Try
If lstMetrics.SelectedIndex = -1 Then
MessageBox.Show("You must select a Metric that will be assigned from the Select a Metric list box", "Missing Selection")
Exit Sub
End If
If lvMatchedDvid.SelectedItems.Count < 1 Then
MessageBox.Show("You must select at least one dataset pair to assign a Metric Name to", "Missing Selection")
cboAssignSheetTabId.SelectedIndex = -1
Exit Sub
End If
For Each item As ListViewItem In lvMatchedDvid.SelectedItems
item.SubItems(3).Text = lstMetrics.SelectedItem.ToString
Next
Catch ex As Exception
MessageBox.Show(ex.Message, ex.GetType.ToString)
End Try
End Sub
|