Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Create fixed-length ASCII file
Message
From
30/07/2001 13:34:52
 
 
To
23/07/2001 16:26:49
Jason Dalio
Northern Interior Regional Health Board
Prince George, British Columbia, Canada
General information
Forum:
Visual Basic
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00534032
Message ID:
00537326
Views:
13
Thanks!

>The following code is lengthy but it is this way to epxlicity show you all that is being done. It takes numeric and date data types and right alligns them into one string. Check your immediate window (put a breakpoint on the End Sub line) for the output. Cheers.
>
>Private Sub Command1_Click()
>Dim x As String * 10
>Dim y As String * 16
>Dim z As String * 26
>
>Dim num1 As Long
>Dim num2 As Long
>Dim date1 As Date
>Dim date2 As Date
>
>num1 = 123456
>num2 = 123
>date1 = Date
>date2 = Date
>
>RSet x = Str(num1)
>RSet y = Format(date1, "mm-ddd-yyyy")
>z = x & y
>Debug.Print z
>
>RSet x = Str(num2)
>RSet y = Format(date2, "mm-ddd-yyyy")
>z = x & y
>Debug.Print z
>
>End Sub
It's "my" world. You're just living in it.
Previous
Reply
Map
View

Click here to load this message in the networking platform