填空题
完成下面的程序,使显示结果如下图所示。
Private Sub Form_Click()
FontSize=18
Samples="
[8]
"
x=(ScaleWidth_TextWidth(Samples))/2
y=(ScaleHeight_TextHeight(Samples))/2
CurrentX=x
CurrentY=y
[9]
Sample$
End Sub
【参考答案】
Print
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
填空题
Select Case x
点击查看答案
填空题
用户定义对象
点击查看答案&解析
相关试题
Cls
PaintStart = False
Case Else
PaintStart = True