※ 引述《needhope (Let's move out)》之铭言： : ※ 引述《terance (修)》之铭言： : : 1. 表单开启，读取txt档 : 书上刚好有写 是哪一本书，好棒喔，我的书可能太新手了 : Open pathname For mode [Access access] [lock] As [#]filenumber : pathname参数 : 档案名称或是完整路径资讯 : mode参数 : Append：资料附加在档尾 : Binary：二进位档案存取 : Input：读取档案的内容，通常用於文字档存取 : Output：写入档案的内容，通常用於文字档写入 : Random：随机档存取，预设值 : Access参数 : Read：唯读 : Write：唯写?! : ReadWriter：可读写 : Lock参数 : Shared：共用 : LockRead：读取锁定 : LockWrite：写入锁定 : LockReadWrite：锁定二者 : FileNumber参数 : 必要参数，可使用FreeFile()取得 : Len参数 : 选用.. : ------------- : ex: : num = FreeFile() '取得档案通道编号 : Open "C:\test.txt" For Input Access Read As #num '开档 我复制上面这行把他在FORM的LOAD里面 然後上面这一行会执行错误，可以帮我抓抓BUG吗 还有阿，我不懂为何num前面要放#，可以教教我吗 : Dim vtDatas : Do Until EOF(num) 'EOF()检查档案结尾?! : Line Input #num, vtDatas '逐行读入 -> vtDatas : Loop : Close #num '关闭档案通道 : Text1.Text = vtDatas : : 2. 让combobox的内容＝txt内容 : : 至於怎麽判断多少内容为一个item就再说吧 : 这我就不太懂了.. : 我猜可以在 Do While...Loop 里修改 我手边有实做出来的案例，还在研读中，不懂在拿来问问 : 将读入的文字指定为combobox的item : : 但是这两个，新手教学的书都没有提到 : : 不知道有没有什麽好功能可以用呢 : 希望对你有帮助 --

※ 发信站: 批踢踢实业坊(ptt.cc) ◆ From: 218.168.218.44