|
-
Aug 2nd, 2000, 11:05 AM
#1
Thread Starter
Junior Member
Hey again all...
I have two questions:
(Question 1)
I'm in the middle of a merchandise ordering project. The client inputs into various controls the specifications for the order, and then I need the program to compile the information into an email with all of the information in quotes and comma-delimited like so:
---startorder---
"12345","453","Traditional","","TRUE"
"","sda5","","","","","","65435654","23425"
---endorder---
My question: What is the simplest way of doing this?
(Question 2)
What is the syntax for VBs 'select case'? Is it the same as the old qbasic syntax?
Thanks for any help!
-tainc
Full Contact Coding-
The greatest way of life!
-
Aug 2nd, 2000, 12:10 PM
#2
Code:
Private Sub Form_Load()
Dim MyNumber As Long
MyNumber = InputBox("pick a number")
Select Case MyNumber
Case 0
MsgBox ("0")
Case 1
MsgBox ("1")
Case 2
MsgBox ("2")
Case 3
MsgBox ("3")
Case Else
MsgBox ("Too High")
End Select
End Sub
-
Aug 2nd, 2000, 12:13 PM
#3
Thread Starter
Junior Member
Thank You!
Full Contact Coding-
The greatest way of life!
-
Aug 2nd, 2000, 12:46 PM
#4
there is also a "Case Is"
its used for like comparing and stuff.
Code:
Private Sub Form_Load()
Dim MyNumber As Long
MyNumber = InputBox("pick a number")
Select Case MyNumber
Case 0
MsgBox ("0")
Case 1
MsgBox ("1")
Case 2
MsgBox ("2")
Case 3
MsgBox ("3")
Case Is > 3
MsgBox ("Too High")
End Select
End Sub
[Edited by denniswrenn on 08-02-2000 at 02:09 PM]
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|