Hola, si sos nuevo lo mejor es que te leas un manual de visual basic....pero para que te orientes seria algo asi...
Código vb:
Ver originalPrivate Sub Combo1_Click()
Select Case Combo1.ListIndex
Case 0
Text1.Text = "40.914.000"
Case 1
Text1.Text = "16.928.873"
End Select
End Sub
Private Sub Form_Load()
With Combo1
.AddItem "Argentina"
.AddItem "Chile"
End With
End Sub
pero leete un manual en serio...
saludos.