写入txt文档的方法，需要一个参数作为写入的字符串：
成都创新互联公司专注于企业全网整合营销推广、网站重做改版、金华网站定制设计、自适应品牌网站建设、HTML5建站、商城网站定制开发、集团公司官网建设、成都外贸网站建设、高端网站制作、响应式网页设计等建站业务，价格优惠性价比高，为金华等各大城市提供网站开发制作服务。
Private Sub WriteDoc(ByVal wstring As String)
Using sw As New StreamWriter(Application.StartupPath "\output.txt", True)
sw.Write(wstring)
End Using
End Sub
vb的函数已经不适合vb点虐 了，想学vb，得装个vb6。用vb点虐 的话，使用Debug.WriteLine("hello world")，可以在输出窗口查看到这个信息，这是最简单的，想直接写窗体就得多写几行代码了，具体搜索一下
事实上，在B =阵列（...）数组参数短语的主要问题是2,5,3，所以这些整数数组（）函数的返回值类型的一个变种，而不是塑料。在指定的子数组参数的定义是一个整数，导致类型不匹配错误。
使用下面的方法解决这个问题：
定义函数的参数类型，
。私人小组代码（1为ByRef（带），作为字符串BYVAL myStr中）
你提到的原因，后的ByRef参数类型不匹配，因为默认情况下是作为一个参数传递的函数地址，你的第二个参数myStr的前面不限制转让其参数，系统，与前一个（）相同的地址，已成为通过轻轻是一个错误，只要在前面加1 BYVAL。
后的代码如下（调试通过）：
选项??基地1
。私人小组代码（1为ByRef（带），作为字符串BYVAL myStr中）
？？作为字符串昏暗的通道，C1为字符串
？N = UBound的（一） - LEN（myStr中）
？如果N 0？
？？？myStr的= myStr的字符串$（“*”）
？？结束如果
？？CH = myStr的
？？对于k = 1，UBound的（一）
？？？C1 = MID（myStr中，K，1）
？？？N = A（K）
？？？中$（CH，N）= C1
K-？
？？myStr的= CH
？打印myStr的？
END SUB
私人小组Command1_Click（）
昏暗的b（）
B =阵列（2，5，3，7，6，1，4）
MYNAME =“克莱门特”
调用的代码（二MYNAME）
END SUB
