当前位置:首页 » 小说阅读 » 小说阅读器设计

小说阅读器设计

发布时间: 2021-07-17 01:23:16

⑴ 小说阅读网的数据库怎么设计啊

小说阅读网?被起点收购的那个小说阅读网么?你设计的是个人作品的数据库,还是网站管理平台的数据库啊?个人作品的数据库,不需要可以去设计啊。只要发文章的时候弄好文章分卷,然后按照分卷内容发表你的小说就可以了。一般都是外篇(含‘楔子’、‘公告’)等等,与正文(正文分‘卷一’‘卷二’……)依此类推,还有就是后记(包括‘结稿感言’‘未来写作计划展望’)等等。网站管理平台的数据库,那我也不知道怎么设计了。

⑵ 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

⑶ 正在编写一个软件,小说阅读器,急需数据库详细设计,求高人指点

book电子小说阅读器 V2.3“海啸电子小说阅读器”又名“e-bok电子小说阅读器”,模拟人看书的方式,尤其适合于阅读各种文本格式的电子小说文件,操作简便,界面新颖。内置有对各种段落进行智能处理的分段模块,使用户不用再修改原文本,方便阅读。
请参考

⑷ 有谁毕业设计做的是小说阅读器,给发一个看看

的是小说阅读器,给发一个看看肯好大

⑸ 我想找一个带阅读功模式的浏览器,最好是为安卓电纸书阅读器设计的

这个太简单了。我也是好几年的书虫,我现在看小说都是在手机QQ浏览器上面看小说,他里边有个小说书架,里边的功能跟app看书软件一样,真是太方便了,里边的小说好多,我都看了一年多了,还有很多精彩的小说没看过呢,而且里边的小说全部都是免费的,还能全屏看小说,上下,左右翻页什么的,很好用的,

⑹ vb怎样设计 小说阅读器

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

⑺ 小说阅读网站的设计与实现

你们怎么还在用ASP这种技术来做小说网站啊, 这套技术越来越没有前途了, 可能只有一些软院的老古董在用了, 微软体系的开发技术做桌面程序很厉害, 如果做网站的话还是得用javaweb来开发
比如用springmvc, mybatis等就可以写一个符合mvc架构的小说网站, 数据库可以用mysql, 这个是开源的, 比较易于使用
源码你可以用现成的成品进行二次开发, 论文直接搜文库就行, 大致的概要啊都写的差不多, 只要能过查重就可以了

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

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

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

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

热点内容
追美科幻小说 发布:2025-10-20 08:47:35 浏览:538
yy小说多女完本小说推荐 发布:2025-10-20 08:28:24 浏览:460
穿越言情完结小说推荐 发布:2025-10-20 08:25:32 浏览:720
文笔好的小说推荐现代言情 发布:2025-10-20 08:02:07 浏览:796
小学生读科幻小说 发布:2025-10-20 07:58:47 浏览:117
唯美悲伤的小说排行榜 发布:2025-10-20 07:58:10 浏览:340
炒鸡甜又有肉的电竞小说推荐 发布:2025-10-20 07:44:44 浏览:33
必须看的免费小说 发布:2025-10-20 07:28:26 浏览:682
校园男生言情小说 发布:2025-10-20 06:23:51 浏览:843
特污特甜的校园小说在线阅读 发布:2025-10-20 06:23:51 浏览:898