Write Statement
āĻāĻāĻāĻŋ āĻĒāĻ°ā§āĻ¯āĻžāĻ¯āĻŧāĻā§āĻ°āĻŽāĻŋāĻ āĻĢāĻžāĻāĻ˛ā§ āĻ˛āĻŋāĻāĻž āĻšā§āĨ¤
āĻ¸āĻŋāĻ¨āĻā§āĻ¯āĻžāĻā§āĻ¸:
Write [#FileName], [Expressionlist]
āĻĒā§āĻ¯āĻžāĻ°āĻžāĻŽāĻŋāĻāĻžāĻ°:
FileName: āĻ¯ā§āĻā§āĻ¨ā§ āĻ¸āĻāĻā§āĻ¯āĻžāĻ¸ā§āĻāĻ āĻāĻā§āĻ¸āĻĒā§āĻ°ā§āĻļāĻ¨ āĻ¯āĻž āĻ¸āĻāĻļā§āĻ˛āĻŋāĻˇā§āĻ āĻĢāĻžāĻāĻ˛ā§āĻ° āĻāĻ¨ā§āĻ¯ āĻāĻĒā§āĻ¨ āĻ¸ā§āĻā§āĻāĻŽā§āĻ¨ā§āĻ āĻĻā§āĻŦāĻžāĻ°āĻž āĻ¨āĻŋāĻ°ā§āĻ§āĻžāĻ°āĻŋāĻ¤ āĻĢāĻžāĻāĻ˛ā§āĻ° āĻā§āĻ°āĻŽ āĻ§āĻžāĻ°āĻŖ āĻāĻ°ā§ āĻĨāĻžāĻā§āĨ¤
Expressionlist: āĻā§āĻ°āĻŋā§ā§āĻŦāĻ˛ āĻ āĻĨāĻŦāĻž āĻāĻā§āĻ¸āĻĒā§āĻ°ā§āĻļāĻ¨ āĻ¯āĻž āĻāĻĒāĻ¨āĻŋ āĻāĻāĻāĻŋ āĻ¸āĻ¨ā§āĻ¨āĻŋāĻŦā§āĻļ āĻāĻ°āĻžāĻ¤ā§ āĻāĻžāĻ¨, āĻāĻŽāĻž āĻĻā§āĻŦāĻžāĻ°āĻž āĻāĻ˛āĻžāĻĻāĻž āĻāĻ°āĻžāĨ¤
āĻ¯āĻĻāĻŋ āĻāĻā§āĻ¸āĻĒā§āĻ°ā§āĻļāĻ¨ āĻ¤āĻžāĻ˛āĻŋāĻāĻž āĻŦāĻžāĻĻ āĻĻā§āĻā§āĻž āĻšāĻ¯āĻŧ, āĻ¤āĻžāĻšāĻ˛ā§ āĻ˛ā§āĻāĻž āĻ¸ā§āĻā§āĻāĻŽā§āĻ¨ā§āĻ āĻāĻāĻāĻŋ āĻĢāĻžāĻāĻ˛ā§āĻ° āĻāĻžāĻ˛āĻŋ āĻ˛āĻžāĻāĻ¨ā§āĻ° āĻļā§āĻˇā§ āĻ¯ā§āĻ āĻšāĻ¯āĻŧāĨ¤
āĻāĻāĻāĻŋ āĻ¨āĻ¤ā§āĻ¨ āĻ āĻĨāĻŦāĻž āĻŦāĻŋāĻĻā§āĻ¯āĻŽāĻžāĻ¨ āĻĢāĻžāĻāĻ˛ā§ āĻāĻāĻāĻŋ āĻāĻā§āĻ¸āĻĒā§āĻ°ā§āĻļāĻ¨ āĻ¤āĻžāĻ˛āĻŋāĻāĻž āĻ¯ā§āĻā§āĻ¤ āĻāĻ°āĻ¤ā§, āĻĢāĻžāĻāĻ˛āĻāĻŋ āĻ āĻŦāĻļā§āĻ¯āĻ āĻāĻāĻāĻĒā§āĻ āĻ āĻĨāĻŦāĻž āĻĒāĻ°āĻŋāĻļā§āĻˇā§ āĻ¯ā§āĻ āĻŽā§āĻĄā§ āĻā§āĻ˛āĻ¤ā§ āĻšāĻŦā§āĨ¤
āĻāĻĒāĻ¨āĻžāĻ° āĻ˛āĻŋāĻāĻŋāĻ¤ āĻ¸ā§āĻā§āĻ°āĻŋāĻ āĻāĻāĻāĻŋ āĻāĻĻā§āĻ§ā§āĻ¤āĻŋ āĻāĻŋāĻšā§āĻ¨ āĻĻā§āĻŦāĻžāĻ°āĻž āĻāĻŦāĻĻā§āĻ§ āĻĨāĻžāĻā§ āĻāĻŦāĻ āĻāĻŽāĻž āĻĻā§āĻŦāĻžāĻ°āĻž āĻŦāĻŋāĻāĻā§āĻ¤ āĻĨāĻžāĻā§āĨ¤ āĻāĻĒāĻ¨āĻžāĻ° āĻāĻā§āĻ¸āĻĒā§āĻ°ā§āĻļāĻ¨ āĻ¤āĻžāĻ˛āĻŋāĻāĻžāĻ¤ā§ āĻāĻ āĻŦāĻŋāĻ°āĻ¤ā§ āĻāĻŋāĻšā§āĻ¨āĻ¸āĻŽā§āĻš āĻ¸āĻ¨ā§āĻ¨āĻŋāĻŦā§āĻļ āĻāĻ°āĻžāĻ¨ā§āĻ° āĻĒā§āĻ°ā§ā§āĻāĻ¨ āĻ¨ā§āĻāĨ¤
āĻĒā§āĻ°āĻ¤āĻŋāĻāĻŋ āĻ˛ā§āĻāĻž āĻ¸ā§āĻā§āĻāĻŽā§āĻ¨ā§āĻā§āĻ° āĻŽāĻžāĻ§ā§āĻ¯āĻŽā§ āĻ¸āĻ°ā§āĻŦāĻļā§āĻˇ āĻāĻ¨ā§āĻā§āĻ°āĻŋ āĻšāĻŋāĻ¸ā§āĻŦā§ āĻ˛āĻžāĻāĻ¨ āĻ¸āĻŽāĻžāĻĒā§āĻ¤āĻŋāĻ° āĻĒā§āĻ°āĻ¤ā§āĻ āĻāĻāĻāĻĒā§āĻ āĻšāĻŋāĻ¸ā§āĻŦā§ āĻĒāĻžāĻā§āĻž āĻ¯āĻžā§āĨ¤
āĻĻāĻļāĻŽāĻŋāĻ¤ āĻŦāĻŋāĻ°āĻ¤ā§āĻāĻŋāĻšā§āĻ¨ āĻ¸āĻš āĻ¸āĻāĻā§āĻ¯āĻž āĻ¸ā§āĻĨāĻžāĻ¨ā§ā§ āĻ¸ā§āĻāĻŋāĻ āĻ āĻ¨ā§āĻ¸āĻžāĻ°ā§ āĻ°ā§āĻĒāĻžāĻ¨ā§āĻ¤āĻ° āĻāĻ°āĻž āĻšā§ā§ āĻĨāĻžāĻā§āĨ¤
āĻāĻĻāĻžāĻšāĻ°āĻŖ:
Sub ExampleWrite
Dim iCount As Integer
Dim sValue As String
iCount = Freefile
Open "C:\data.txt" For Output As iCount
sValue = "Hamburg"
Write #iCount,sValue,200
sValue = "New York"
Write #iCount,sValue,300
sValue = "Miami"
Write #iCount,sValue,450
Close #iCount
End Sub