vb小说阅读器

李若彤
李若彤
发布于 阅读量 291
vb小说阅读器

① vb怎样设计 小说阅读器

RichTextBox1 用这个控件
如果字数多不能用text,字数少的话就没问题。

② 小说下载阅读器怎么用不了

VISTA系统上装很容易出问题,我暂时也不晓得咱子整。特别是它的兼容性比XP差多了

③ vb怎样简单设计小说阅读器

Private Declare Function SendMessage Lib "user32" Alias "SendMessageW" _
(ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, _
lParam As Any) As Long

Const EM_LINESCROLL = &HB6
Private Sub Form_Load()
'以下几个控件属性请在运行前设置好
'设置 Text1.ScrollBars = 2
'设置 Text1.MultiLine = True
'设置 Combo1.Style = 2
'设置 Combo2.Style = 2
With Combo1
.AddItem "宋体"
Combo1.AddItem "楷体"
Combo1.AddItem "黑体"
Combo1.AddItem "仿宋"
Combo1.AddItem "隶书"
Combo1.ListIndex = 0
End With
Dim i As Integer
For i = 8 To 72
Combo2.AddItem i
Next
Combo2.ListIndex = 0

File1.Pattern = "*.txt;*.htm;*.html;*.ini;*.bat;*.frm;*.vbp"

Timer1.Interval = 1000 '设置滚动速度1000等于一秒
Command1.Caption = "滚动"
End Sub
Private Sub Combo1_Click()
Text1.Font = Combo1.Text
End Sub

Private Sub Combo2_Click()
Text1.FontSize = Combo2.Text
End Sub

Private Sub Command1_Click()
Timer1.Enabled = IIf(Timer1.Enabled = False, True, False)
Command1.Caption = IIf(Command1.Caption = "滚动", "停止滚动", "滚动")
End Sub

Private Sub File1_Click()
Dim mpath As String
If Right(File1.Path, 1) <> "\" Then
mpath = File1.Path & "\"
Else
mpath = File1.Path
End If

Text1.Text = ReadFile(mpath & File1.List(File1.ListIndex))
End Sub

Private Function ReadFile(filePath As String) As String
Dim TempFile As Long
Dim LoadBytes() As Byte

On Error GoTo ErrCode
TempFile = FreeFile
Open filePath For Binary As #TempFile
ReDim LoadBytes(1 To LOF(TempFile)) As Byte
Get #TempFile, , LoadBytes
Close TempFile

ReadFile = StrConv(LoadBytes, vbUnicode)
ErrCode:
MsgBox "该文件无效!"
ReadFile = ""
End Function
Private Sub Dir1_Change()
File1.Path = Dir1.Path
End Sub

Private Sub Drive1_Change()
Dir1.Path = Me.Drive1.Drive
End Sub

Private Sub Timer1_Timer()
SendMessage Text1.hwnd, EM_LINESCROLL, 0, ByVal 1 End Sub

④ 谁问,谁有或者能找到一个TXT阅读软件,叫E-BOOK 版本是1.89样 它的图标是一个红色的书。

e-BOOK电子小说阅读器(绿色) 3.0.080711 书友版
e-BOOK是用VB5设计的32位文本文件阅读器,尤其适合于阅读各种文回本格式的电答子小说文件,它的特点是采用了印刷书籍式的人性化界面,具有内码识别、智能分段、自动翻页、自动刷新、自适应环境、书签等功能,是传统书籍与电子小说的完美结合。

⑤ vb有木有和textstream.readline相反的函数(相当readlastline)

