如果您无法下载资料，请参考说明：
1、部分资料下载需要金币，请确保您的账户上有足够的金币
2、已购买过的文档，再次下载不重复扣费
3、资料包下载后请先用软件解压，在使用对应软件打开
实训二数据类型及常量、变量的应用对象PrivateSubCommand1_Click()Picture=LoadPicture("D:\liu\tupian\A4.JPG")EndSub第4步：运行程序，单击命令按钮会显示出如图所示的结果。内容2：单击窗体，字符串居中显示，效果见sx2_2.vbp步骤如下：第1步：新建一标准工程。第2步：在窗体的单击事件Click中，编写如下代码：PrivateSubForm_Click()Dimsample$,x%,y%'定义三个过程级变量FontSize=16'设置字号、粗体、字颜色FontBold=TrueForeColor=vbBlueClssample$=“MicrosoftVisualBasic程序设计”'设置输出位置CurrentX=(Form1.ScaleWidth-TextWidth(sample$))/2CurrentY=(Form1.ScaleHeight-TextHeight(sample$))/2Printsample$EndSub第4步：运行程序，单击后窗体，会显示出如图所示的结果。
立即下载
