EXCEL VBA 怎样读取文本文件中某一位置的数? [问题点数:100分,结帖人CSDN]

Bbs1
本版专家分:0
结帖率 100%
Bbs7
本版专家分:14355
Blank
红花 2008年3月 其他开发语言大版内专家分月排行榜第一
2007年1月 其他开发语言大版内专家分月排行榜第一
2006年9月 其他开发语言大版内专家分月排行榜第一
Blank
黄花 2008年7月 其他开发语言大版内专家分月排行榜第二
2008年4月 其他开发语言大版内专家分月排行榜第二
2008年2月 其他开发语言大版内专家分月排行榜第二
2008年1月 其他开发语言大版内专家分月排行榜第二
2006年8月 其他开发语言大版内专家分月排行榜第二
2006年7月 其他开发语言大版内专家分月排行榜第二
2006年6月 其他开发语言大版内专家分月排行榜第二
Blank
蓝花 2008年9月 其他开发语言大版内专家分月排行榜第三
Bbs7
本版专家分:14355
Blank
红花 2008年3月 其他开发语言大版内专家分月排行榜第一
2007年1月 其他开发语言大版内专家分月排行榜第一
2006年9月 其他开发语言大版内专家分月排行榜第一
Blank
黄花 2008年7月 其他开发语言大版内专家分月排行榜第二
2008年4月 其他开发语言大版内专家分月排行榜第二
2008年2月 其他开发语言大版内专家分月排行榜第二
2008年1月 其他开发语言大版内专家分月排行榜第二
2006年8月 其他开发语言大版内专家分月排行榜第二
2006年7月 其他开发语言大版内专家分月排行榜第二
2006年6月 其他开发语言大版内专家分月排行榜第二
Blank
蓝花 2008年9月 其他开发语言大版内专家分月排行榜第三
Bbs1
本版专家分:0
excel简单vba读写TXT的交互
1.<em>读取</em>excel写TXT(<em>VBA</em>)Sub 导出Erwin参<em>数</em>文件() ' ' 导出Erwin参<em>数</em>文件 宏 ' 'Filename = Application.GetSaveAsFilename(fileFilter:=&quot;Text Files (*.txt), *.txt&quot;) Filename = &quot;logical_physical_FIELD.txt&quot; Open Application.A...
VB如何获得txt文本文件指定某行的内容.....
Hi: 请教一个问题: VB<em>中</em>如何获得txt<em>文本文件</em><em>中</em>指定某行的内容..... 如:1.txt文件<em>中</em>有如下内容: 1、The first line content; 2、The second line
EXCEL VBA 读取文本文件
<em>EXCEL</em> <em>VBA</em> <em>读取</em><em>文本文件</em>宏<em>EXCEL</em> <em>VBA</em> <em>读取</em><em>文本文件</em>宏<em>EXCEL</em> <em>VBA</em> <em>读取</em><em>文本文件</em>宏
怎样读取文本文件某个位置的内容
本人要开发的程序需要<em>读取</em><em>文本文件</em><em>中</em>某个<em>位置</em>的内容.请问有什么方法请详细说明
怎样在精确定位Excel的某一位置
具体意思是这样的:我现有一模板,允许用户修改模板上面的字啊什么的东东,但有可能用户会插入一行一列之类的,这样怎么解决呢,是否能先在Excel<em>中</em>设置一些什么监视点(不知这东东的意思)之类的来用程序搜索,使得程序从<em>数</em>据库<em>中</em>取得的<em>数</em>据仍然能定位到原来的相应列<em>中</em>。rnrn各位辛苦一下吧,我是今天才注册的,也是第一次发言啦
excel VBA 怎样读取 clipboard
帮忙看看rnexcel2003 <em>VBA</em> <em>中</em>那个函<em>数</em>可以<em>读取</em> clipboard <em>中</em>的<em>数</em>据 ,又怎样声明和使用。请高手举个例子。rn谢谢!!!
VBA 读取文本文件
Excel在我们的日常办公<em>中</em>,用到非常多。因此,对于它的脚本<em>VBA</em>的使用,难免也比较频繁。在此总结、整理下之前写过的一段<em>VBA</em><em>读取</em>MAP文件,统计ECU存储空间使用情况的部分代码。 该段程序,先使用Collection集合类装载<em>读取</em>的<em>数</em>据,最后统一写入将<em>数</em>据按照期望的格式,写入Excle表格<em>中</em>。这样一次性<em>读取</em>、写入,可以避免多次在读MAP文件和写Excel文件之间切换,增加系统资源开销。
vb读取txt文件某行某列的
有以下文件名为d:\111.txt的文件: 111 2222 33 4444 555 6666 ...... 999 888 7777 666 5555 444 ...... aaaa bbb cc
【一步一步学习VBA】Excel VBA 读取txt文件并写入Excel单元格
我们首先在Excel文件所在目录创建一个文件a.txt,文件内容如下: 1111 222 222 333 333 444 接着我们进行文件的<em>读取</em>,并且写入到Excel<em>中</em>,代码如下: Sub bb() Dim a, k%, i% Open "a.txt" For Input As #1 a = Split(StrConv(InputB(LOF(1), 1), vbUnicode), vbCr
怎样读取文本文件文?
StreamReader Sr=File.OpenText(Server.MapPath(".\\aa.txt"));rnstring ReadFile=Sr.ReadLine();rnwhile(ReadFile!=null)rnrn TextBox1.Text+=ReadFile;rn ReadFile=Sr.ReadLine();rnrnSr.Close();rn却只能<em>读取</em>文本<em>中</em>的英文,字符,<em>中</em>文读不出,这是何解?
使用EXCELVBA进行文本文件的输出
我想用excel<em>中</em>的<em>VBA</em>,向一个<em>文本文件</em>进行输出<em>数</em>据。rn要求可以类似于ini的输出方式,即把将要输出的<em>数</em>据输出到指定关键字行的后面。rn
Excel VBA 常用的操作文本文件的方法
1、调用脚本对象 Sub WriteTxt1()       Set fs = CreateObject(&quot;Scripting.FileSystemObject&quot;)       Set f = fs.CreateTextFile(&quot;path\filename&quot;, True)       f.WriteLine (&quot;Text Message.&quot;)       f.writeline(cel...
Excel vba 读取上证指
NULL 博文链接:https://wentise.iteye.com/blog/1797184
怎样将置顶位置文本文件的内容读取出来?
怎样将置顶<em>位置</em>的<em>文本文件</em><em>中</em>的内容<em>读取</em>出来?
读取文本文件放置位置。。。
[size=16px]很悲剧啊。。rnrn做文件操作的验证,一直出错。。rn各位帮我解答一下EPOC下的文件系统吧。。rnrnepoc32\release\winscw\udeb\z 对应的是什么啊?rnepoc32\winscw\c 对应的是什么?rnepoc32\data\z 对应的是什么??rnrn我想读出一个“1.txt”文件的内容:rn [color=#FF0000]_LIT(KFile,"C:\1.txt");[/color]rn1.txt应该放在哪里?rnrn问题挺多,希望大家不要见怪。。[/size]
怎样读取文本文件
部知怎样<em>读取</em>,有规律的<em>文本文件</em>,经请高人指点!
怎样读取文本文件的内容
对于一行内容,我知道怎样用VC<em>读取</em>它,但现在要<em>读取</em>多行内容,并且不知道共有多少行的情况下,我该怎么办呢?我想用一个循环,但不知道该怎样判断结束条件?rn请教高手!谢谢!解决一定散分!rnrn
vba 读取txt文件写入到excel
lz是小小菜鸟,刚接触,要做个小工具,请问诸位大侠,如何把txt<em>中</em>的内容<em>读取</em>到excel里呢,rntxt<em>中</em>是以逗号分隔的<em>数</em>据,想去掉逗号直接插入到excel每一列<em>中</em>,并把第一行的名头背景色标为黄色rn跪求。。。感激涕零。。。
vc怎样逐行读取某一文本文件并分析据,谢谢!
初学vc,请教一个比较浅显的问题:例如当前目录下有一个名为aaa.txt的纯<em>文本文件</em>,想做一个程序逐行读出文件内容,并判断读出内容,如该行首字符为“a”,则用messagebox显示该行内容,直到文件结束。初学vc,希望大家帮忙,谢谢大家!如有可能,能否帮我写一个例子。再次感谢!
读取文本文件里面某一部分字符串
假设一个<em>文本文件</em>,里面的内容如下所示。rn现在我要判断第四行DATASET后面跟的是不是“POLYDATA”,该怎么判断呢?rn能否大概写几行代码给我参考参考亚,谢谢啦!rnrn# vtk DataFile Version 1.0rnTerrain data for Honolulu, HawaiirnASCIIrnDATASET [color=#FF0000]POLYDATA[/color]rnPOINTS 202740 floatrn0.000000 0.000000 0.000000 0.000000 30.000000 0.000000 rn0.000000 60.000000 0.000000 0.000000 90.000000 0.000000 rn0.000000 120.000000 0.000000 0.000000 150.000000 0.000000 rn0.000000 180.000000 0.000000 0.000000 210.000000 0.000000 rn0.000000 240.000000 0.000000 0.000000 270.000000 0.000000 rn0.000000 300.000000 0.000000 0.000000 330.000000 0.000000 rn0.000000 360.000000 0.000000 0.000000 390.000000 0.000000 rn0.000000 420.000000 0.000000 0.000000 450.000000 0.000000 rn0.000000 480.000000 0.000000 0.000000 510.000000 0.000000 rn0.000000 540.000000 0.000000 0.000000 570.000000 0.000000 rn0.000000 600.000000 0.000000 0.000000 630.000000 0.000000 rn0.000000 660.000000 0.000000 0.000000 690.000000 0.000000 rn0.000000 720.000000 0.000000 0.000000 750.000000 0.000000 rn0.000000 780.000000 0.000000 0.000000 810.000000 0.000000 rn0.000000 840.000000 0.000000 0.000000 870.000000 0.000000 rn0.000000 900.000000 0.000000 0.000000 930.000000 0.000000 rn0.000000 960.000000 0.000000 0.000000 990.000000 0.000000 rn0.000000 1020.000000 0.000000 0.000000 1050.000000 0.000000
EXCEL VBA 读取网络文件
在远程面板做一个<em>数</em>据记录,只要给出IP地址计算机可以用http协议访问,但要用用户名和密码才能访问。请教<em>EXCEL</em> <em>VBA</em>如何<em>读取</em>此类文件?querytable好像不能实现rn
Excel VBA/Excel VBA
Excel <em>VBA</em>/Excel <em>VBA</em>/Excel <em>VBA</em>/Excel <em>VBA</em>
-----怎样读取的某一字段-----
在网页<em>中</em>输入用户名和密码进行验证时,应怎样从<em>数</em>据库<em>中</em>读出该字段进行比较呢?我用了以下方法,没有实现,请高手指教!!rnprivate void Linkbutton1_Click(object sender, System.EventArgs e)rn rn string str = TextboxName.Text;rn string str1 = TextboxKey.Text;rn for(int i=1;;i++)rn rn if(str==this.dataSet11.Tables[0].Columns[2].Expression.ToString())rnResponse.Redirect("WebForm1.aspx");rn rn
VBA研究】读取Unix下的文本文件到工作表
iamlaosong文 通常在<em>VBA</em><em>中</em>读文件文件时,习惯使用Line Input #fileNo, str的方法,这个方法对Windows下的<em>文本文件</em>是可以的,例如下面的代码就是<em>读取</em><em>文本文件</em><em>中</em>的<em>数</em>据到Excel表<em>中</em>: Sub ImpData1() Dim datFullName As String, rline As String Dim Arr() As String ...
VBA读取远程电脑上的文本文件
请教高手:rnrn如何用<em>VBA</em>连接远程电脑某个目录下的txt文件??rnrn譬如远程某个IP的D盘下的<em>文本文件</em>如何<em>读取</em>?rnrn请给个链接或者例子提点一下,谢谢~~~~
VBA Fans读取和写入UTF-8格式文本文件
<em>VBA</em> Fans<em>读取</em>和写入UTF-8格式<em>文本文件</em>
【Excel VBA】在VBA调用函
在<em>VBA</em>代码<em>中</em>直接调用计算<em>数</em>据 <em>EXCEL</em>的表函<em>数</em>也可以直接在<em>VBA</em><em>中</em>直接调用执行,具体调用格式如下: 调用方法1:变量对象= Application.WorksheetFunction.表函<em>数</em>(表函<em>数</em>参<em>数</em>) 实例:Range("d8") = Application.WorksheetFunction.CountIf(Range("A1:A10"), "B")...
VBA读取EUC编码的文本文件的问题--跪求
把EUC编码的<em>文本文件</em><em>读取</em>到Sheet里,但是读进来的都是乱码:)加工完了还要写回去!那位大虾rn有经验请不吝赐教!!万谢
怎样打开文件?读取文本文件的内容????
怎样打开文件?<em>读取</em><em>文本文件</em><em>中</em>的内容????
怎样顺序读取文本文件的内容?
怎样顺序<em>读取</em><em>文本文件</em><em>中</em>的内容?比如说ww.txt<em>中</em>有5行内容(如下所示):rn1rn2rn3rn4rn5rn我该怎样把文件<em>中</em>的内容读出来?
怎样读取TXT文本文件的汉字(C&C++)
如题,请教高手,C/C++ <em>中</em>怎样把一个<em>文本文件</em><em>中</em>的汉字<em>读取</em>出来并输出到另一个<em>文本文件</em><em>中</em>,C/C++用什么函<em>数</em>可以<em>读取</em><em>文本文件</em><em>中</em>的汉字?希望高手给予指点,能给出个例子更好,谢谢!!
excel怎样锁定某一单元格???
请问各位高手:rn 在excel<em>中</em>怎样锁定其<em>中</em>一部分单元格(而不是整个表)rn就是对其<em>中</em>的某一单元格不能进行写操作rn不能修改<em>数</em>据,
请教怎样一个一个的读取文本文件的字符
请教怎样一个一个的<em>读取</em><em>文本文件</em><em>中</em>的字符,根据这些字符做出判断。rnrn谢谢!
怎样读取一个文本文件的制表符'? .
图片如下:rn用上传图片的方式上传不上来,只有用这种文法了!请大家帮忙看一下rn[img=http://blog.csdn.net/mtxxm1226/article/details/8534591][/img]
送分了!怎样读取文本文件的123.56
想要把文本<em>中</em>的<em>数</em>据如:LKJ 123.56rn只取123.56
Excel 导入多个文本文件 VBA编程
激活一个Result工作簿,采用for循环将选进的<em>文本文件</em>导入excel,( 不考虑<em>文本文件</em>个<em>数</em>超出excel限制的情况,后面我有判断),下面的代码假如不加 Range("P4:P447").ClearContents则运行错误,加上发现文件都导入了P4这一列了,这是为什么?rnWorksheets("Result").Activatern For lngCount = 1 To .SelectedItems.Countrn With ActiveSheet.QueryTables.Add(Connection:="TEXT;" & .SelectedItems(lngCount), Destination:=Range("P4:IV447"))rn .TextFileStartRow = 3rn .TextFileOtherDelimiter = "|"rn .TextFileColumnDataTypes = Array(9, 9, 9, 9, 9, 9, 9, 9, 1, 9, 9, 9)rn Range("P4:P447").ClearContentsrn .Refresh BackgroundQuery:=Falsern End Withrn以下为完整代码:rn'该函<em>数</em>用来判断工作表是否存在rn Function SheetExists(SName As String, Optional WB As Workbook) As Booleanrn Dim WS As Worksheetrn If WB Is Nothing Thenrn Set WB = ActiveWorkbookrn End Ifrn rn On Error Resume Nextrn SheetExists = CBool(Not WB.Sheets(SName) Is Nothing)rn End Functionrnrn'1.当前工作表后必须还有一个工作表 2.必须放在类模块<em>中</em> 否则都会出错rn'当导入<em>数</em>据大于240的时候,自动复制新的工作表,然后导入<em>数</em>据rnSub ImportResult()rnrn Dim lngCount As Longrn Dim FinalRow As Longrn '清除原有的<em>数</em>据rn FinalRow = Range("P4").End(xlDown).Rowrn Range("P4", "IV" & FinalRow & "").ClearContentsrn '若"Result2"已经存在,那么先删除它rn If SheetExists("Result2") Thenrn Worksheets("Result2").Deletern End Ifrn If SheetExists("Result3") Thenrn Worksheets("Result3").Deletern End Ifrn rn rn With Application.FileDialog(msoFileDialogOpen)rn '允许多选rn .AllowMultiSelect = Truern .Showrn lngCount = 0rn '如果选择的<em>文本文件</em>个<em>数</em>大于240,那么创建一个工作表的副本,并命名为Result2rn If .SelectedItems.Count > 240 Thenrn Sheets("Result").Copy Before:=Sheets(2)rn ActiveSheet.Name = "Result2"rn End Ifrn If .SelectedItems.Count > 480 Thenrn Sheets("Result").Copy Before:=Sheets(3)rn ActiveSheet.Name = "Result3"rn End Ifrn Worksheets("Result").Activaternrn ' Connection:="TEXT;" & strFileName, Destination:=Selectionrn For lngCount = 1 To .SelectedItems.Countrn With ActiveSheet.QueryTables.Add(Connection:="TEXT;" & .SelectedItems(lngCount), Destination:=Range("P4:IV447"))rn .TextFileStartRow = 3rn .TextFileOtherDelimiter = "|"rn .TextFileColumnDataTypes = Array(9, 9, 9, 9, 9, 9, 9, 9, 1, 9, 9, 9)rn Range("P4:P447").ClearContentsrn .Refresh BackgroundQuery:=Falsern End Withrn '如果lngCount大于240,跳转到dk处,开始导入240之后的<em>数</em>据rn If lngCount > 200 Thenrn GoTo dkrn End Ifrn Next lngCountrn rndk:rn '激活已经创建的Result2rn ActiveSheet.Next.Activatern rn FinalRow = Range("P4").End(xlDown).Rowrn Range("P4", "IV" & FinalRow & "").ClearContentsrn rn For lngCount = 201 To 400rn With ActiveSheet.QueryTables.Add(Connection:="TEXT;" & .SelectedItems(lngCount), Destination:=Range("P4:IV447"))rn .TextFileStartRow = 3rn .TextFileOtherDelimiter = "|"rn .TextFileColumnDataTypes = Array(9, 9, 9, 9, 9, 9, 9, 9, 1, 9, 9, 9)rn Range("P4:P447").ClearContentsrn .Refresh BackgroundQuery:=Falsern End Withrn If lngCount > 400 Thenrn GoTo dk2rn End Ifrn Next lngCountrn rndk2:rnrn ActiveSheet.Next.Activatern rn FinalRow = Range("P4").End(xlDown).Rowrn Range("P4", "IV" & FinalRow & "").ClearContentsrn rn For lngCount = 401 To .SelectedItems.Countrn With ActiveSheet.QueryTables.Add(Connection:="TEXT;" & .SelectedItems(lngCount), Destination:=Range("P4:IV447"))rn .TextFileStartRow = 3rn .TextFileOtherDelimiter = "|"rn .TextFileColumnDataTypes = Array(9, 9, 9, 9, 9, 9, 9, 9, 1, 9, 9, 9)rn Range("P4:P447").ClearContentsrn .Refresh BackgroundQuery:=Falsern End Withrn If lngCount > 720 Thenrn GoTo dk3rn End Ifrn Next lngCountrnrn rn End Withrnrndk3:rn Set fd = NothingrnEnd Sub
Excel,用vba怎样删除多行?
从第1行至第100行,有很多行第2个单元格的值是“X”,我想把包含“X”的行全部删除。rn用vba代码怎样实现?rn多谢回答!
Excel VBA怎样更改Legend的字体?
我用的是Excel 2007rn我想把legend<em>中</em>的英文对象字体设置成Arial,把<em>中</em>文字体设置成楷体_GB2312.rn我用的是下面的代码:rnActiveChart.Legend.Font.Name = "楷体_GB2312"rnActiveChart.Legend.Font.Name = "Arial"rnrn但是,结果却把所有字体都设成了Arialrnrn应该怎么做呢?rn(我用手工的方法,先把所有字体选成楷体,然后再刷成Arial,就可以)
VBA 怎样获取EXCELdropdownlist内容
现在想把excel内容读到C#的datagridrnrnexcel<em>中</em>有<em>VBA</em>控件dropdownlist,怎样在C#<em>中</em>得到dropdownlist所选择的值,rn(其<em>中</em>在dropdownlist选择时,将值赋给某个单元格的方法不可以,因为还有其他情况,)rnrn
excel的vba的工程锁定了,怎样打开?
excel<em>中</em>的vba的工程锁定了,怎样打开?
怎样读取非unicode的文本文件
如题,有那位大哥知道请不吝赐教。
关于怎样读取文本文件据库
这是一张yx.txt文本rn0112 aa jj rn0234 bb kkrn0333 cc iirn0422 dd oorn0522 ff llrn0644 gg mmrn0755 aa nnrn0866 bb vvrn我要<em>读取</em>后导入<em>数</em>据库表yy<em>中</em>rn另xx.txt文本rn1122 aa jj rn8899 bb kkrn其<em>中</em>第1列为ID列导入表<em>中</em>是主键如果表<em>中</em>有<em>数</em>据3条ID为1122,8899和3322 到入时 将txt<em>中</em>ID1122,8899覆盖<em>数</em>据库表<em>中</em>的<em>数</em>据怎么做...rnrn求详细代码 谢谢rn用.NET程序做rnrn
怎样读取一个文本文件的内容?
怎样<em>读取</em>一个<em>文本文件</em>的内容?
怎样读取这样一个文本文件
怎样<em>读取</em>类似这样一个<em>文本文件</em>?rn格式如下:rn001/12.1rn002/24rn003/42.5rn004/45.6rn008/75.3rn015/456rn120/62.3rnrnrn总之就是 序号/<em>数</em>值(浮点类型)rnrn怎样读入一个 序号<em>数</em>组char Numb[][4]和 <em>数</em>值fValue[] <em>数</em>组<em>中</em>?rn用CFile类打开操作。
怎样读取一个文本文件的内容
最好详细些
怎样读取文本文件,代码怎样写
怎样<em>读取</em><em>文本文件</em>,代码怎样写
读取文本文件的内容!!!!!!
我设定一个字符串<em>数</em>组,然后想循环把一个<em>文本文件</em><em>中</em>的内容按行赋给<em>数</em>组的每一个成员。现在主要就是怎么循环<em>读取</em><em>文本文件</em><em>中</em>的每一行内容。
在JSP读取文本文件
我想在JSP<em>中</em><em>读取</em><em>文本文件</em>,一行一行的读,该怎么做,谢谢帮忙!
读取文本文件到程序
File docPath = new File("E:\\【阶段13】SpringMvc\\day06\\代码\\src"); for (File f : docPath.listFiles()) { //获取文件名 String fileName = f.getName(); //获取文件路径 String filePath = f.getPath(); //获取文件内容 Stri
vue读取文本文件
背景:有时前台上传一个<em>文本文件</em>需要将上传后的内容显示在下方的一个文本框或文本域<em>中</em>,如下 此时就需要用到前台的文件<em>读取</em>功能了 uploadPrivateKey () { const privateKeyFile = this.$refs.uploads.uploadFiles[0].raw let reader = new FileReader() if...
读取文本文件据?
我现在就是自己创建一个sn.txt文件里面只存放1个int<em>数</em>据rn假设现在为3rnrn如何<em>读取</em>这个<em>文本文件</em> 输出int<em>数</em>据为3呢??rnrn请教
怎样在excel用vba的代码将一个excelVBA代码传送到另一个excel
请问专家:怎样在excel<em>中</em>用vba的代码将一个excel<em>中</em>的<em>VBA</em>代码传送到另一个excel<em>中</em>并运行这个宏代码?
读取文本文件的信息!
这是要求:rnFor this - final - assignment of the term, you are to write a multi-class application that reads in and processes a text file. For 9/10 points, you merely need to read in the name of a text file and then report the number of sentences in the file. (The number of sentences is the number of periods, exclamation marks (!) and question marks (?) in the file.). To scorre 10/10, you need to read in a file and then present a chart that shows the distribution of sentence lengths in the file. The lengths you should report on are: 0-19 words, and 20 or greater words. (see sample output below). rnrnYou will need to use the StringTokenizer class to do the second part of the assignment. rnrnThe text file you intend to analyze should be entered interactive by name into a Console window from the element package. rnrnYou should show output for the document (TimesDoc.txt) presented below. Note - this document contains some expressions like $50.00 - and so clearly not all "." mark the ends of sentences. Nevertheless you should proceed assuming that sentences end exactly when .,!, or? occur. rnrnrn这是<em>文本文件</em>TimesDoc.txt的内容:rnARIS, Dec. 6 - One day before too long, when your mobilerntelephone sounds, it could be a novel calling to recount how thernheadstrong heroine dumped the handsome heartbreaker. Or it mightrnbe a guidebook surfacing at a critical moment in a crowded bar tornprovide you with pickup lines in Spanish, French or German.rnrnThe increasing power of cellphones is fast shaping innovative formsrnof compact culture: micro-lit, phone soap operas and made-for-rnmobile dramas that can be absorbed in less time than it takes to flickrnthrough a book introduction.rnrnToday very few people are using so-called third-generation mobilernservices, or smart phones, which allow users to browse the Internetrnand watch videos. But most cellphones sold these days have colorrnscreens and the ability to receive picture messages. So mediarncompanies are reinventing quaint old formulas with the aim ofrnreaching youthful customers.rnrn"Are people going to read 'War and Peace' on their telephones?"rnasked David Harper, whose company, Wireless Ink, in Cold Spring,rnN.Y., offers Web users cellphone-size literature on such weightyrnthemes as the zombie apocalypse. "The answer is probably no. Rightrnnow the content on mobile devices is almost like early television.rnWhat they did then was to sit down and do a radio broadcast for therntelevision screen. But there was a picture. Our mission now is to getrnfeedback."rnrnOne pioneer is Media Republic, an Amsterdam company that isrnsuccessfully reaching young women with the mobile equivalent ofrnthe French "roman photo," a sentimental genre of romantic stillrnphotos and text that dates to the postwar period.rnrnDutch users register their mobile phones to follow the adventures ofrnthe hormone-driven characters of "Jong Zuid," or "Young South,"rnwhich is now in production for its fourth season. Customers receiverntwo episodes daily, each with six photographs of well-known Dutchrnactors and text describing the travails of glamorous young peoplernseeking their fortune in the big city.rnrnA weekly subscription costs about $1.50, but most of the revenuerncomes from an assortment of corporate sponsors who pay for productrnplacements, Web advertising and the exclusive rights to sponsorrn"Jong Zuid" contests and promotions.rnrnMedia Republic and a partner are to produce a similar English-rnlanguage version, which will start appearing in Australia this month,rnusing local actors and scenes. Called "My Way," it is calculated tornappeal to young women, as did the Dutch phone soap, whichrnattracted 78,000 subscribers, 68 percent of them women, with anrnaverage age of about 18.rnrnMedia Republic is planning to bring out other versions of the soaprnopera early next year in Germany and in France, where its partner,rnNX Publishing, is in the final stages of negotiation with majorrnFrench television channels, magazines and mobile telephonernoperators.rnrn"Everybody is eventually moving to video on mobile, and thisrn'roman photo' concept is a bridge for those people who are not ablernto use videos yet because they need a sophisticated telephone," saidrnJean-Michel Blottiere, NX's chief executive. "This is a step thatrncould lead us very sweetly to video."rnrnThe market researcher IDC of Framingham, Mass., predicts thatrnabout 4.5 million smart phones will be shipped to stores this year andrnestimates that the number will grow to 35 million by 2008.rnrnAlmost two-thirds of the 62 million cellphones shipped in Europe inrnthe last quarter were camera phones with color screens, according tornCanalys, a technology consulting and research firm based inrnLondon. Only 3 percent of phones sold in Europe last year werernsmart phones, but Canalys expects that number to pick uprnsubstantially next quarter.rnrnStill, that hasn't stopped a number of companies from trying tornexploit the potential market. During the Asian Film Festival thisrnmonth in Singapore, MediaCorp, a local company, announced that itrnwas spending a half-million dollars to produce 45 two-minuternepisodes of a Chinese-language mobile video drama.rnrnThe giant British mobile-phone company Vodafone has struck arnpartnership with 20th Century Fox to create a made-for-cellphonernvideo series, based on the television show "24," which will startrnappearing next month in the first of 13 countries. (It will eventuallyrnappear in the United States through Vodaphone's partner VerizonrnWireless.) A British phone manufacturer, I-Mate, has also producedrn"Cjaq," a 10-part thriller with video about five young people trappedrnin a futuristic nightclub to which they were drawn by a hoax text-rnmessage invitation.rnrnIn Japan, major publishers like Shinchosha and Kadokawa Shotenrnhave created Web sites to offer telephone reading material. Japan isrnalso home to probably the most successful telephone venture. Earlierrnthis year a mobile novel jumped from phone screens to the silverrnscreen, evolving into a feature film, "Deep Love."rnrnIn the book industry in the United States, the initial reaction tornmobile-lit is: "Are you kidding?" as one veteran put it.rnrnStill, some major New York publishing houses are pondering thernfuture. "We are paying attention, but we haven't entered the marketrnyet," said Kate Tentler, vice president and publisher for Simon &rnSchuster Online. "It would be crazy not to look at this. Smart phonesrnare everywhere and it's the fastest-growing device."rnrnIn Europe, even some old-guard publishers have jumped into thernmobile format. The Munich-based Langenscheidt Publishing Grouprnis a traditional, family-run company that would seem an unlikelyrnplayer in this market. It has been publishing dictionaries, travelrnguides and map books since 1856 and is run by the fourthrngeneration of the Langenscheidt family.rnrnThis month Langenscheidt started offering a phone-size flirtingrndictionary that is its way of promoting international understanding.rnFor about $5, the service offers 600 or so phrases in the chosenrnlanguage, and practical advice including phonetic pronunciations ofrnpolite brushoffs.rnrnThe benefit, said Ina Kaese, who manages Langenscheidt's mobilernservices, is that if you are a traveler in a foreign city in a busy bar,rnyour telephone can be your instant guide to romance. It is the mobilernequivalent of the 17th-century Cyrano de Bergerac, who famouslyrnsupplied lines to the lovelorn. But certainly not ones like this: "Willrnanybody be jealous if I invite you to a cocktail?"rnrn这是程序的运行结果:rnenter a name for a text filernTimesDocrnhere are the number of sentences of each lengthrn0 0 rn1 0rn2 0rn3 0rn4 0rn5 2rn6 0rn7 0rn8 0rn9 1rn10 0 rn11 2rn13 0rn14 0rn15 2rn16 1rn17 2rn18 2rn19 1rn20 27rnrnrn
c#文本文件读取
用c#实现<em>文本文件</em>的<em>读取</em>。本程序实现了<em>文本文件</em>的<em>读取</em>,并初步判断了文件是否已经被打开。
读取文本文件据!!
在DELPHI<em>中</em>,如何读去文本<em>中</em>的<em>数</em>据,如何分辨<em>文本文件</em>的行列, 例子<em>数</em>据如下: rn rn1 会计部 章山 文员 rn2 信息部 力四 职员 rn3 资产部 小六子 职员 rn5 会计部 ss 职员 rn6 会计部 rr 课负责人 rn7 会计部 kk 职员
Excel vba实例 Excel vba
Excel vba Excel vba<em>EXCEL</em>实现动画的四种实例.RAR
vba问题,怎样插入图片到Excel
最好介绍本<em>VBA</em>好书,在哪有得买,我在广州。rn不算很急,记得告诉我。过几天才用。rnTks
C++读取文本文件,文件名位置问题
文件paras.hrn[code=c]rn#ifndef __paras_h__rn#define __paras_h__rnrnconst int MFactor = 20;rnconst char* FNAME = "small.txt";rnrn#endifrn[/code]rnrn文件files.cpprn[code=c]rn#include rn#include rn#include "paras.h"rn//const char* FNAME = "small.txt";rnrnvoid readSolid(void)rnrn std::ifstream file_in;rn file_in.open(FNAME);rn file_in.close();rn std::cout << " Read complete! " << std::endl;rnrn[/code]rnrn文件main.cpprn[code=c]rn#include rn#include "paras.h"rnvoid readSolid(void);rnrnint main(int argc, char** argv)rnrn readSolid();rn std::cout << "MFactor = " << MFactor << std::endl;rn return 0;rnrn[/code]rnrnrn<em>文本文件</em>small.txt,一行rn27.4781, 5.83141, 2.2rnrn[color=#FF0000]问题:[/color]rn当FNAME在头文件<em>中</em>定义时出错,而在files.cpp<em>中</em>定义时则没问题。如何才能在头文件paras.h定义<em>读取</em>的文件名?rnrnrnrn
VBA统计文件夹下EXCEL文件某一工作簿的
某一文件夹下有许多<em>EXCEL</em>2003的文件,每个文件基本格式一样,现在要求把其<em>中</em>一个叫"基础表"的工作簿的<em>中</em>的<em>数</em>据统计出来,我试了新建个空表Book1.xls,然后在其<em>VBA</em><em>中</em>这样写[code=VB]Sub s123()rn Dim f$rn Dim i As Integerrn Dim sh1rn Set sh1 = Worksheets(1)rn rn f = Dir(ThisWorkbook.Path & "\*.xls")rn Do While f <> ""rn If f <> "Book1.xls" And f <> ThisWorkbook.Name Thenrn Workbooks.Open frn sh1.Cells(i, 1) = Workbooks(f).Sheets(1).Cells(5, 2)rn '......................rn End Ifrn Workbooks(f).Close Falsernrn Looprn rn rnEnd Sub[/code]这样不行在sh1.Cells(i, 1) = Workbooks(f).Sheets(1).Cells(5, 2)rn这一句<em>中</em>提示错误424,要求对象,大家指点下,该怎么写,rnrnrnrn原来的东东掉了,也想不起来了,人老了也没用了,在线等
excel vba excel vbaexcel vba
不错的东西excel vbaexcel vbaexcel vbaexcel vba不错的东西不错的东西不错的东西不错的东西
excelVBA问题
<em>VBA</em>如何将性别显示“F”和“M”转换为“女”和“男”,因为是通过宏实现的,提取<em>数</em>据后显示的是“F”“M”,初学宏,所以麻烦哪位大侠帮帮忙!!
excelVBA的使用
遇到的问题                    优化1.1                    优化2.0          遇到的问题          在工作<em>中</em>遇到了一点小小的问题,需要给我负责带的班级的同学们测试男生1000米,女生800米的成绩。表格是这样的: 体育成绩表 序号 班级 姓名 性别 男1000
在Excel使用VBA
在Excel<em>中</em>使用<em>VBA</em>,进入<em>EXCEL</em>自动化之门
Excel的vba编程.
我遇到这样的一个问题在excel<em>中</em>有vba实现:rn例子:在a列<em>中</em>有 1,2,3,4,5,6,7,8,9个<em>数</em>字,rn 在b列<em>中</em>有1,2,4这3个<em>数</em>字.rn我想做的是,一个两重的循环,实现看看b列<em>中</em>的<em>数</em>字,在a列<em>中</em>有没有.rn该如何写呢?rn
Excel VBA文件夹操作
很有用的操作代码!!自己亲自使用的。简单易懂,方便操作!!
excel的vba问题。
谁能帮帮我。在excel表<em>中</em>,我从一个表sheet1<em>中</em>复制一定范围的<em>数</em>据,再粘贴到别一个工作表“信息表”<em>中</em>,为何range("A3").select的select无效rnrnPrivate Sub CommandButton1_Click()rnRange("a2:d41").SelectrnSelection.CopyrnSheets("信息表").SelectrnRange("a3").SelectrnActiveSheet.PasternEnd Subrn
EXCELVBA问题
如何在<em>EXCEL</em><em>中</em>动态的显示图片,要求如下: rn 1,在某一CELL<em>中</em>输入图片的绝对路径,移开焦点后,在该cell的右边自动显示图片,并且图片可根据列的大小自动适应. rn 2,当修改路径完后,该CELL右边的图片会被删除并替换上新的图片. rn 请高手帮忙!! rn 请问<em>EXCEL</em>能做到吗?? rnrnrn之前在论坛<em>中</em>找到一个类似问题答案..由于本人不懂<em>VBA</em>... rn帮忙看看... rn可以参考这个:[url=http://topic.csdn.net/t/20030721/17/2054348.html]http://topic.csdn.net/t/20030721/17/2054348.html[/url]
怎么在EXCELVBA控制图表的位置
我想在应用程序<em>中</em>提供把<em>数</em>据传到<em>EXCEL</em><em>中</em>去制表,具体步骤:rn1。在应用程序<em>中</em>创建一个<em>EXCEL</em>文档。rn2。为<em>EXCEL</em>文档创建制表的宏。rn3。把<em>数</em>据传到<em>EXCEL</em>文档。rn4。控制图表的<em>位置</em>(因为我要把几张图表放在一起)rnrnrn我的问题是怎么样实现上述的2和4的两个步骤?rn希望大侠们能给我一个例子!!
怎样设置图片在EXCEL单元格位置
RT,比如说让图片居<em>中</em>,先谢谢了
怎样替换一个文本文件的部分内容?怎样在文本文件查出一段文字的位置
我想在example.txt文件<em>中</em>找到“[domain1]”这个字符串,并用“[domain1]加换行加[User1=xbh]”来代替,怎样实现?rn其实就是在找到“[domain1]”后,在后面换行再加“[User1=xbh]”。rn顺便问一下,要是直接定位“[domain1]”这个字符串,需要怎么做?
C#NPOI操作excel之读取和写入excel
一、下载引用 下载需要引用的dll,即:NPOI.dll,NPOI.OOXML.dll,NPOI.OpenXml4Net.dll,ICSharpCode.SharpZipLib.dll(office2007版需要此dll)。 程序集下载地址:点击打开链接 二、excel转datatable类 using System;   using System.D
读取Config.ini内容写入XML文件某一特定位置[
现有Config.ini初始化文件内容如下:rn#----------------- message connect infornapp.message.connectinfo.device=COM5rnapp.message.connectinfo.baudrate=9600rnapp.message.connectinfo.sn=WEIY-DQVO-EVUD-QODUrnrn#----------------- ftp logon infornapp.ftp.logon.info.hostip=10.111.0.220rnapp.ftp.logon.info.port=21rnapp.ftp.logon.info.username=PSMS/ftprnapp.ftp.logon.info.password=ftprnapp.ftp.logon.info.filepath=rnrn#----------------- Platform namernapp.system.common.sysname=山西公安厅网上督察平台rnrn#----------------- db connection--rnconnectionUrl=jdbc:oracle:thin:@10.111.0.220:1521:orclrnuserName=shanxirnpassWord=shanxirnrn请问我怎么将 db connection 下的属性 <em>数</em>据库地址 用户名和密码 <em>读取</em>出来 然后写入applicationContext.xml文件<em>中</em>rn替换内容为<em>中</em>的 地址和用户名 密码rnrnrnrnrnrnrnrnrnrnrnrn或者是替换reportConfig.xml文件<em>中</em>的 链接地址 和用户名rnrnrnshengrnoraclernjdbc:oracle:thin:@10.111.0.220:1521:orclrnoracle.jdbc.driver.OracleDriverrnshanxirnshanxirngbkrngbkrnrnrnrnrnrnrn江湖救急,谢谢了 !!先感激下 最好用JAVA解决
读取Config.ini内容写入XML文件某一特定位置
现有Config.ini初始化文件内容如下:rn#----------------- message connect infornapp.message.connectinfo.device=COM5rnapp.message.connectinfo.baudrate=9600rnapp.message.connectinfo.sn=WEIY-DQVO-EVUD-QODUrnrn#----------------- ftp logon infornapp.ftp.logon.info.hostip=10.111.0.220rnapp.ftp.logon.info.port=21rnapp.ftp.logon.info.username=PSMS/ftprnapp.ftp.logon.info.password=ftprnapp.ftp.logon.info.filepath=rnrn#----------------- Platform namernapp.system.common.sysname=山西公安厅网上督察平台rnrn#----------------- db connection--rnconnectionUrl=jdbc:oracle:thin:@10.111.0.220:1521:orclrnuserName=shanxirnpassWord=shanxirnrn请问我怎么将 db connection 下的属性 <em>数</em>据库地址 用户名和密码 <em>读取</em>出来 然后写入applicationContext.xml文件<em>中</em>rn替换内容为<em>中</em>的 地址和用户名 密码rnrn rn rn rn rn rn rn rn rnrnrn或者是替换reportConfig.xml文件<em>中</em>的 链接地址 和用户名rnrn rn shengrn oraclern jdbc:oracle:thin:@10.111.0.220:1521:orclrn oracle.jdbc.driver.OracleDriverrn shanxirn shanxirn gbkrn gbkrn rn rn rnrnrnrn江湖救急,谢谢了 !!先感激下
c++怎样读取文本文件的某行的某些字段
c++<em>中</em>怎样<em>读取</em><em>文本文件</em><em>中</em>的某行<em>中</em>的某些字段?rnrn打开了一个<em>文本文件</em>,ifstream fin("abc.txt"); rn我想直接获取该文本第三行第五至第七个字符,请问有没有什么好办法?
EXCELVBA读取据库据结果显示#value!
我估计是<em>数</em>据太长超过了7行rn因为有的能显示(低于8行的),超过8行的就不能显示rn请问怎么解决?
怎样正确取得DATAGRID某一单元格位置
通过 datagrid.rows[10].cells[5].text这样的方式取得的值在有滚动条时不正确,有能正确取得真正<em>位置</em>的值的办法吗?rn
powerpointvba如何读取给定excel文档据?
如题。rn另一个问题是如何在指定<em>位置</em>(纵横像素点)输出文字?我现在的作法是动态生成一个label控件,不过觉得方法不对。如果能直接输出文字就好了。
EXCEL VBA入门EXCEL VBA入门EXCEL VBA入门
<em>EXCEL</em> <em>VBA</em>入门<em>EXCEL</em> <em>VBA</em>入门<em>EXCEL</em> <em>VBA</em>入门<em>EXCEL</em> <em>VBA</em>入门<em>EXCEL</em> <em>VBA</em>入门<em>EXCEL</em> <em>VBA</em>入门<em>EXCEL</em> <em>VBA</em>入门
怎样打开应用程序到指定屏幕的某一位置
怎样用vb来打开应用程序且指定到某一<em>位置</em>?想在打开应用程序的同时移动到该<em>位置</em>。如打开QQ且初始<em>位置</em>是屏幕的(20,20)上rn
读取文本文件字符串到组里的问题,解决必给分
<em>文本文件</em>格式如下:rn125rnfdfrn548rn4t5rn4555rndrn48rn要求,把文件<em>中</em>符合000--999的字符串存到一个<em>数</em>组里,<em>数</em>组的长度由符合条件的字符串个<em>数</em>决定,其他不符合条件如字母,小于3个或大于3个的字符串都忽略掉.
VBA操作文本文件(删除行)
我想实现<em>VBA</em>操作<em>文本文件</em>的功能,主要是把<em>文本文件</em><em>中</em>的某些行删除,不知道应如何实现啊!
VBAVBA实现EXCEL的进度条
<em>VBA</em>用<em>VBA</em>实现<em>EXCEL</em><em>中</em>的进度条
VBA】 将VBA代码插入Excel
将<em>VBA</em>代码插入到非宏Excel的Sheet表代码<em>中</em>,常用于达到单元格SelectionChange的效果,其他意义不大。 使用目的: (1)用户能够对SelectionChange事件的有效无效进行控制。 (2)可用于根据输入内容,进行<em>数</em>据库查询,将结果通过下拉框选择,方便用户填写。 (3)代码可以生效,也可以全身而退。不影响原Excel的格式,及用户的源文件,仍是xlsx格式,没问题。插入的代...
VBA 读写文本文件
直接采用Open函<em>数</em>+Line input命令 Private Sub txt_read() Dim txt As String Open "D:\dzh.txt" For Input As #1 ' '对文件做任何 I/O 操作之前都必须先打开文件。Open 语句分配一个缓冲区供文件进行 I/O 之用, ...
读取文本文件
对于C++<em>读取</em>STL文件,STL文件(Stereo lithographic)文件格式是美国3D SYSTEMS公司提出的三维实体造型系统的一个接口标准,其接口格式规范。采用三角形面片离散地近似表示三维模型,目前已被工业界认为是快速成形(rapid prototypi ng)领域的标准描述文件格式。在逆向工程、有限元分析、医学成像系统、文物保护等方面有广泛的应用。
文本文件读取???
我做了一个简单的记事本程序,用它来<em>读取</em><em>文本文件</em>,可<em>文本文件</em><em>中</em>的内容如果是<em>中</em>文,就什么都读不出来,是空白的,如果内容是英文的,就可以正常显示了。怎么回事?
文本文件读取
问题是这样的,我现在需要打开一个<em>文本文件</em>,<em>读取</em>其<em>中</em>的<em>数</em>据进行处理rn<em>文本文件</em>的格式是“浮点<em>数</em>,浮点<em>数</em>,浮点<em>数</em>”,一条记录结束,回车到下一行,文件有很多条这样的记录。rn如果我用MFC的Doc类<em>中</em>的CArchive进行操作,请问怎样比较方便?我试了下,直接ar >> a...好像不行。rn含有如果不这么使用请问用什么比较方便?rn
怎样得到当前的文本文件的指针的位置
能否判断:rn比如我用某一种方式打开一个<em>文本文件</em>,rn在某一时候的指针的指向是文件头还是文件尾?rnrn
VB6 XP风格Button下载
VB6.0 编写XP风格按钮 Button 无组件,纯代码,可扩展性好! 相关下载链接:[url=//download.csdn.net/download/pkingone/2132767?utm_source=bbsseo]//download.csdn.net/download/pkingone/2132767?utm_source=bbsseo[/url]
进销存管理系统下载
一款简单实用的进销存管理系统,课程学习、毕业设计可用 相关下载链接:[url=//download.csdn.net/download/pangel00/3924852?utm_source=bbsseo]//download.csdn.net/download/pangel00/3924852?utm_source=bbsseo[/url]
java文件反编译小软件下载
比较小巧的一款java反编译小工具,绿色,不需安装。优点就是小巧,携带方便。不用安装。 相关下载链接:[url=//download.csdn.net/download/renyy99/4442051?utm_source=bbsseo]//download.csdn.net/download/renyy99/4442051?utm_source=bbsseo[/url]
相关热词 c#检测非法字符 c#双屏截图 c#中怎么关闭线程 c# 显示服务器上的图片 api嵌入窗口 c# c# 控制网页 c# encrypt c#微信网页版登录 c# login 居中 c# 考试软件
我们是很有底线的