VB读取文本文件的方式不外乎随机、顺序和二进制,随机方式可以随机读取任意位置的数据,但要求文件是以固定长度的块为单位来存储的,不适用于以行为单位存储的小说文件;顺序方式是从文件开头逐行(或逐字符)读取,这个是文本文件最常用的处理方式,但存在如楼主所说无法反向读取的问题;二进制方式可以实现逐字节读取,可以实现精确读取,而且可以任意跳转文件指针,适合操作非文本的二进制文件(当然也可操作文本文件)。
楼主的问题可以这么几种方法解决:
1、用数组。这个楼主也说了。其实这个才是最好的解决办法,速度是最快的,虽然耗内存,但现在的电脑一般都是上G的内存,鸭梨不太的,只要注意用完就把数组清除就行了;
2、可以用类似浏览器的历史记录功能,随时记录文件的当前指针位置(可以用一个数组记录多步操作的历史文件位置),这样随时可以用seek语句跳转到上一步(或上几步)的文件位置。当然,这种方法无法跳转到某个指定行;
3、在首次读取某个小说文件时,就为这个文件建立一个索引文件,记录下文件中每个回车换行符所在的位置,然后就可以任意精确跳转到某条指定行了。这是一般小说阅读器软件的通常做法。这个方法要求文件最好是以二进制方式打开的。

⑥ vb 写 txt阅读器

这个是个大工程,能做到前两步也就不在乎第三步了 你要的急不急?不急的话我可以给你做!有意向联系我!

⑦ vb大神,怎样用vb编写简单的小说阅读器

RichTextBox1=“我是小说。”
用这个控件!!

⑧ vb编的txt阅读器源代码

Open "路径.txt" For Input As 1
Dim strLine As String,strText As String,bReadFirst As Boolean
While Not Eof(1)
If bReadFirst Then
Line Input#1,strLine
strText=strText & vbCrLf & strLine
Else
Line Input#1,strText
bReadFirst=True
End If
Wend
Close 1
Text1.Text=strText

⑨ vb编写简单的小说阅读器

简述:1、Textbox容纳抄量为65535bytes,不能作为载体;
2、调用 通用对话框 读取文件地址。

这里用SPL解释一下核心部分代码:
建立 私有的 程序: 单击 "打开文件" 时执行下列程序 ()
调用 通用对话框 的"打开"
如果 通用对话框 的 文件地址 的长度 !=0 , 那么
'注:“!=”是“不等于”的意思,相当于VB中的“<>”
让 富文本框 载入文件: 通用对话框 的 文件地址
完毕
完毕

备注:SPL是一种解释和编程通用的语言。

⑩ 手机WindowsCE 6.0系统用什么小说阅读器

广义上说,智能手机除了具备手机的通话功能外,还具备了PDA的大部分功能,特别是个人信息管理以及基于无线数据通信的浏览器和电子邮件功能。智能手机为用户提供了足够的屏幕尺寸和带宽,既方便随身携带,又为软件运行和内容服务提供了广阔的舞台,很多增值业务可以就此展开,如:股票、新闻、天气、交通、商品、应用程序下载、音乐图片下载等等。融合3C(Computer、Communication、Comsumer)的智能手机必将成为未来手机发展的新方向。
1、具备普通手机的全部功能,能够进行正常的通话,发短信等手机应用。

2、具备无线接入互联网的能力,即需要支持GSM网络下的GPRS或者CDMA网络下的CDMA 1X或者3G网络。

3、具备PDA的功能,包括PIM(个人信息管理),日程记事,任务安排,多媒体应用,浏览网页。

4、具备一个具有开放性的操作系统,在这个操作系统平台上,可以安装更多的应用程序,从而使智能手机的功能可以得到无限的扩充。

既然只有具备操作系统的手机才配叫智能手机,那其的操作系统种类又有哪些呢?既然智能手机的诞生和掌上电脑有关,那它的操作系统也肯定会与掌上电脑有关。Symbian和Windows CE、Palm、Linux依旧是这四大阵营,不过与PDA操作系统中Palm和Windows CE两强争霸的局面不同,在智能手机操作系统中,Symbian却抢得了先机,索爱、诺基亚、摩托罗拉以及松下等公司基本上都采用了Symbian为主的操作系统。

Symbian:Symbian的很像是Windows和Linux的结合体,有着良好的界面,采用内核与界面分离技术,对硬件的要求比较低,支持C++,VB和J2ME。兼容性较差。代表机型:诺基亚6600索爱P908西门子SX1

Windows CE:由于微软的强大实力,WINDOWS CE有很多先天的优势,比如拥有强大的内建软件,WORD,EXCEL,IE,MSN MESSENGER,OUTLOOK,MediaPlay等,其它系统上的同类软件很难做到如此完善和统一。由于硬件要求极高使价格也高了,耗电还是很比较大,系统稳定性差。代表机型:多普达智能手机系列。

