VB从记事本导入列表框出现的问题
当记事本内容为空时，列表框添加为空，怎么让列表框不添加空项
能不能讲的详细点？
if text1.text <>"" then list1.additem text1.txt
If Dir(App.Path & "\yourTXT.txt") = "" Then
list1.additem "abc"
End If
if 读入的量 <>"" then 添加
滥顶~~~~~~~~
2F 4F 方法正确 但是....
记事本文件是整行读, 头尾都很有可能用空格, 这时就不会 = ""
因此要做此类判断最好养成习惯 加个 Trim
if Trim(text1.text) <>"" then list1.additem text1.txt
太简单了，楼上朋友都回答了
飘过
if Len(Trim(text1.text)) <=0 then
我比较喜欢这样判断字符串为空
是记事本，并不是文本框中的内容
用列表框添加记事本中的内容，每行为一项内容，但当记事本中有空行时，要不能添加此项
{{
相关问答：
比如说要在1表中的第三列第二行单元中输入“一二三”一要粗体宋体12号字，二 不要粗体 15号字 三斜体5号字
代码应该怎么打？
LZ指的是个什么表格控件呢，貌似只能设置整个表的字体，或者某几行或几列，没有单独设� ......
在下是vb的新手，想写段程序，在vb中，使用wscript调用一些外部的命令，但是程序执行一直有错误，请各位高手帮忙解答下，谢谢。
代码如下：
VB code:
Private Function getFile_CMD(filename, filepath) As Bo ......
初学，大胆提问，请高手不吝赐教
1、滚动条点击与绘图板（屏幕,Piceure1）的移动问题已经解决。
Picture1.Top = -VScroll1.Value + bcW '垂直移动
Picture1.Left = -HScroll1.Value + bcW ' ......
各位大虾：
我是刚学VB，现在想用VB调用一个动态库，动态库里面有很多函数。我知道使用VB调用动态库调用函数，需要将要调用的函数在程序中声明即可，但是里面有很多函数，不会每一个函数都要声明吧。请� ......
我写了一个软件，要用到ACCESS数据库，我再访问ACCESS的时候，我需要从表里读出一行数据，我的程序是这样写的，SQLSTRING="SELECT * from '" &ME.TEXTBOX1.TEXT &"' WHERE ID = '"& ......
