Hello,

I'm trying to have this vb program print what the user selects on the
main frame
there are to option buttons one is nonfiction the other fiction I have
two dropdown list that the user can select from one is for the subject
the other for the shelf number. I'm having trouble making it work so
it prints the selection the user selects any help would be great.

Printer.Print "Your Selection"
Printer.Print

If optnofiction.Value = True Then
Printer.Print "Non Fiction:", optnofiction.Value

If optfiction.Value = True Then
    Printer.Print "Fiction:", optfiction.Value
 
  If cbosubject.ListCount <> -1 Then
    Printer.Print "Subject:", cbosubject.Text

If lstshelfnum.ListIndex <> -1 Then
    Printer.Print "Shelf Number:", lstshelfnum.Text
Printer.Print

End If

Printer.EndDoc

---

Request for Question Clarification by hammer-ga on 18 Mar 2003 12:53 PST

Which version of VB?

- Hammer

mrfony,

Here is an example of a VB6 routine that prints the value selected in
a combo box. It also conditionally prints text for selected option
buttons. Please ask for clarification if you need further
instructions.

Private Sub Command1_Click()
Dim strChoice As String

    If cboSubject.ListIndex > -1 Then
        strChoice = cboSubject.List(cboSubject.ListIndex)
        Printer.Print strChoice
    End If

    If optNonfiction.Value = True Then
        Printer.Print "Nonfiction: True"
    End If

    If optFiction.Value = True Then
        Printer.Print "Fiction: True"
    End If

    Printer.EndDoc

End Sub

Additional Resources:
After pasting this code into your module, place your cursor in the
word List and press F1 for Help on the List property of ListBoxes.

- Hammer