Palm:这种系统对硬件的要求很低,因此在价格上能很好的控制,耗电量也很小。 PALM 由于比较早出现,应用在手机上还是有很多不完善的地方,相同于其它两大系统,PALM 显得比较弱小。代表机型:三星SGH-i500Treo 600。

Linux:Linux具有源代码开放、软件授权费用低、应用开发人才资源丰富等优点,便于开发个人和行业应用。起步太晚,没有雄厚的基础。代表机型:摩托罗拉A760 ,三星i519 。

除了这四个操作系统以外,大家是不是还听说过什么S60、S70等操作系统,这些又是什么呢?其实这些都是Symbian的分支,为什么这么说呢?原来Symbian OS只是一个操作系统的内核,而界面可以由各个厂商自已开发,9210与3650的界面就是不同的,而P908与6600又不相同,6600用的是Series 60界面,P908用的是UIQ界面,这也导至了,因为微小的差别使程序不能通用,就算是9210的Symbian OS 6.0和3650的6.1的程序也大多是不兼容的,原因就是因为界面接口的问题,相信对于这个问题的解决方案的出台,我们需要等待一些日子了。在不同界面中,有着不同的优点和缺点,Series 60容易操作,切换任务和关闭任务容易,而UIQ界面上可支持手写操作,功能更多,不过切换和关闭任务比较麻烦。好了,言归正传。下面还是给大家说说如何走出智能手机和智慧型手机选购中的误区。

既然要走出这个误区,首先我们就应该先来认识认识它的真面目。

误区一:可以手写输入的手机

很多朋友都认为可以手写输入的手机一般都是智能手机。其实不然,这两者并没有直接的因果联系。如波导的多易随E859和TCL的E757都具有手写功能,因为没有操作系统,所以我们给它们定义为智慧型手机。反之,多普达535,作为一款智能手机,但是却不支持手写功能,我们总不会也把它看作为智慧型手机吧!所以这两者没有直接的因果关系。

误区二:内置功能丰富的手机

是不是功能越多的手机就是智能手机呢?答案是否定的。例如CECT的T868内置的功能也非常多,也集成了PIM功能。难道我们也把它看为智能手机吗?举个很恰当的例子来说明这个问题。以前386、486电脑才在中国大陆销售的时候,市面上就出现了一款与电脑功能相仿的“小霸王”学习机,不知道大家听说过这个产品没有,反正笔者自己家里有一台。因为当时涉及电脑的软件非常少,而学习机里内置的学习软件基本上跟电脑软件一样,所以两者的差别并不是很大。但随着电脑技术的发展,应用和游戏软件越来越多的被开发出来,学习机的市场就逐渐萎缩。如果想让学习机跟上电脑软硬件升级的步伐,是十分困难的。

同理,虽然现在许多生产智慧型手机的厂商,可以提供在线升级软件等功能,可是供用户选择的面毕竟很少。因为软件的更新需要手机厂商花费更多的精力,在如今这个群雄混战的手机市场,新产品的上市时间才是手机厂商最关心的问题。

反过来说,智能手机的功能就一定很丰富。为什么呢?因为其自身的操作系统在其中发挥了很大的作用。Symbian和Windows CE、Palm、Linux这四个操作系统相对应的智能手机都会在网上找到相当可观的免费资源。这是一件多么惬意的事情啊!

看到这里相信大家已经对如何区分智能手机和智慧型手机心里有个谱了吧!不过从价格上来看,智能手机的报价明显比智慧型手机高出一截,毕竟是“一分钱一分货”嘛。在这里提醒想购买此类型手机的读者注意,再购买手机之前,需考虑清楚自己需要什么类型的手机,在购买的时候一定要问清楚,不要被手机表面的东西所迷惑。

声明:本文是由会员李若彤在2023-06-23 21:35:07发布,如若转载,请注明本文地址:https://www.pixivzhan.com/tuijian/81644.html


上一篇:古风虐文虐到哭的小说推荐
下一篇:帝皇业小说在线阅读
相关文章