📄 1736.html
字号:
<html> <head> <title>Re: 有图示的功能表</title> </head> <BODY BACKGROUND="" BGCOLOR="white" TEXT="black" LINK="red" VLINK="#808080" ALINK=""> <center> <h1>Re: 有图示的功能表</h1> </center><HR><p>Posted by <a href="mailto:cww5@mail.ncku.edu.tw">cww</a> on January 18, 1998 at 23:43:33:<p>In Reply to: <a href="1735.html"><b>Re: 有图示的功能表</b></a> posted by cww on January 18, 1998 at 23:27:55:<p>: : : 如何在 Menu 让图示与文字并存 ?<br>: 糟糕的是:小弟并不知到如何读取 Long Integer 的 High Word 和 Low Word!<br>: 可以用以下的方式来求得,只是我也希望有更好的方式<br>sorry post 太快了,另一种方式为:<p>Private Type tLong<br> L As Long<br> End Type<br>Private Type t2Integer<br> b2(1 To 2) As Integer<br> End Type<p><br>Private Sub Form_Load()<br>Dim X1 As tLong<br>Dim X2 As t2Integer<p><br>X1.L = 2 ^ 17 + 1<br>LSet X2 = X1<br>Debug.Print X2.b2(1), X2.b2(2)<br>'x2.b2(1) --> hiword x2.b2(2) lowword<br>End Sub<p><br><p><a name="followups">Follow Ups:</a><br><ul><!--insert: 1736--></ul><!--end: 1736--><br><HR><p></body></html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -