1
<% @page language="vb" %>
2
<html>
3
<head>
4
<title>
5
編寫一個asp.net程序代碼
6
</title>
7
</head>
8
<body>
9
<%
10
dim strAuthorName
11
dim intDefaultSize as integer
12
dim strFontName as string="隸書"
13
const strTitle as string="編寫""一個""asp.net程序"
14
const strFontColor as string="purple"
15
strAuthorName=10
16
strAuthorName="tomtom"
17
intDefaultSize= 5
18
response.write("<font face=" & strFontName & " size=" & intDefaultSize & " color=" & strFontColor & ">")'這里的"和&之間一定要有一個空格!!!我不加空格的話就調試不到,不知道為什么,有沒有高手可以告訴我?
19
response.write("標題文字:" & strTitle & "<br>")
20
response.write("作者:" & strAuthorName & "<br>")
21
response.write("默認中文字體:" & strFontName & "<br>")
22
response.write("默認字號:" & intDefaultSize & "<br>")
23
response.write("</font>")
24
%>
25
</body>
26
</html>

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

25

26
