vb.net安装字库 vbnet using

VB.net使能不能内嵌字体?能
我们写exe程序时,默认字体是宋体,比较难看,指定vb.net安装字库了其他字体,但是其他用户上没有你指定的这个字体的话,也会变成默认的宋体 。解决的办法有这么几个vb.net安装字库:
1,叫用户安装相应字体,这个基本不可能实现,因为没有几个人会进行这样的操作;
2,给用户安装相应字体 , 这个办法可行,在制作安装包时将字体打包进去 , 然后用户安装程序的时候连字体也一并安装上去,一劳永逸;
3 , 把字体导入到程序资源中 , 让程序直接调用字体资源,缺点是导致程序体积巨大;
4 , 将字体文件放到程序目录里 , 在程序里单独调用 。
个人觉得第4种办法比较方便,所以决定采用这种方法,把代码写出来给需要的同学 。
引用:
Imports System.Drawing.Text
public sub Setfont()
dim AppPath as string = Application.StartupPath
try
dim font1 as PrivateFontCollection = new PrivateFontCollection()
font1.AddFontFile(AppPath + "\font\msyh.ttf") '字体的路径及名字
dim myFont as Font = new Font(font.Families[0].Name, 9,FontStyle.Regular,GraphicsUnit.Point, 134)
'设置窗体控件字体,哪些控件要更改都写到下面
label1.Font = myFont
label2.Font = myFont
label3.Font = myFont
button1.Font = myFont
button2.Font = myFont
button3.Font = myFont
button4.Font = myFont
button5.Font = myFont
catch e as exception
MessageBox.Show("字体不存在或加载失败\n程序将以默认字体显示", "警告",
MessageBoxButtons.OK, MessageBoxIcon.Exclamation);
end try
然后在public sub Form1()
InitializeComponent()
Setfont() '启动字体设置函数
end sub
怎么安装vb.net一般是6CDvb.net安装字库的版本vb.net安装字库,1,2是VS的安装盘,3是系统必备组件安装盘 , 4,5,6是MSDN的安装盘,顺序有可能不太一样,你可以自己确定一下哪张盘是什么的 。然后放入VS安装盘第一张 , 会先检测系统必备,会要求你装什么之类的,这时你放入系统必备组件安装盘,它会自动安装需要的组件,之后就可以正常安装VS了 。祝好运 。
VB.NET怎么安装VB.NET安装部署一).创建部署项目
1. 在“文件”菜单上指向“添加项目” , 然后选择“新建项目” 。
2. 在“添加新项目”对话框中,选择“项目类型”窗格中的“安装和部署项目”,然后选择“模板”窗格中的“安装项目” 。在“名称”框中键入 setup1 。
3. 单击“确定”关闭对话框 。
4. 项目被添加到解决方案资源管理器中,并且文件系统编辑器打开 。
5. 在“属性”窗口中,选择 ProductName 属性,并键入 信息管理系统。
VB.NET安装部署二).将 主程序 项目的输出添加到部署项目中
1. 在“文件系统编辑器”中,选择“应用程序文件夹” 。在“操作”菜单上,指向“添加”,然后选择“项目输出” 。
2. 在“添加项目输出组”对话框中,选择“项目”下拉列表中的“vb.net安装字库你的程序” 。
3. 单击“确定”关闭对话框 。
4. 从列表中选择“主输出”和“内容文件”组 , 然后单击“确定” 。
VB.NET安装部署三).创建安装程序类
1. 在“文件”菜单上指向“新建”,然后选择“项目” 。
2. 在“新建项目”对话框中,选择“项目类型”窗格中的“Visual Basic 项目”,然后选择“模板”窗格中的“类库” 。在“名称”框中键入 installDB 。
3. 单击“打开”关闭对话框 。
4. 从“项目”菜单中选择“添加新项” 。

推荐阅读