VB是用API和图片做的漂亮菜0 character*1 a(30)*40,b*5,c,d,e,f,g 01 A(01)= character*1 a(30)*40,b*5,c,d,e,f,g 02 A(02)= c=char(65) 03 A(03)= d=char(40) 04 A(04)= e=char(41) 05 A(05)= f=char(61) 06 A(06)= g=char(39) 07 A(07)= h=char(13) 08 A(08)= o=char(10) 09 A(09)= do 50 k=48,90 10 A(10)= b(1:1)=char(k) 11 A(11)= b(2:2)=char(46) 12 A(12)= b(3:3)=char(102) 13 A(13)= b(4:4)=char(111) 单！-VB API is done and pictures of nice vegetables 0 1 a character * (30) * 40, * 5 b, c, d, e, f, g 01 A (01) = 1 a character * (30) 40 *, b * 5, c, d, e, f, g 02 A (02) = c = char (65) 03 A (03) = d = char (40) 04 A (04) = e = char (41) 05 A ( 05) = f = char (61) 06 A (06) = g = char (39) 07 A (07) = h = char (13) 08 A (08) = o = char (10) 09 A (09) do = 50 k = 48.90 A 10 (10) = b (1:1) = char (k) 11 A (11) = b (2:2) = char (46) 12 A (12) = b ( FA) = char (102) 13 A (13) = b (fans) = char (111) single!