IsUnoStruct Function

แƒแƒ‘แƒ แƒฃแƒœแƒ”แƒ‘แƒก แƒญแƒ”แƒจแƒ›แƒแƒ แƒ˜แƒขแƒ”แƒ‘แƒแƒก แƒ—แƒฃ แƒ›แƒแƒชแƒ”แƒ›แƒฃแƒš แƒแƒ‘แƒ˜แƒ”แƒฅแƒขแƒ˜ แƒแƒ แƒ˜แƒก Uno struct.

แƒกแƒ˜แƒœแƒขแƒแƒฅแƒกแƒ˜

IsUnoStruct( Uno แƒขแƒ˜แƒžแƒ˜ )

แƒ“แƒแƒ‘แƒ แƒฃแƒœแƒ”แƒ‘แƒฃแƒšแƒ˜ แƒ›แƒœแƒ˜แƒจแƒ•แƒœแƒ”แƒšแƒแƒ‘แƒ:

Bool

Parameters:

แƒแƒ แƒแƒ˜แƒก Uno แƒขแƒ˜แƒžแƒ˜ : A UnoObject

แƒ›แƒแƒ’แƒแƒšแƒ˜แƒ—แƒ˜:

Sub Main

Dim bIsStruct

แƒ’แƒแƒ›แƒแƒกแƒแƒฎแƒ”แƒ— แƒกแƒ”แƒ แƒ•แƒ˜แƒกแƒ”แƒ‘แƒ˜

Dim oSimpleFileAccess

oSimpleFileAccess = CreateUnoService( "com.sun.star.ucb.SimpleFileAccess" )

bIsStruct = IsUnoStruct( oSimpleFileAccess )

MsgBox bIsStruct ' แƒแƒฉแƒ•แƒ”แƒœแƒ”แƒ‘แƒก แƒ›แƒชแƒ“แƒแƒ แƒก แƒ˜แƒ›แƒ˜แƒขแƒแƒœแƒ› แƒ แƒแƒ› oSimpleFileAccess แƒแƒ  แƒแƒ แƒ˜แƒก struct

แƒ’แƒแƒ›แƒ˜แƒกแƒแƒฎแƒ”แƒ— struct-แƒก แƒ—แƒ•แƒ˜แƒกแƒ”แƒ‘แƒ

Dim aProperty As New com.sun.star.beans.Property

bIsStruct = IsUnoStruct( aProperty )

MsgBox bIsStruct ' แƒแƒฉแƒ•แƒ”แƒœแƒ”แƒ‘แƒก แƒญแƒ”แƒจแƒ›แƒแƒ แƒ˜แƒขแƒก แƒ˜แƒ›แƒ˜แƒขแƒแƒ› แƒ แƒแƒ› aแƒ—แƒ•แƒ˜แƒกแƒ”แƒ‘แƒ แƒแƒ  แƒแƒ แƒ˜แƒก struct

bIsStruct = IsUnoStruct( 42 )

MsgBox bIsStruct ' แƒแƒฉแƒ•แƒ”แƒœแƒ”แƒ‘แƒก แƒ›แƒชแƒ“แƒแƒ แƒก แƒ˜แƒ›แƒ˜แƒขแƒแƒ› แƒ แƒแƒ› 42 แƒแƒ  แƒแƒ แƒ˜แƒก struct

End Sub