实现聊天的简单功能Private Sub Combo1_Click() TxtSend.Font.Name = Combo1.Text End Sub Private Sub Check1_Click() '设置隶书字体 If Check1.Value = 1 Then TxtSend.FontName = "隶书" Else TxtSend.FontName = "宋体" End If End Sub Private Sub Check2_Click() '设置下划线字体 If Check2.Value = 1 Then TxtSend.FontUnderline = True Else TxtSend.FontUnderline = False End If End Sub Private Sub Check3_Click() '设置斜体字体 If Check3.Value = 1 Then TxtSend.FontItalic = True Else TxtSend.FontItalic = False End If End Sub Private Sub Check4_Click() '设置字体大小为18榜 If Check4.Value = 1 Then TxtSend.FontSize = 18 Else TxtSend.FontSize = 10 End If End Sub Private Sub Form_Load() Combo1.Text = TxtSend.Font.Name ‘设置下拉框，选择更多的字体 Dim i As Integer For i = 0 To Screen.FontCount - 1 Combo1.AddItem Screen.Fonts(i) Next With UDPSever ‘控件的名字为UDPSever .RemoteHost= "172.16.50.24" ‘服务器主机IP名称 .RemotePort = 1001 ‘连接的端口号 .Bind 1002 ‘绑定到本地的端口 End With End Sub Private Sub txtSend_Change() UDPSever.SendData txtSend.Text ‘在键入文本时，立即将其发送出去 End Sub Private Sub UDPSever _DataArrival (ByVal bytesTotal As Long) ‘在服

基于Android平台的音乐播放器设计报告v3.doc

职工管理系统c语言课程设计报告.docx

c++学生选课系统设计报告.doc

本课题要求以单片机为核心设计一个音乐提示定时器，具备倒数计时、时间修改、音乐演奏等功能。可作为微电脑倒数计数器，做一小段时间计时，放在家中使用，例如煮泡面、煮开水或小睡片刻等；用于全自动洗衣机洗涤完毕音乐提示定时器

汇编电子闹钟软件课程设计报告+源代码 写了两个，一个用了中断控制器，另一个没有用中断控制器，两个都具有闹钟功能和退出功能，第一个是扬声器报时，第二个是文字报时，都有详细注释）用的是tnpp。

计算机网络TCP课程设计报告，实现多线程通信，包含全部正确代码

51单片机期末课程作业 设计首先实现对小车行驶时的平均速度、即时速度以及里程等行驶参量的实时测量和显示功能，扩展了对小车的行驶时间的显示功能。 设计硬件部分设计采用了STC公司的STC89C52系列单片机为微控制器,根据车辆里程记录仪的要求对系统的主控模块、液晶显示模块、行车数据采集测量模块、蓝牙通信模块以及电机驱动等模块进行了设计。软件设计以Proteus为开发平台，结合C51系列单片机强大的在线调试能力，以C语言为编程语言编写出实用程序。并将之运用到了实物测试之中。 关键词：c51单片机、 0.96OLED显示 、蓝牙控制、 L298n、 霍尔电机 详情请见主页课程设计同名博客

3000W纯正弦波逆变器设计报告

本次设计主要根据书本第8、9章内容，主要为了理解学习导航功能包集及其工作方式、配置所有必要文件、运行启动文件并开始导航，将采用ros的导航包，设计一个具有自动导航功能的小车，并在Gazebo中进行仿真。 内涵每一步详细操作，百分百可复现