VB文件操作
Private Sub Command1_Click()
Dim m As Integer '接受文本框一的数值
Dim n As Integer '接受文本框二的数值
Dim k As Integer '循环控制次数
m = Val(Text1.Text)
n = Val(Text2.Text)
For k = m To n
Open Dir1.Path + "\k.txt" For Output As #k
Next
End Sub
这段代码的本来用意是点击command1按钮的时候 在指定文件夹中创建 文件名为数字m 到n的 n-m个文件(暂不判断n 和m的大小问题)
可是我调试的时候只生成k.txt文件 怎么让for循环里的k真正的起作用
如需要阅读该回复,请登录或注册CSDN!
相关问答:
login.aspx.vb:
Public ReadOnly Property nameT() As String
Get
Return TextBox1.Text
&nb ......
我知道在VB中调用系统的计算器 可以用shell
可是要是要求高点 调用后 直接计算 并把计算结果显示在文本框里
比如 在点击按钮1 调用计算器 把指定的二进制转换为16进制 并显示在 text1
自已做一个计算器~ ......
VB code:
Private objXml As New DOMDocument60
Private xmlRoot As IXMLDOMElement
Public Function xmlNode()
Set objXml = New DOMDocument
objXml.async = False
objXml.Load ("E:\Li ......